Dobrze jesli naspepnym razem sformatujesz swoj kod i uzyjesz znacznikow. Myslisz ze komus sie chce ogladac takie smieci? Sub kolor() Dim litera As Range Set litera = ActiveDocument.Range With litera.Find .ClearFormatting .Text = "A" .MatchCase = True .MatchWholeWord = False End With litera.Find.Execute Do While litera.Find.Found litera.Expand...
Witam, mam wielką prośbę o pomoc. Potrzebuję stworzyć makro, które będzie podmieniało wartości komórek w kolumnie w zależności jaka wartość tekstowa zostanie znaleziona. Przykład: Mam komórki które zawierają: Dobre_Kino Kina Super_kino_ Samochodu Jadę Samochodem KOTEK Dla_kota Makro powinno wyszukiwać ciągi tekstowe: "kin", "samoch", "kot" i tak gdzie...
Zarejestruj jeszcze wyszukiwanie tekstu (Ctrl+f), zamiast 'Activate/Select' wpisz 'Column' i przypisz do zmiennej. Powinno wyjść coś takiego p.kaczmarek2 . Do tego obsługa błędu, w razie nieznalezienia, oraz różne takie mniej istotne...
Sub Makro2() ' ' Makro2 Makro ' ' Selection.Find.ClearFormatting Selection.Find.Font.Color = 5287936 With Selection.Find .Text = "" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = True .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False End With Selection.Find.Execute...
Chodzi o to, by podczas np. edytowania bazy danych, dane wynikowe były uzupełniane na bieżąco . Właśnie z tego powodu proponuje ci funkcje excelowskie a nie makro. To co ci przedstawiłem to pomysł. Wzbij się ponad chmury i spójrz pod innym kątem :). Nie daj się ograniczeniom i spójrz świeżym okiem :) . Bazy (ani dobrze przygotowanych kolumn pomocy)...
nie bardzo rozumiem ta formuła ładnie kopiuje szukany tekst do kolumny obok a potrzebuję żeby go wycięła z tej kolumny w której go znalazła
to o czym piszesz to dla mnie czarna magia Jaka tam czarna. Sprawa jest dość prosta i spokojnie obędzie się bez różdżki, szklanej kuli, czy czapki Merlina :) Makro najpierw sortuje, następnie zmienia wartości na tekst w kolumnie D. Przycisk po prawej służy tylko testom. Pozostaje sformatowanie gotowej tabelki (można dopisać stosowną procedurę). Pewnie...
Słabo szukałeś. Tu masz przykład z "wordowskiej" pomocy visual basica jak się wstawia TextFrame (troszeczkę przerobiłem). Znalazłem poprzez nagrywanie makr. Owszem nie można nagrać wstawiania ramki ale jeżeli jest już wstawiona można do niej wejść i coś napisać (to się nagra). I po nitce do kłębka... With ActiveDocument.Shapes.AddShape(msoSh...
Błąd polega na tym że w kolumie A wszystkie dane masz jako tekst (mimo że wyglądają na liczbę) natomiast w kolumnie C masz większość danych jako liczbowe. Zaznacz wszystko i odznacz wyrównanie do prawej. Jeżeli żadna z opcji formatowania nie zostanie włączona to tekst jest wyrównywany do lewej krawędzi a liczba do prawej. Mimo że wyglądają tak samo...
Dzień dobry, Nie trzeba makra, wystarczą funkcje WYSZUKAJ.PIONOWO lub PODAJ.POZYCJĘ. Wyszukiwane dane należy połączyć w pary operatorem złączenia tekstów & i wprowadzić funkcje jako tablicowe Ctrl+Shift+Enter. WYSZUKAJ.PIONOWO zwróci szukany wyraz (jeśli go znajdzie) lub błąd #N/D! jeśli nie znajdzie. PODAJ.POZYCJĘ zwróci położenie znalezionego wyrazu...
Witam serdecznie potrzebuję z czegoś takiego wykroić tekst po "|" i przed "-" lub przed "." kropką: YSZUFPRN|YSZUFPRN|Higiena i czystość >> Szufelki|Szufelka PRESTIGE. - łączy ze sobą wysokiej jakości tworzywa sztuczne z elastomerem, dzięki czemu jest niezwykle trwała - wyprofilowana rączka szufelki bardzo dobrze układa się w dłoni|||0,0792|1|0,0792|5903355004790||....
Może będziesz wiedział gdzie popełniam błąd i coś zasugerujesz. Podstawowa przyczyna złego formatowania to przedziwne style w Wordzie, które utworzyłeś jako listę numerowaną (dodatkowo jako numerowane cyframi rzymskimi :| ). Proponuje przeanalizować makro - działa ono w oparciu o 3 symbole wieloznaczne (np." arabskiej :idea: ), poprzez polecenie znajdź...
Witam! Temat może się wydawać trochę skomplikowany, ale już wyjaśniam o co chodzi. Chcę napisać makro, które będzie mi wpisywać do Worda stały tekst, ze zmiennymi z Excela. Kod do wpisywania zmiennych już mam, natomiast nigdzie nie mogę znaleźć funkcji, która będzie wpisywać tekst do Worda przez makro w Excelu. Potrzebuję tylko tej funkcji a resztę...
Widzę że się porwałem z motyką na słońce. Niby ta sama stajnia (office) a całkiem inne podejście do kodu VBA a w szczególności do nagrywania makr. Dlatego zapewne tak mało jest makr dla worda. Poszukam jeszcze ale na razie nie mogę znaleźć rozwiązania dla mojego pomysłu (zaznaczenie fragmentu tekstu).
Staram się... OK, nagrałem sobie makro, usunąłem co niepotrzebne, dodałem co niezbędne i wyszło coś takiego Znalazłem taki kod ale nie wiem jak go pod siebie przerobić Nie mam pojęcia czy zakres dla procedury zdarzeniowej (określony argumentem: "Me.ListObjects("Lista1").Range.Columns(... ma u Ciebie zastosowanie, czy nie. Może bierzemy się za przerabianie...
dzień dobry, w związku z tym, że jestem słaby w VBA, mam prośbę czy ktoś może pokazać mi przykładowy/ podobny lub fragment kodu w vba , który wykonywałby następujące zadanie : - makro w danym folderze i podfolderach przeszukuje wybrane pliki excel (pliki wybierane są wg nazw , która zawiera oznaczony fragment tekstu) , - w tych wybranych plikach przeszukuje...
Najpierw musisz utworzyć marko które będzie się uruchamiała po zmianie tekstu w komórce. Przykład Cells.Find . Na końcu wyrażenia dajesz .Activate i komórki w których znaleziono daną wartość robią się aktywne. Na końcu używasz czegoś [url=http://java2s.com/Code/VBA-Excel-Ac... żeby przejść do właściwej komórki.
U mnie działa coś takiego: [syntax=vbscript]Option Explicit Sub zupa_jarzynowa() 'Word Const wdFormatXMLDocument = 12 Const pnt = "$numer" Const tmplt = "szablon.docx" 'Excel Const dtxtadr = "B3" Const txtadr = "H2" Const sht = "Arkusz2" 'General Const rslt = "wyniki" Const sffx = "_Pismo" Const dfrmt = "YYYY.MM.DD" Dim txt As String, flenme As String,...
Witaj. Należy użyć formatowania warunkowego z określeniem funkcji, na podstawie której robiony jest format. Jeśli posiadasz Excela w wersji 2013 lub nowszej, to ma on wbudowaną funkcję CZY.FORMUŁA, która rozróżnia czyw komórce jest wpisana liczba/tekst, czy wartość jest obliczona na podstawie formuły rozpoczynającej od "=" - i o takie rozróżnienie chyba...
Faktycznie trochę chaotycznie. Chodzi mi o pobranie danych z innego pliku i zapisanie ich w taki sposób aby nie było potrzebne otwieranie pliku źródłowego. Pobranie danych-> zapisanie (i tak codziennie z innymi danym) Chciałbym aby w komórce (np. B8), w której jest wprowadzone ='G:\XX\XX\XXX\Plik_do_ściągania_danych\ Dodano po 27 Aktualnie poniższe...
Sory ale metoda kopiuj wklej nie jest najlepsza. Działa ale tylko jednorazwo przy kolejnych probach pokazuje blad Trzeba znalezc inny system? czy ktoś zna?
To nie było pytanie, czy nie ma błędu, a czy znaleziono szukany tekst: [syntax=vbscript]a = Application.Match(Target, w.Range("A1:A" & ow), 0) If Not IsError(a) Then w.Rows(a).Delete[/syntax] Stąd taka negowana logika.:) Powyższy kod to przerobiony kod: [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then...
Witam, ja tu przypadkiem i nie chcę zaburzać dyskusji, ale wpadłem na pomysł może głupi ale i tak się tym podzielę. .pdf z przykładu można otworzyć Word'em i jest tam "numer zlecenia" w formacie tekstowym. Może całość uda się załatwić makrem w vba ? otwiera plik, szuka tekstu i zapisuje plik w formacie pdf ze znalezioną nazwą. Robiłem tak tylko w excelu...
Hmm. A reszta tego kodu? Czy wcześniej nie było zadeklarowane coś *.dll (API)? Nie wiem jaka składnia jest potrzebna, aby z polecenia Shell'a (ping) z nazwą hosta jako parametrem "wyłapać" IP. Najlepiej gdybyś znalazł cały kod tej procedury.
Cześć wszystkim, Jako, że dopiero zaczynam działać z VBA, a nie mogę nigdzie znaleźć czego podobnego postanowiłem się tu zgłosić po pomoc. Potrzebuję stworzyć makro, które polegałoby na tym, że tekst wprowadzony InBoxa zostanie wrzucony do pierwszej wolnej komórki(bądź linii) np kolumny A . Chodzi o to, aby stworzyć swojego rodzaju rejestr. Możecie...
Witam, chciałabym znać numer wiersza, który zawiera pewien fragment tekstu. Znalazłam takie makro: [syntax=vbscript]Sub szukaj() Dim str_Wartosc As String Dim int_Licznik As Integer For int_Licznik = 2 To 120 str_Wartosc = ActiveSheet.Cells(int_Licznik, "A").Value If str_Wartosc Like "*AAA*" Then MsgBox "W kolumnie A wierszu nr " & int_Licznik & " jest...
Witam Mam do was wielką prośbę dotyczącą makra. Posiadam Excel 2013 i 2016. Załóżmy że w komórce D1 mam tekst "Utworzenie sprawy"; Załóżmy że w komórce D14 mam tekst "Utworzenie sprawy Załóżmy że w komórce D41 mam tekst "Utworzenie sprawy" Załóżmy że w komórce D65 mam tekst "Utworzenie sprawy" W komórce d1 od tej komórki makro zaczyna pracę. Jeśli 1...
Dobrze, a gdzie makra należy znaleźć frazy 'izolacje przewody'? Sam to nie stworzy, musi gdzieś być, nazwa wyszczegolnienia i przypisany kod(np. 0406)
Tak widziałem to. Nie mogę jednak znaleźć opcji która zablokuje wysłanie takiej wiadomości. Mogę ją tylko skopiować jednak i tak zostanie wysłana. Przeoczyłem coś?
Istnieje klawisz odj = IIf(Cells(3, 3) = "", -1, 1) Cells(Cells(3, 3).End(xlDown).Row + odj, 3) = InputBox("Podaj cos") a na upartego w jednej Cells(Cells(3, 3).End(xlDown).Row + IIf(Cells(3, 3) = "", -1, 1), 3) = InputBox("Podaj...
Cześć, Mam makro które na podstawie danych z excel podmienia wybrane słowa w pliku word. Próbowałem już wszelkimi sposobami które znam i szukałem w necie sposobu żeby zmienić kolor czcionki i wszystko na nic. Poniżej fragment kodu w którym to chciałem umieścić : Docelowo ma po podmianie "DANE" na "TEKST" zmienić kolor czcionki "TEKST" na czarny. [syntax=vbscript]With...
"wobec zrewidować pod kątem niekompletne nazwiska" chodzi o to aby nie było pustych pul w nazwiskach i imieniach ?? dzięki za wskazówki, muszę się podszkolić w makrach znalazłem pewien półśrodek dodałem kolumnę z funkcją złącz tekst nazwisko imię i teraz wyszukuje się o wiele sprawniej analogicznie z miejscami :] właśnie dostałem przebłysk tematu :]...
Znalazłem kolegę poza tym forum, który nie zaczął mnie "prostować" i obdarzać ocenami, tylko zabrał się do pomocy i stworzył odpowiednie makro. Dziękuję wszystkim tym, którzy próbowali mi pomóc.
Wklej tę funkcję do modułu VBA. Jeszcze jedno. To makro pozwala mi znaleźć tylko jedno słowo "AAA". Co trzeba dopisać, żeby kod szukał słowa "AAA" lub "BBB" w komórce, w której znajduje się przeszukiwany tekst
Chciałbym, aby kiedy piszę w jednym pliku word to na drugiej stronie tego samego pliku lub w drugim pliku word automatycznie pojawiał się ten sam tekst. A jeśli nie automatycznie to np. po zakończeniu edycji jednego pliku i otwarciu drugiego w tym drugim pojawialby się automatycznie tekst zpierwszego. Da się podobnie zrobić między excel, a word poprzez...
Cześć, redaguję w MS Word 2016 obszerny dokument, w którym część liter po kropce (myślniku, pytajniku) występuje z małej litery. Wiem, że z pomocą przychodzi opcja symboli wieloznacznych, pozwalająca zamienić małe litery na duże w zakresie j estem Frank - powiedział. - z apalisz? Znalazł pióro. c zy je oddał? g dzieżby tam! Chcę skorzystać z symboli...
właśnie o coś takiego mi chodziło... tylko nie mam zielonego pojęcia jak to zrobiłeś. Podpowiem za kolegę, że to makro umieszczone w kodzie arkusza I jeszcze pytanie wybiegające... gdybym miał firmę np phu klif i wpisał tylko klif czy wyświetli mi interesującą firmę phu klif Przy tak stworzonym makro musiał byś wpisać *klif* by znalazł wszystkie rekordy...
Znalazłem "błąd". Ponieważ przykład z funduszem robiłem na liczbie całkowitej (555) zapomniałem/nie zwróciłem uwagi że liczba z przecinkiem dla VB jest z kropką. Później kod próbuje to dalej konwertować i występuje różnica typu. Wystarczy pobrać z funduszu remontowego tekst wartości Text .TextBox5.Visible = True .TextBox5.Enabled = False .Label6.Caption...
Faktycznie masz racje. winny jest folder systemowy. pomyliłam nad "rozwojem" makra. Czy da się aby podobne makro szukało nie nazw plików czy folderów ale tekstu wewnątrz pliku. Powiedzmy, że chce znaleźć w wielu plikach konkretny NIP klienta ale wewnatrz np plików csv, txt, xls, i inne (te które są możliwe do przeszukania) i żeby te pliki kopiował do...
Exel 2010 jaki używam. Dlaczego zatem zapisujesz w formacie Open Office: .ods, nie w .xlsx? W tych arkuszach znajduje się wiele funkcji, które miały mi pomóc w uzyskaniu efektu jaki znajduje się w arkuszu "SPIS". W załączniku nie znalazłem ani jednej funkcji, tylko sam tekst. Załącz taki plik, gdzie będą funkcje.
Witam Na stronie www.vba.matrix.pl , w przykładach znajdziesz to czego szukasz. Kiedyś w sieci znalazłem konwersje „liczb -> do postaci kwot słownie. :cry: Po delikatnych przeróbkach tego makra załączam makro do umieszczenia w Excelu. Konwersja liczby na słowa. Pozdrawiam S95 PS Wszystko jest proste do czasu, jak nie zaczniesz programować
Dzień dobry, Excel nie jest dobry na wszystko, ale w tym przypadku powinien sobie poradzić. Nie znam Accessa, więc nie potrafię ocenić, czy byłby lepszy. Co do podręczników do Excela i VBA jest ich całe mnóstwo, wszystko zależy co kto lubi i jak szczegółowa wiedza jest mu potrzebna. Cenione są prace Walkenbacha, ale to są dość grube tomy i potrzeba...
Witam, Mam problem z napisaniem makra. Potrzebuję skopiować z zakresu A1:A100 tylko wartości liczbowe >0 do zakresu B1:B100 z pominięciem komórek zawierających tekst "ND". Zapewne już ktoś zakładał taki temat jednak nie mogę znaleźć takiego konkretnego rozwiązania. Z góry dziękuję i pozdrawiam, Paweł
Potrzebuję napisać makro do formatowania warunkowego. Chciałabym pokolorować cały wiersz, jeśli spełnione są dwa warunki: - kolumna O > 10% oraz kolumna B zawiera tekst "styczeń", "luty", "marzec" - kolumna O > 15% oraz kolumna B zawiera tekst "kwiecień", "maj", "czerwiec" AI: Jaka wersja programu Excel jest używana? Excel 2024 AI: Czy potrzebujesz...
Mam problem z przygotowaniem makra, który będzie wyszukiwał dane. W załączeniu zamieściłem przygotowany plik excel. Mam tam makro wyszukujące natomiast problem mam następujący - wyszukuje mi dane tylko po wpisaniu pełnej nazwa natomiast potrzebuję po fragmencie tekstu bądź jednego wyrazu (nazwy będą dość długie stąd potrzebuję coś takiego). Nie mogę...
Dzień dobry, Mam duży problem. W kolumnie A mam około 2000 nazw pełnych w kolumnie B mam nazwy skrócone około 1500 (przykładowa nazwa pełna: S.C. Bitpol Jerzy Kowalski nazwa skrócona: Bitpol). Potrzebne mi makro które by przyporządkowało w kolumnie C nazwę skróconą z kolumny B do nazwy pełnej z kolumny A. Czy jest takie makro, które pomogło by mi to...
Cześć, poszukuję rozwiązania dosyć złożonego (dla mnie) problemu, mianowicie chodzi o: makro które z arkusza "Dane" kopiuje do poszczególnych arkuszy wiersze na podstawie danych kryteriów: Arkusz "kryterium1" - jeżeli w komórce występuje tekst "gola" Arkusz "kryterium2" - jeżeli w komórce występuje tekst "Senegal" Arkusz "kryterium3" - jeżeli w komórce...
Cześć:) Mam do rozwiązania pewien problem, który niekoniecznie uważam za prosty. Przyjmuje wszelkie uwagi i pomysły. W załączeniu przesyłam plik, do którego będę się odnosiła. Chodzi o znalezienie w komórce z różnym dodatkowym opisem daty umorzenia (dodam tylko, że w rzeczywistości mam ponad 200 000 rekordów). Zrobiłam to funkcją, ale nie zdaje to egzaminu....
Kawałek danych w załączniku. Chodzi mi o zakładke "Sheet4". Wersja na jakiej pracuję to"365 for enterprise". Format daty w systemie to dd.mm.rrrr. Dane są codzienne dodawane i chodzi mi aby mieć makro, które bedzie mogło filtrować dane z ostatnich 30dni. Potem z tych danych w innym skoroszycie robiona jest analiza/wykresy z wyfiltrowanego zakresu. Znalazłem...
Cześć, mam problem. Potrzebuję wiedzieć jak zrobić makro, które polega na ściąganiu danych z innego pliku. Ma wejść w inny plik, znaleźć konkretne słowo, przejść 5 komórek w prawo, skopiować wartość i wkleić w konkretne miejsce, potem przejść z tej piątej komórki na siódmą komórkę od tej znalezionej i skopiować ja w konkretne miejsce. Makro ma działać...
Cześć, Dziękuję za szybką pomoc. Jestem pod wrażeniem, dokładnie o to mi chodziło, makro ma szukać fragmentu tekstu i na tej podstawie zaznaczać wiersz w którym występuje szukana fraza. Sprawdziłem u siebie i fajnie śmiga. Zauważyłem jedną różnicę, gdy wpisuje szukaną frazę tak jak jest wpisana w tabeli, np. UTR z dużych liter to makro szuka i koloruje...
znalezienie fragmentu tekstu makro zmiana tekstu makro edytowanie tekstu
zatankowałem benzynę zamiast diesla candy wysoki obrót tester obwód
radio internetowe lodówka elektrolux
Kod błędu 65511 w pojazdach Scania - komunikacja CAN Whirlpool ADG 9490 PC 2010 – awaria pompy myjącej, diagnostyka, wymiana, objawy
