Nie bardzo rozumiem co z tym "Znacznik" :( W każdym razie linia, w której znajduje się kursor: Ln = Selection.Range.Information(wdFirstChara...
Witam. Nie mogę poradzić sobie ze stworzeniem makra... Chciałabym aby makro łączyło tekst z komórek z zakresu C13:C21 ( z pominięciem pustych) z zachowaniem formatowania i wstawiało do komórki w innym arkuszu. Plik przykładowy z makrem. Jak dołączyć do makra, które mam makro, które połączy zakresy C13:C21 z arkusza "dodaj dane" do jednej komórki w innym...
Witam serdecznie. Mam wiersze z tekstem pogrubionym i normalnym(oba rodzaje tekstu występują w pojedynczej komórce) .Chciałbym aby w pętli makro wycięło pogrubiony tekst z komórki np A1 i wkleiło tylko (pogrubiony tekst) do odpowiedniej komórki C1 itd czyli A2 do C2 czy A3 do C3 itd.Może się tak zdarzyć że w którejś z komórek nie będzie pogrubionego...
Witam, mam problem, jestem nowy i nie mam zbyt dużej wiedzy o VBA. Szukam sposobu aby makro skopiowało cały wiersz w jednym arkuszu i wkleiło go tyle razy ile wynosi wartość w jednej z komórek w tym własnie wierszu. Nastepnie makro ma przejść do kolejnego wiersza, ale pominąć te wklejone. Bardzo licze na pomoc, wierszy mam naprawde mnóstwo a jest to...
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 serdecznie Potrzebuję pomocy w napisaniu makra które by działało w następujący sposób: W kolumnie A mam powiedzmy 10 różnych tekstów pod sobą, w kolumnie B mam liczby całkowite przy nich. Potrzebuję powstawiać wiersze dla każdego tekstu o takiej liczbie wierszy jak w kolumnie B przy danym tekscie i żeby teksty były pod sobą. np: A1 / B1 Kot 5...
jak wejdzie się w kod i dołuły to jest zrobione okienko tylko chodzi o podpięcie wpisanego tekstu do tabelki wstawianej
Witam, Chciałbym, żeby w wysyłanej wiadomości email pojawiała się ścieżka do pliku będąca hiperłączem. Stworzyłem makro poniżej, ale nie wiem jak sprawić, żeby w tekście wiadomości email pojawiało się hiperłącze. Będę wdzięczny za pomoc specjalistów :). Proszę pamiętać o używaniu znaczników syntax . Opcja Listing kodu . - arnoldziq
[syntax=vbscript]Sub DodajOsobe() osoba = InputBox("Podaj nazwisko i imię osoby", "UWAGA") nw = Cells(Rows.Count, "B").End(xlUp).Row + 1 Cells(nw, 2) = Cells(nw - 1, 2) + 1 Cells(nw, 3) = osoba Cells(nw, 16).Formula = "=SUM(D" & nw & ":O" & nw & ")" End Sub [/syntax]
Witaj. Makro dosyć proste: [syntax=vbnet]Sub Makro1() ActiveCell.Value = "PRZ1" ActiveCell.Offset(1, 0).Select End Sub[/syntax] Podpinasz pod przycisk i działa.
Witam, Ponieważ tworzę wiele pism które muszę zakończyć tą samą treścią (klika zdań na końcu dokumentu), poszukuję rozwiązania które wstawiało by tekst przypisanym wcześniej skrótem klawiszowym. Interesuje mnie makro które będzie działało trwale, treść którą będzie wstawiało musi zwierać w kodzie VB, tak żeby można było czasami zmienić datę lub treść....
Mam doswiadczenie w pisaniu pluginow w Outloku, chetnie pomoge. Opisz dokladniej swoj problem.
Można np zarejestrować makro które wstawia tekst. Przypiąć to do jakiegoś przycisku i naciskać go kiedy chcemy wstawić tekst.
a u mnie działa. może zamioast ; wstawiasz , dodaje załącznik. - przy otwieraniu pojawi się monit o tym ze plik posiada makro - jest tam tylko to makro (w module). plik i komputer czysty i sprawdzony antyvirem
Przyszło mi do głowy że może tak jeszcze opisze mój problem, będzie łatwiej zrozumieć: 1.1. Makro wstawia wszystkie symbole z kolumny A arkusza "BAZA" do arkusza "DANE" do pierwszej wolnej komórki w kolumnie C i dla każdego symbolu wstawia tekst:"cccccccccccc cccccccccc" w kolumnie D arkusza "DANE; 1.2. Raz jeszcze raz makro wstawia wszystkie symbole...
Mam w tych plikach faktury w postaci tekstowej. Trochę to dziwne :D Faktury w postaci tekstowej :?: Z jakiego to programu wyeksportowane ? załącz przykładowy plik. Potrzebuję, aby makro Excela otwierało te pliki tekstowe jeden po drugim i wstawiało w określone miejsca pliku nowy tekst, by powstała korekta faktury Konieczny byłby szablon takiej faktury...
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...
To dlatego, że w tym pliku wykorzystujesz znaki ======= jako separator graficzny, natomiast Excel po wstawieniu tego w komórkę traktuje to jako zaczątek formuły i zwraca błąd. Wystarczy sformatować kolumnę, w którą wstawiasz te komórki, na sztywno jako tekst: ręcznie lub programowo, gdzieś na początku kodu umieszczając: [syntax=vb]Arkusz1.Columns(1).NumberForm...
Witam, jestem początkujący jeśli chodzi o tworzenie makr w VBA pod excelem, potrzebuję Waszej pomocy w temacie makra wstawiającego w wybraną komórkę formułę, dowolną, chociażby sumę dwóch komórek znajdujących się powyżej. Po wstawieniu poniższego kodu makro wysypuje się, działa jedynie gdy nie wstawię znaku = przed jeżeli, czyli wstawia sam tekst. [syntax=VBA]Range("A5").Select...
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...
Za pomocą makr pewnie, skoro standardowe funkcje nie pozwalają. Gdyby Twój opis był jaśniejszy, już kilka osób pewnie by Ci pomogło. Dwa razy czytałem Twoje posty i nadal nie mam pojęcia, co chcesz tak właściwie osiągnąć (chodzi o wynik końcowy, bo wiem, że zmieniając coś chcesz zmienić resztę tabeli, ale według jakich kryteriów - nie mam pojęcia)....
Dzień dobry. To są zwykłe pola, które wprowadza się poprzez Ctrl+F9 (lub z paska Wstawianie>Szybkie części>Pole). Żeby podejrzeć co w nich siedzi należy nacisnąć Alt+F9. W Pana dokumencie podejrzewam, że jest to zrobione tak jak w moim załączniku, czyli ustawienie pola macrobutton które po kliknięciu nic nie robi, jedynie wyświetlany jest jego opis,...
Disable - //reszta tekstu tylko dla wypenienia No to już wiem że nic nie wiem. U mnie zawsze dla F103, czy to gołego czy w Nucleo (a też np. dla F100) generuje się makro w HAL_MspInit. A jeśli W SYS->Debug jest Disable (obojętnie czy jawnie ustawione czy nieruszana wartość na dzień dobry) to jest __HAL_AFIO_REMAP_SWJ_DISABLE(); czyli w konsekwencji...
Ad.1 Jeśli makro jest w 'Thisdocument;, to nie. Jeśli gdziekolwiek indziej (moduł, normal, inny plik), to musi być nazwa lub indeks: 'Documents("nazwa").Tables(1)' Ad.2 To zależy. Jeśli tabelka ma zmienną ilość wierszy, a odwołujesz się do Np ostatniej, to: [syntax=vb]rw = Documents(1).Tables(1).Rows.Count kol = Documents(1).Tables(1).Rows(rw).Cells.Co...
Chyba jakoś tak: Private Sub CommandButton1_Click() x = 3 While Worksheets("Przyrządy pomiarowe").Cells(x, 1).Value <> "" If Worksheets("Przyrządy pomiarowe").Cells(x, 1).Value = Worksheets("Kalibracja-Naprawy&... Then Worksheets("Przyrządy...
Chciałbym połączyć te dwa makra w jedno i umieścić pasek postępu wstawiania twardych spacji. Chcę aby twarde spacje wstawiały się po uruchomieniu jednego marka, i aby tekst w Wordzie "nie mrugał", a najlepiej wyświetlał się pasek postępu - jakiś wskaźnik procentowy, lub coś podobnego. Liczę na pomoc.
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...
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...
Zdaje się, że zapętlasz się w nieskończoność. Ale bez analizy krok po kroku (klawisz F8), trudno coś powiedzieć pewnego. Pierwsze co rzuciło się w oczy to : [syntax=vb]ZnajdzNast = InStr(ZnajdzStop, Dokument, PozPocz, vbTextCompare)[/syntax]Gdzie przy następnym przebiegu: [syntax=vb]ZnajdzStart = InStr(ZnajdzNast, Dokument, PozPocz, vbTextCompare)[/syntax]To...
Witam, kontynuując temat mam jeszcze zapytanie o takie makro: 1) w tych dodanych wierszach w kolumnie "A" wpisany byłby tekst "zrobione" 2) w kolumnie "B" ponumerowane tylko te dodane wiersze 3) w kolumnie "C" w miejsce wyczyszczonych danych wpisany tekst "ok" czy da się coś takiego zrobić? Będę bardzo wdzięczna
Nie do końca to rozwiązanie zaspokoi moje potrzeby. Ponieważ tabela zmienia się dynamicznie chciałbym aby w odpowiednich komórkach raportów nie były wstawiane wartości tylko formuły. Bardzo by mi w tym pomogło makro które zamieni tekst znajdujący się w komórce G15 arkusza Tabela na formułę. Jak to zrobić??
A czemu ta indeksacja nie działa? Czy może mieć na to wpływ fakt, że ten userform jest w Wordzie? Nie ma znaczenia. Po prostu podchodzisz do tego nie z tej strony ;) Najprościej (podepnij pod przycisk w uForm): [syntax=vba]Dim c As Control, tekst As String 'kontrolki w uForm to najzwyklejsza kolekcja, sprawdzimy wszystkie jej elementy For Each c In...
Witam Tak jak w temacie chciałbym wyciągnąć część tekstu z komórek z kolumnie X konkretniej wszystko to co jest przed ostatnim "-" przyrównać to do konkretnej warotości i jeżeli się pokrywają to wtedy w kolumnie O w odpowiedniej komórce będzie wstawiany jakiś tam tekst. Takich zależności będzie około 300. W zalączniku plik juz z makrem ktore do tej...
Chamski (podwójne NOT) kod, ale działa. - najpierw wybierasz sobie "co chcesz wstawić" z komórek D1..D6 - potem wybierasz sobie "gdzie to wstawiasz" - komórki A1..A6 O pierwszej nad ranem trudno o lepszy kod :) Myślę, że koncepcję moją już znasz, przerobisz sobie "na swoją modłę" - jak będziesz chciał. Kod wklejasz bezpośrednio w kod arkusza, którego...
CommandButton z napisem GRAJ!, Poszedłbym raczej w kierunku formatki użytkownika (UserForm), niż bawiłbym się w z przyciskami w arkuszu. Łatwiej zapanować nad aspektem wizualnym "zabawki", no i miejsca więcej w arkuszu na inne rzeczy. czy „CommandButton_SPRWDZ1” może weryfikować wszystkie 39 odpowiedzi Prosto odpowiadając - można - np....
Witam. Ludziska pomocy. Pobrałam makro dotyczące zamiany cyfr na tekst ale teraz powiedzcie mi (jak blondynce) jak je wsadzić do mojego arkusza w excelu, żeby zadziałało??? jakoś je może zapętlić i ustawić żeby nie obliczać ciągle z palca ale żeby sie samo uruchamiało po otwarciu tego arkusza???? Sprawa wygląda tak że arkusz 1 jest polem edycji a na...
Witam Mam plik " Wzor" i z niego muszę dokonać drukowania określonych arkuszy. Makro ma zadanie wydrukować najpierw arkusz o nazwie "AAA"; potem arkusz "BBB". Drukowanie jest wysyłane na domyślną drukarkę i drukowanie dwustronne. :idea: Jak ja to bym widziała :D : W arkuszu "MENU" w komórce "F5" makro wstawia liczbę "1". Wtedy zadziałają funkcje Excel...
Proponuję makro zdarzeniowe BeforeDoubleClick: [syntax=vbscript]Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Intersect(Target, Columns("B:C")) Is Nothing Then Exit Sub Cancel = True If Len(Target) = 19 Then Exit Sub Target.Value = Format(Now, "yyyy-mm-dd hh-mm-ss") Target.Columns.AutoFit End Sub[/syntax]Makro...
Nie do końca się chyba zrozumieliśmy. Być może to ja niezbyt dokładnie to opisałem. Wstawiając komentarz dla jakiegoś fragmentu tekstu to najpierw go zaznaczam potem używam skrótu CRTL+ALT+M i wstawiam treść komentarza. I teraz zależy mi aby wypunktować uwagi w następujący sposób. 1. "treść zaznaczonego tekstu 1 do którego jest wstawiony komentarz (pisany...
Witam Potrzebuje makra, a nie funkcji. W arkuszu "dane" w kolumnie D wystąpić tekst: "xxxx"; "yyyyyyy" ; "zzzzz" lub puste komórki. W arkuszu "dana" w kolumnie E mogą wystąpić następujące teksty, które są brane pod uwagę pod makro:"aaaaaaa";"yyyyyyy";"zzzzz", inne teksty lub cyfry, znaki specjalne lub puste komórki nie są brane pod uwagę. Podałam przykładowy...
Niestety moje pomysły nie podziałały... Problem jest w tym, że .Columns(14 + i).Insert .Cells(2, 14 + i) = teksty(i) .Cells(3, 14 + i) = sumy1(i) działa normalnie, natomiast .Columns(27 + i * 2).Insert .Cells(2, 27 + i * 2) = teksty(i) .Cells(3, 27 + i * 2) = sumy2(i) już nie. Makro zamiast wstawiać te formuły sumy2 = Array("=SUM(S5:S100)", "=SUM(T5:T100)",...
Witam serdecznie, Potrzebuje pomocy w napisaniu marka, poniewaz sam nie potrafię. Tabela: W kolumnie T w kolejnych wierszach są wpisane jako tekst ścieżki na dysku. Czasem jest to jedna ścieżka, a czasem dwie lub trzy oddzielone ";" (średnikiem). Czyli ścieżki to takie główne wartości oddzielone ";" średnikami. Makro: Makro ma przeszukiwać tekst (wartości)...
To ja mam pytanie w trochę podobnym zakresie. Czy da się zrobić takie makro, które będzie formatowało wszystkie tabele w Wordzie. Chodzi o to, aby tabele były dopasowane do okna oraz obramowane linią o grubości 1 pkt. w szarym kolorze. Wiem, że można zrobić formatowanie tabeli w stylach, ale jak usunę ostatni wiersz z tabeli to wówczas obramowanie na...
Dziekuję za zwrócenie uwagi na róznicę w zapisuwaniu nazw arkuszy. Odnosnie pkt 2 doszedłem do takiego etapu: Ad 2. Należy podać szukany tekst w cudzysłowie: "szukana_fraza" wyrzuca mi błąd 1004. Próbowałem także z opcją .Value, niestety bezskutecznie. Jak więc zamiast stałej komórki "A43" zapisać poszukiwanie komórki zawierającej określony tekst?
Wychodzi na to, że pdf nie obsługuje "footnote tooltip" stworzonych w WORD. Szukając informacji o tworzeniu okienek wyskakujących po najechaniu myszką natknąłem się na trochę informacji jak to robić RĘCZNIE w różnych programach. (może komuś się przyda): Floating Text on PDF Documents http://khkonsulting.com/2014/07/floating... Acrobat...
Witam, mam ogromną prośbę o pomoc w napisaniu makra w VB, które mógłbym stosować w Wordzie lub Excelu. W Wordzie dysponowałbym listą, np: Arisaema yunnanense Buchet, Notul. Syst. (Paris) 1: 367 (1911). Arisaema zanlanscianense Pamp., Nuovo Giorn. Bot. Ital., n.s., 22: 262 (1915). Arisaema zebrinum G.Nicholson, Ill. Dict. Gard. 1: 112 (1884). Arisaema...
Działa... w pewnym sensie. W efekcie dostaję widoczne na ekranie H, które jest odpowiednikiem greckiej Ety w naszym alfabecie. Nie wkleja to znaku Unicode z greckiego, tylko... No właśnie - nie wiem jak to funkcjonuje. Wpadłem jeszcze na taki pomysł. Replacement text = ^c to wstawienie ze schowka. Może nagram makro w którym wstawiam Etę, skopiuję ją...
Wszystko powinno być dobrze jeżeli pozbędziesz się kropki przy liczbach (a przynajmnierj przy ostatniej - największej). Innymi słowy jeżeli w pozycji Lp będą liczby jako liczby "moje" makro wstawiając kolejną pozycję będzie powiększać maksymalna liczbę Lp o jeden i wpisywać ją w pierwszej komórce wklejanego wiersza. (W kodzie makra za to odpowiada zmienna...
Najlepiej jeszcze aby procesor tekstu sam wypełnił za użytkowników paragrafy ;). Z tego co wiem to MS-Word nie kompiluje plików. Uważaj bo w informatyce ten termin ma trochę specyficzne znaczenie. Chodzi ci oczywiście o łączenie/scalanie plików, a to po angielsku "combining" lub "merging". Wydaje mi się, że za bardzo byś sobie chciał ułatwić/zautomatyzować...
Witam! Mam pewnien problem z markem. Przez parę dni szukałam na różnych forach informacji jak go poprawić, ale niestety nic nie znalazłam. Problem wygląda następująco. Mam makro, które generuje mi plik Worda od podstaw tj. tekst plus wstawianie danych z komórek na podstawie aktualnie zaznaczonego wiersza. Wszystko działa kiedy zapisuje tylko dokument...
Na upartego można to zrobić bez VBA. Jeśli makro, to najpierw trzeba rozbić ciąg (Split) i dalej przypisywać warunkowo w "z góry upatrzone" miejsce w arkuszu. Najprościej byłoby dopisywać kolejne w ostatni wolny wiersz, a po znalezieniu dubla wstawiać nowy. W efekcie osiągnąłbyś coś takiego: http://obrazki.elektroda.pl/8687250500_1...
Witam, Potrzebuje zbudować makro które, będzie kopiowało wiersz(lub wiersze) z tabeli jeżeli spełnia warunek. A mianowicie: W Arkuszu1 mam tabele o określonej szerokości (16 kolumn) bez okreslonej ilości wierszy. W Arkuszu3 w komórce B2 wpisywanybyłby warunek (tekst) W Arkuszu2 jest pusty odpowiednik Arkusza1 (tylko nazwy kolumn). Marko działałoby w...
Myślę, że można to zrobić na przykładzie jaki jest w załączniku. Kolejne wstawiane obrazki będą mieć różne nazwy, więc trzeba sie odwołać do obrazka, który jest umieszczony w danej pozycji w arkuszu. W przykładzie odwołanie jest do obrazka umieszczonego w tym samym folderze co arkusz, ale oczywiście wszystko można sobie zmienić. Przyciski: Wstaw i Kasuj...
wstawianie tekstu makro wstawianie makro wstawianie danych
ustawienie ramienia różne rozdzielczości sterowanie tranzystory katalog
telefon zablokowany przez operatora telefon zablokowany przez operatora
Winda zaparzacza w DeLonghi Perfecta Cappuccino - przyczyny problemu Parkside PAS 125 F5 Angle Grinder IC Identification, Common Control ICs, and Datasheet Sources