Odwróciłbym to: makro realizujące aktywację wskazanego arkusza w wybranym skoroszycie i zawierające polecenie copy , przypisane do dowolnej (nie wykorzystywanej domyślnie w Excelu) kombinacji klawiszy, lub uruchamiane zdarzeniem arkusza Np dwuklik... Schowek w Excelu jest obiektem, do którego należałby się odwołać. Natomiast uruchamianie makra kombinacją...
1. Należy utworzyć makro, które wykona wszystkie potrzebne czynności 2. PLIK->Opcje->Dostosowanie Wstążki->Wybierz polecenia z->Makra itd.
Zmiana koloru czcionki, czy wypełnienia nie jest zdarzeniem "zauważalnym" przez VB. Pozostaje więc klawisz [f9] lub umieszczenie w kodzie arkusza, przy zdarzeniu SelectionChange, polecenia Me.Calculate (zawsze to nieco lepsze niż nic).
Użyj prostszego polecenia i się nie męcz: [syntax=sql]select ... from table1 A,table2 B where A.Id=B.Id[/syntax]
Dawno nie miałem MS Office'a pod ręką to niestety nie zarzuce poprawnym kodem. Z tego co pamiętam VBA nie miało zbyt wielu możliwości do wykraczania poza dokument. Ale chyba dało wykonywać się polecenia z powłoki systemowej. Jeden z łopatologicznych sposobów jaki można znaleść w googlach to skorzystanie z systemowego polecenia "ftp" poprzez stworzenie...
żebym zrozumiał na przyszłość Jeśli chcesz nauczyć się "czytać" złożone formuły to naucz się korzystać z polecenia: Oblicz teraz (F9) :please: Na ogół po zaznaczeniu niezrozumiałego fragmentu formuły i uruchomieniu polecenia oblicz teraz :idea: zobaczysz dokładnie "co liczy" dany fragment formuły - tak jak na zrzucie :spoko: 962688
Jak umieścić w konkretnym arkuszu Przycisk polecenia (formant ActiveX) tak aby odpalał makro z Modułu Z toolboxa (v.2007^ ;) menu 'Wstaw' na karcie developer (dolna grupa kontrolek), następnie "wyświetl kod" i wpisujesz: Call NazwaMakra
Nie mogę utworzyć polecenia czyszczenia schowka po jego otwarciu. Chcę go obowiązkowo wyczyścić, gdyż mogą się tam znajdować jakieś elementy Robi się to linijką: Application.CommandBars("Clipboard").Con... Arkusz kopiuje do schowka "całą" komórkę, a ja chciałbym tylko jej zawartość tekstową. Jak świat światem to zawsze kopiuje do schowka...
Ad.1. Sprawdź, czy wcześniej (przed pętlą) nie masz powtórzenia polecenia "sheets.add". Najlepiej wklej cały kod od "Sub" do "End Sub". Jeśli jest przydługawy daj w załączniku jako plik tekstowy (tylko kod). Ad.2. Właśnie tak to działa. Właściwość pola tekstowego (TextBox4) "Locked" ustaw na "True" i zmiana daty będzie możliwa tylko picker'em. Lub zrezygnuj...
W zasadzie wszystko działa idealnie oprócz tzw. przeksięgowania ... :D Wpisuję numer RZ w komórkę "G-1" a następnie przyciskiem "Obciąż RZ" zdejmuję liczbę podzespołów z arkusza "RZ" ... :?: mechanizm arkusza "robi" rozliczenie tak jaby wszystkie dane tabeli arkusza "Przeksięguj" dotyczyły tylko RZ zawartego w komórce "G1"... :?: Po pierwszym użyciu...
czy moglbym Cie prosic o szegolowe pokierowanie? nie wiem czy VBA w A to, to samo co w Excel. Wrzuć ten kawałek kodu, w którym podejmowałeś próby. Zwykle jest to jakieś zdarzenie (pola formularza, przycisku, itp). Ogólne polecenia VB, składnia, pętlę, etc w obu aplikacjach mają identyczne zastosowanie. Różnica oczywiście jest ale wynika raczej z tego,...
Dziękuję za otrzymane porady, w jaki sposób mogę w VBA zapisać otrzymany wynik z polecenia "netsh wlan show network" np do zmiennej? Moim celem jest stworzenie makra, które będzie regularnie je zapisywało.
Proponuję użyć polecenia Shell.
wyrzuca mi błąd 9 Jaka linia jest podświetlona na żółto? kod tego potwora to 8 stron wydruku Czy czasami połowa kodu, to polecenia .Select???
Panie Macieju mam jeszcze jedno pytanie ponieważ pliki będą blokowane próbowałam wstawić do Pana kodu polecenia Active.Shett.Unprotect Pasword:="hasło" i analogicznie za zablokowanie ale niestety kod nie działa
Makro jest pewnie mocno zamotane Tak zgoda :D Nawet trudno zrozumieć w jakim celu tworzysz to makro :?: :cunning: Jeśli masz opanowane Power Query - to przecież nie ma żadnych przeszkód, żeby w nowo otwartym pliku utworzyć połączenie z innym plikiem (nawet bez konieczności otwierania źródłowego pliku :idea: ). Jeśli zaś chcesz to zrobić koniecznie...
Dziękuję, po lekkiej modyfikacji i dopasowaniu kodu wszystko działa tak jak powinno. Moje kolejne zmartwienie to przepisanie funkcji "wyszukaj.pionowo" na kod VBA: =WYSZUKAJ.PIONOWO('Arkusz2'!A43;'Arkusz2... Mam takie coś: [syntax=vbnet] Sub MEXDLIL() Range("H29").Select ActiveCell.Formula = Application.WorksheetFunction.VLookup("A...
Metoda godna polecenia, ale mając małe doświadczenie niewiele to da. Musisz wykonać pętlę po wszystkich wierszach, w której sprawdzisz występowanie w komórce ciągu znaków i jeżeli występuje to kopiujesz wiersz. Jak to zrobić, to już oddzielny problem, ale każde z tych drobnych zadań jest już rozwiązane i opisane wielokrotnie. Sam czasem muszę poszukać...
Widaiałem te podpowiedzi ale mam z nimi problem, a mianowicie w rozwiązaniu: http://www.apocotenexcel.pl/subfolders.h... mój excel nie rozpoznaje polecenia "colFilesFullNames" zaś w: http://ms-news.pl.office2000.narkive.com... excel nie rozpoznaje polecenia "With Application.FileSearch" mam Excel 2016
1. Załączając przykładowy plik z danymi - nie muszą być prawdziwe, ale muszą mieć docelowy uklad danych w arkuszu/arkuszach 2. Powyższe wyjaśni też dokładnie, czy pisząc o tabelach, masz na myśli listy danych, czy "najzwyklejsze" excelowe tabelki-tabelkowe - listy danych mają dodatkowe polecenia vba do ich obsługi, zwykłe tabelki tylko "standardowe"
Cześć. Dziękuje za pomoc, tak działa dokładnie tak jak potrzebuję - idealnie!!!! Niestety jak podstawiłem ten kod do reszty arkusza nad którym pracuję, pojawiły się dwa inne problemy. Do otrzymanego od Ciebie kodu "DodajGodziny" dołożyłem dwa inne kody: "CzyscimyDane" oraz "Dodaj". Pierwszy ma czyścić wybrane komórki po wykonaniu polecenia a drugi w...
Jak to wersja Excela, bo u mnie na 2007 to polecenia działa...
(at)prl ale wydaje mi się że to mija się z celem bo tak to będę musiał edytować co jakiś czas ścieżkę do pliku więc wychodzi na to samo. Może dokładniej to opiszę. Co miesiąc tworzę nowy folder na dany miesiąc, raz w roku na nowy rok. W danym miesiącu przenoszę do nowego folderu pliki z poprzedniego miesiąca. Po wykonaniu pewnych operacji na jednym...
Witam serdecznie dopiero zaczynam przygodę z MS Access i nie jestem wprawionym bazodanowcem dodatkowo nie mam pojęcia o kodowaniu w VBA mój problem jest następujący: chciałbym zapisać dane do tabeli za pomocą formularza, dla którego wszystkie wartości w okienkach ustawione są jako wartości domyślne. Niestety access nie wykonuje polecenia zapisz dopóki...
To powinno działać: [syntax=vb]Private Sub Workbook_Open() ActiveWindow.WindowState = xlMinimized WYDRUK_ETYKIET.Show End Sub [/syntax] Jeśli dodatkowo chcesz, aby arkusze ukryły się w ten sposób, aby tylko przez VBA można było je odkryć to dodaj: [syntax=vb] Private Sub Workbook_Open() Sheets("nazwa_arkusza").Visible = xlVeryHidden '.....tu wpisujesz...
Bardzo dziekuję za pomoc. Dodano po 2 Ok. Działa. Dzięki. PS. Możecie polecić jakiś podręcznik/ stronę inernetową w której są opisane polecenia VBA i ich zastosowanie tak aby można byloby się uczyć samemu? Dodano po 16 Z kolumną J jednak nie dokonca jest w porządku ponieważ aktualizuje komórki aż za tabelkę. Wydaje mi się że w przypadku kolumny J ten...
Witam ponownie i wracam z nowymi problemami Kolorki już opanowałam bawię się nimi do woli Co teraz, gdy zamiast zmiany koloru potrzebuję wstawić jakiś symbol? Nadal po stuknięciu (kliknięciu) w komórkę - tu bez żadnych udziwnień wydaje się proste, ale nie wiem jakiego polecenia użyć?
Masz rację, Selection.Columns.Count - To jest nie potrzebne :) - Ja po prostu wypełniam jeszcze od razu kolumne obok w taki sam sposób więc dla tego jest to w moim kodzie. Generalnie tak, chciałem wypełnić dolne komórki wartością z tej zaznaczonej aż do poziomu danych z kolumny A czyli z zakresu Lastrow2. Nie znałem jednak polecenia .Resize, przez co...
Witam wszystkich. Mam pewien problem z napisaniem kodu pod VBA który będzie odzwierciedleniem funkcji tablicowej w arkuszu kalkulacyjnym ... {=MIN(IF(A1:A20<>0;A1:A20))} Czyli funkcja min która omija zera. Wiem iż pod VBA wywołuję funkcję przez polecenie worksheetfunction ale nie ma tam polecenia "IF" Czy ktoś może mnie nakierować jak to napisać?...
Jak zwykle niezawodnie, dzięki kolejny raz :-) Próbowałem wprowadzać różne podobne polecenia ale niestety wszystko wprowadzałem między "bs" a "sheets", zamiast przed "bs" i oczywiście były błędy.
Witajcie Mam już napisane makro w pliku Worda, które otwiera po kolei kilkadziesiąt plików Worda, które wszystkie są korespondencją seryjną. Makro robi swoje we wszystkich tych plikach jednak przy otwarciu każdego z nich muszę kliknąć na przycisk "TAK" na pytanie "Otwarcie tego dokumentu spowoduje uruchomienie następującego polecenia SQL ..." Czy jest...
Zapisów-nie wiem jak to nazywa się fachowo (jestem małym samoukiem), jednak myślę o poleceniach (komendach) które wpisujemy w VBA. jeden pod drugim czyli np; Private .......... (polecenie) End Sub i na tym polega mój problem co jeśli mam kolejne jak ja to nazywam polecenie? Kolejny już nie chce działać w jednym arkuszu działa tylko ten jeden Co zrobić...
Zamieść ten arkusz, bo nikt nie zgadnie co ty tam robisz... Kolega ' lesławek ' ma słuszny pogląd na tę sprawę ... :) ...wstawiłem kod pozmieniałem wszędzie wartość na TRUE i wyrzuca mi nadal błąd " Nie można użyć tego polecenia w chronionym arkuszu, Aby użyć tego polecenia, należy najpierw usunąć ochronę arkusza .... " dodatkowo wskazuje na ActiveSheet.Range("$D$1:$E$20001").AutoF...
No niestety też nie dla tekstowych dostaję TRUE jako wartość komórki, ale to zaraz coś pomyślimy ale jest inny problem w części komórek jest np. 1234,5x678,9 val(1234,5x678,9) =>1234,5 a to też nie jest dobrze (potrzebuję zmienić tylko 1234.5x678.9 =>1234,5x678,9) i chyba muszę wrzucić wszystko do tablicy, robić operację na tablicy i z powrotem do arkusza,...
ok ta druga opcja wygląda ciekawie a jakaś mała podpowiedź odnośnie polecenia vba do tego? Znalazłem coś takiego ale to już po świętach, idę dobrym tropem? [syntax=vb]Function readxml(ByVal strFile As String) 'Initialise Dim intFile As Integer Dim strXML As String Dim strOrderText As String Dim objDOM As Object Dim DOMOrder As Object Dim thisOrder As...
Witam ! Z góry przepraszam, ale jestem początkujący jeśli chodzi o programowanie jakiekolwiek. Mam pytanie odnośnie pętli w vba w przypadku update do bazy danych Mam w excelu kolumnę z poleceniami update (ilość wierszy może być różna) https://obrazki.elektroda.pl/4545887200_... Napisałem kod, który wykonuje polecenia update z komórki...
Masz rację. Właśnie przed chwilą znalazłem to rozwiązanie, poprzez wstawienie polecenia ActiveWorkbook.Close. Dzięki za pomoc. Mam jeszcze jedno pytanie: - ponieważ w Module 2 mam inne makro, przy zapisywaniu "nowego" pliku pojawia się okno kontekstowe: W skoroszytach bez obsługi makr nie można zapisywać następujących funkcji: Projekt VB itd.... Jak...
Z poziomu Excela musisz wykorzystać tzw. OLE automation, czyli powołać obiekt Worda i wywołać polecenia tego obiektu (worda). Tu masz przykład jak w excelu otworzyć worda [syntax=vbnet]Sub WordAutomation() Set wrd = CreateObject("Word.Application") wrd.Visible = True 'tu wykonaj kod zrejestrowanego makra w word, zapisujący dokument do pdf 'poniżej przykład...
Właściwie to mi nie tyle chodzi o naukę VBA co o naukę angielskiego, a i przy okazji naukę VBA. Chodzi mi o to, że jak się otwiera makro utworzone przy pomocy polecenia "Zarejestruj nowe makro" to widać tam dożo słów po angielsku. Liczyłem na to że jest jakaś publikacja, w której każde z tych poleceń byłoby po polsku opisane, ba angielskiego zabardzo...
Witam! Od czasu do czasu korzystam z VBA lub po prostu rejestruję proste makro, żeby ułatwić sobie pracę. Ostatnio natrafiłem na problem. Zarejestrowałem proste makro ułatwiające dodawanie kolejnych odczytów do tabeli w arkuszu, który jest częścią większego skoroszytu, ale innych makro w nim nie ma. Ku mojemu zdziwieniu okazało się, że makro czasem...
Dzień dobry, Dziękuję za wcześniejszą pomoc i link do strony www z kursem. Niestety moja wiedza i doświadczenie nie pozwalają mi zbudować "funkcji" na podstawie tego opisu :) 1. Nie rozumiem jak "kilku poziomowe makro" zapisać w formie argumentu dla funkcji :). (absolutnie to nie jest pretensja - to kwestia mojej niewiedzy - przepraszam) - czy kto...
Potrzebuję pomocy odnośnie kopiowania kolumn za pomocą makra. Wg mojego doświadczenia tworzenie rozbudowanych projektów kalkulacyjnych ze wsparciem makrami VBA - jest bardzo ryzykowne zwłaszcza do zastosowań komercyjnych :cry: Nikt oprócz Ciebie nie zna specyfiki przetwarzania Twoich danych i nikt nie jest w stanie stworzyć kodu uniwersalnego. Musisz...
O taki coś mi chodziło, świetna robota! Jeszcze tylko muszę poszukać funkcji lub polecenia odpowiedzialnego za zaznaczenie takich samych tagów, bo np w jednej komórce mam <html> blabla<html> to zaznaczy mi tylko pierwszy znacznik.
Dzięki za odpowiedź. Próbuje to jakoś rozwiązać, ale cały czas stoję w miejscu. Oczywiście nie oczekuję gotowego rozwiązania, ale mógłbyś podrzucić jeszcze jakieś podpowiedzi? Trochę nie bardzo rozumiem sformułowanie: "Robisz pętlę po komórkach pierwszego arkusza". Jakiego polecenia powinienem przy tym użyć? I w jaki sposób przeszukać zakres komórek...
jakos nadal nie działa pojawia się komunikat Application.defined or object-defined error Dodano po 7 Jeśli tak zrobię to faktycznie jest ok wksz.Activate MsgBox Range("status") Jeśli wksz.Range("status") to już błąd Ja chce kopiować komórki pomiędzy arkuszami wiec użyłem polecenia 'Cells(NextRow, 1) = wksz.Range("status") gdzie cells jest poleceniem...
jak to zrobić są trzy kolumny A.....B.....C D E każda kolumna zawiera liczby 1 2 3 min(1) A 4 3 6 min(3) B w kolumnie D do każdego wiersza przypisuje funkcje minimum która bedzie podawała najmniejsza wartość i tu pytanie.jakiej funkcji lub jakiego polecenia w vba użyć żeby w kolumnie E wyświetlała się nazwa kolumny.jest to bardzo ważne dlatego że kolumna...
Jaka wersja Access? Jak napisać kod z VBA który będzie mi pobierał dane z textboxow i względem nich filtrował mi kwerende? Dość prosto. Wystarczy pobrać zawartość textbox'a i jeśli niepusta - dodać odpowiedni filtr do tworzonej kwerendy (np. polecenia SELECT * from Kwerenda WHERE Kwerenda.Rok=TextBox.Text)... Podaj konkretny projekt/przykład (niekoniecznie...
Odpal dwa polecenia systemowych i po problemie. Bo alternatywą jest to: [syntax=vbnet]Open Me.txt_FilePath For Input As #1 Input #1, NewFileName Close #1 Name "1.txt" As NewFileName[/syntax] z tym że to Name jest strasznie kapryśne, trzeba jeszcze dowalić konkretną ścieżkę.
...szukałem info na ten temat ale nie mogę znaleźć... Nie szukałeś. Gdybyś szukał (Google w zależności od sformułowanego pytania podaje od kilkuset do kilku mln odsyłaczy), - to w najgorszym wypadku miałbyś problem z zastosowaniem tej kontrolki. Od jakiegoś czasu kontrolka ma nazwę "Microsoft Date and Time Picker Control" a jej plik to jak napisałeś...
Jeżeli wklejam dane znajdujące się w schowku za pomocą polecenia z Menu -> Edycja -> Wklej to jest wszystko w porządku, a jak robię to samo tylko w VBA np poprzez polecenie: ActiveSheet.Paste to wychodzi lipa... Wklejają się dane, z sugestią, że to tekst, a nie liczba. Byłoby to może jeszcze do przeżycia, gdyby nie duże liczby; np. 2 382,888 jest widziane...
atmega polecenia polecenia głosowe przetwarzania polecenia
zmywarka bosch demontaż spód ustawienie rozrządu perkins carel modbus
project analizatora motoreduktor podajnika
Realtek, Conexant, Intel SST – zanika dźwięk po kilku minutach, Windows 10/11, laptop/PC Zawleczka Segera w elektrozaworze pralki – budowa i rola w zaworach Bosch, Whirlpool, Electrolux