Mam rozwiązanie. Niech klawisz "0" nazywa się "C0" wtedy: Private Sub C0_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) C0.BackColor = &H80000010 ' Zmieniamy kolor przycisku End Sub Dla klawisza "1", który nazywa się "C1" Private Sub C1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer,...
Można do przycisku przypisać Np takie makro Option Explicit Sub cmdWstaw() Dim pozycja As Integer, numer As Integer Dim kom As Range pozycja = Sheets("Arkusz1").Rang... + 1 If pozycja = 77 Then MsgBox "Osiągnięto koniec zakresu w zestawieniu..." Exit Sub End If For Each...
Utworzyłem arkusz z miesiącami w formie kalendarza Żeby nie tracić czasu na ręczne przewijanie zawartości skoroszytu w celu odnalezienia szukanego miesiąca, utworzyłem ikony przycisków do których przypisałem odpowiednie makra, w których podałem współrzędne konkretnych komórek. Przyciski działają, i makra przenoszą nas do tabel z odpowiednimi miesiącami....
Sądząc po nazwie ("Polewyboru") to nie ActiveX tylko formularzowe. Wykorzystaj wartość komórki wpisanej jako "łącze komórki"... P.S. Na końcu procedury włącz odświeżanie ekranu.
Okej dziękuję bardzo:) A zapytam: Da się zrobić taki przycisk, który zapisuje plik Excel'a?
Twojego filmiku nie widać. Edit: Już się pokazał. Spróbuj jednak dokładniej opisać swoje obserwacje. Czy problem z tym plikiem "okrojonym" na potrzeby forum występuje u Ciebie na każdym komputerze i w każdej wersji Excela? Masz w pliku kilka ukrytych arkuszy, ale eksperymentujesz tylko z "B". Czy każdy arkusz po ukryciu zachowuje się tak samo? Ponieważ...
Umieść przyciski w polach grupy
Witam możesz np. tak [syntax=vbscript]ActiveCell.Value = Environ("username") & ", " & Now()[/syntax] nie doczytałem do końca
Skoro nagrało Ci się coś w rodzaju 'ActiveCell.FormulaR1C1 = "=TODAY()' to dopisz pod spodem 'ActiveCell = ActiveCell.Value' i po sprawie. To samo "bardziej po Bożemu": ActiveCell = Date Zamiast ActiveCell może być oczywiście dowolny Range(adres) lub Cells(wiersz, kolumna).
1b. Kod ma kopiować wszystkie na prawo arkusze z tego samego pliku i wszystko wrzucać do arkusza zbiorczo z ostatnim wierszem. Może opisze od początku moje działania: Mam plik XXX, w którym jest jeden arkusz o nazwie Panel. W nim mam różne porobione przyciski z makrami. Pierwszy przycisk pozwala mi na kopiowanie do mojego XXX danych z innych plików...
Chodzi o to, że w momencie, gdy doda się temat o nazwie, która nie istniała, tj. nie miałem do niej przycisku w momencie, gdy następnym razem ta osoba wejdzie do pliku nie będzie miała przycisku do filtrowania tematów o nazwie tematu jaką utworzyła, np. X. - początkowo chciałem napisać, żebyście mi powiedzieli czy jest to możliwe żeby takie przyciski...
Witam ponownie, Nie bardzo rozumiem, albo chyba coś robię źle. 1)Mam dwa arkusze zest (arkusz1), temp (arkusz2). 2)Utworzyłem trzy przyciski w arkuszu zest(arkusz1) Generuj, usuń, zapisz. 3) Mechanizm1: Generuje sobie arkusze o odpowiednich nazwach, według przykładu od 1001 do 1009 i teraz np. chcę zapisać każdy ten arkusz osobno w katalogu (np.C:\Users\Michal\Desktop\Zestawienia)...
Oops, a było sobie nagrać makro ;) 1. Kod umieść w module standardowym i podepnij pod przycisk 2. Najpierw wybierz arkusz, następnie komórkę. Np [syntax=vb]Sub Odwolanie() Arkusz2.Select [C4].Select End Sub[/syntax]
Tak oczywiście. Musisz stworzyć sobie userform, w którym umieścisz odpowiednie przyciski do wyboru dnia, miesiąca i roku. Kombinuj w ten sposób. Jeśli nie to w userformie umieść pola tekstowe ze zmiennym tekstem tworząc siatkę kalendarzową. Pola te muszą być aktywne tak, że po kliknięciu na nie makro wpisze w wybraną komórkę (zaznaczoną) tą informację,...
Dopisz przed tą linią: debug.print .Shapes(.Cells(w, 1).Text).name naciśnij Ctrl+g uruchom makro. I co tam wypisało?
Przy pisaniu makr musi być w miarę wszystko wcześniej jasno zdefiniowane gdzie są / lub gdzie mogą być konkretne dane np. dotyczące mnożników, danych podstawowych itd. W załączeniu kolejny przykład już z makrami. Trzeba pamiętać o zaznaczaniu danych - nie robiłem żadnych zabezpieczeń w razie błędnych danych wejściowych - po prostu wyrzuca wtedy błąd....
Zablokować pierwszy wiersz, zmienić wysokość, wstawić tam wszystkie przyciski i używać jako "paska menu"...
Witam Tabela z uprawami - po wprowadzeniu działek do arkusza (kolumna C i D) okazuje się ze na niektórych polach jest więcej niż jedna uprawa. Wtedy wstawiam wiersz poniżej danej działki i wpisuję kolejne uprawy na danej działce (tylko kolumna E, G, F, natomiast C i D zostają puste w tym wypadku). Podobnie z usuwaniem zbędnych wierszy w danej działce....
zakomentuj w całem programu podobne [syntax=vb] Application.Run "'Stale i stopy - obliczenia.xls'!ATEST.ATEST" Application.Run "'Stale i stopy - obliczenia.xls'!STAL.STAL" Application.Run "'Stale i stopy - obliczenia.xls'!ZAPIS.ZAPIS" [/syntax] Sprawdź czy Excel się zawiesza . rozkomentuj, jeden przez jeden i Sprawdź. Ponadto przyciski na pierwszym...
excel pyta czy w sortowaniu ma uwzględnić pozostałe kolumny Wtedy należy kliknąć myszą lub nacisnąć enter aby obszar został rozszerzony Ale naprawdę, dlaczego nie po prostu kliknij myszką? Inne przyciski nie działają? Która wersja Excel? We mnie rozciąga się automatycznie na pozostałe kolumny. Tajne dane zmiany i wysłać arkusza, w której chcesz sortować,...
W Office 2010 niestety przyciski w menu tez występują To makro było pisane pod Office 97. :cry: W nim wszystkie przyciski wycinania i wklejania znikają. Myślę, że przy odrobinie chęci da się to podrasować na 2010, ale to już może ktoś inny spróbuje?
WITAM!! Bardzo prosze o pomoc w napisaniu makra: musi zawierać ono 3 przyciski (yesNoCancel) oraz ikonę ostrzeżenia. musi wyswietlac zapytanie "czy kolor obramowania aktywnej komórki ma być czerwony a wnętrza niebieski" TAK- obramowanie czerwone, wypełnienie niebieskie NIE- nic musi to dzialac w excelu 2010 VB... wogole sie na tym nie znam- dla tego...
Dziękuję bardzo w końcu po wielu próbach zadziałało :-). W ramach nauki VBA chciałbym trochę udoskonalić powyższe makra. Obecnie w pliku 1 mam dwa przyciski cmdSave i CommandButton1, które działają w następujący sposób: cmdSave -tworzy mi plik o nazwie komórki B3 pliku 1 i zapisuje na dysku we wskazanej lokalizacji (jest aktywny przy otwarciu pliku...
Witam Potrzebowałbym bym pomocy do tego co chciałbym zrobić, niestety nie posiadam jeszcze wystarczających umiejętności by zrobić to samemu. Zapewne potrzebuję funkcję połączoną z makrem, które zapętli ją, tak by wszystkie dane w całej kolumnie były przeszukane i wypełnione. Niestety zwykły VLOOKUP tutaj mi nie pomoże, a nie jestem w stanie sam dojść,...
Witam zobacz [syntax=vb]ActiveWorkbook.RefreshAll[/sy...
Witam Chciałem dodać przycisk typu ON/OFF ukrywa i odkrywa obszar Mam stworzone dwa makra makro1 ukrywa obszar makro2 odkrywa obszar W sieci znalazłem sposób który pozwala na taką sztuczkę ale nie wiem gdzie to podstawić do obecnych wartości aby to działało. znaleziony kod Private Sub ToggleButton1_Click() With ToggleButton1 If .Value Then Call...
Hej, mam "maly" problem w Excelu, może ktoś będzie w stanie mi pomoc..?:-) Potrzebuje zainstalować makro, które w komorkach pliku A2:B100 będzie pokazywalo znak "!", po dwukrotnym kliknieciu w komorke, a w komorkach K2:L100 będzie pokazywalo znak "X", po dwukrotnym kliknieciu w dana komorke. Dodatkowo, chciałabym żeby to makro dzialalo w każdym arkuszu...
Witam Szukam pomocy w stworzeniu makra , które potrafi drukować formularz z drugiego arkusza uzupełniaąc w nim dane z pierwszego. Myślałem o przyciskach w pierwszym arkuszu, które drukują wypełnione formularze w 2 egzpl.
Witam, mam spory arkusz z wartościami liczbowymi(w większości), niektóre z nich zakończone są symbolem * co zmienia formatowanie komórki na ogólne. Potrzebuje usunąć te nieszczęsne gwiazdki. Korzystam z polecenia zmień, ale formatowanie komórki pozostaje dalej ogólne, a chciałbym nie musieć przy każdym błędzie jaki wyrzuca mi po tej operacji excel klikać...
Witam, mam makro sprawdzające wiersze w arkuszu Excel. Działa dobrze, jednak chciałbym aby jednym przyciskiem, który mam na Arkuszu1 program sprawdził wiersze w arkuszach w zakresie "Arkusz4:Arkusz36". Teraz muszę wklejać przycisk w każdym arkuszu, żeby zadziałało. Oto moje Makro: Sub przelicz() Const max As Integer = 36 Dim i As Integer i = 26 Rows("26:36").Select...
Prosty wydawałoby się problem... jak zrobić tak, żeby makro w excelu można było uruchomić nie ze skrótu klawiszowego, ale poprzez kliknięcie danego pola czy obrazka? Jeśli to w czym pomoże to podpunkt 5. z tego zadania: http://www.hga.yoyo.pl/pipu/lab05zad.pdf PS. Makra mam już zrobione, tylko ten przycisk...
Ja to widzę tak: Przyciski w arkuszach 2 i 3 label="Start". Klikasz i makro kopiuje dane wg "idWewnetrzneWniosku": 1. Jeśli osoba ma status "Nie figuruje w ewidencji" do Arkusza 3 i następnie realizuje pkt.3-4 2. Jeśli <> od "Nie figuruje w ewidencji", do tabelki w Arkusz2. 3. W zależności od statusu aktywujemy arkusz 2 lub 3. Przycisk zmienia...
Witam, Potrzebuję makro, które po wpisaniu wartości w kolumnie A, wstawi wartości w tym samym wierszu w kolumnach B, C, D, E w oparciu o bazę w innym pliku, nazwijmy go "głównym". Ma to działać analogicznie do wyszukaj pionowo, ale odwoływać się do tablicy w innym pliku (makro otwiera plik główny, zaciąga dane i zamyka plik główny). Nie ma działać w...
Witam. Potrzebuję makra które pomoże mi w odświeżaniu plików. Mam następujące pliki: SUMA Tabela 1, Tabela 2, Tabela 3, i tak do Tabela 100 Zmienne 1, Zmienne 2, Zmienne 3, i tak do Zmienne 100 Potrzebuję makra które otworzy na stałe plik SUMA (w nim są dane wyjściowe i zbiera wyniki po obliczeniu w plikach Tabele i Zmienne) i następnie zestawy plików:...
Witam, potrzebuje pomocy z excelem, w temacie: Kilka osób, codziennie wypełnia ten sam plik, jeśli chodzi o dane - nazywając go swoim nazwiskiem. Pliki codziennie są zgrywanie, w jedną lokalizację (folder) do jednego pliku pod nazwą Zestawienie (obecnie metoda kopiuj wklej). Każdego następnego dnia pliki z kolejną datą zastępują poprzednie. Chciałabym,...
Witam Potrzebuje pomocy z excelem, mecze się już parę dni i nie mogę sobie poradzić, przeczytałem juz wszystkie posty i nic. Mam dwa skoroszyty - jeden z nich nazywa się Baza/Arkusz1 i znajdują się w nim dane do skopiowanie do innego skoroszytu (bieżacy arkusz Menu). Jednak kopiuje tylko wybrane komórki (które spełniają odpowiednie warunki). Ponizej...
Załącznik był podmieniony po 5min. Zaciągnij jeszcze raz. Lub popraw: if not intersect ... is nothing then
Cześć, mam pytanie czy jest możliwe stworzenie makra które kopiuje jedna zakładkę z pliku źródłowego do nowego pliku excelowskiego, ale tak, żeby to makro pokazywało się dla danej grupy roboczej (wszystkich użytkowników) podczas włączania nowego pliku w Excelu np w formie dodatkowego buttona na wstążce?. Proszę o podpowiedz co i jak trzeba zrobić. dzięki...
Cześć, potrzebuje makra które będzie sumować zakres. w linku zobrazowane o co mi chodzi. Czy mógłby mi ktoś w tym pomóc? https://obrazki.elektroda.pl/6553279700_...
Witam, Czy istnieje możliwość napisania w MS Excel makra, które będzie działało zgodnie z poniższym schematem: 1. W skoroszycie istnieje arkusz Jacek oraz Placek 2. W arkuszu Placek w zakresie A1:K500 występują wartości całkowite, które mogą się powtarzać 3. W arkuszu Jacek w kolumnie "W" istnieją wartości całkowite unikatowe - nie powtarzające się...
Witam, uruchomiłem w arkuszu makro, które po wpisaniu wartości w kolumnach 5,6,7,8 wpisuje automatycznie Datę w kolumnie "B" i Godzinę w kolumnie "C": Private Sub WorkSheet_Change(ByVal Target As Range) Dim i As Integer i = Target.Row If Target.Column = 5 Or Target.Column = 6 Or Target.Column = 7 Or Target.Column = 8 Then If Target.Cells <> a...
Cześć mam taki problem, mianowicie chodzi oto żeby poprawić makro tak żeby przed wklejeniem danych zapytało " do którego arkusza z kopiować dane?" i wybór np. pięciu arkuszy " arkusz1 arkusz2 arkusz3 arkusz4 arkusz5", i po wybraniu któregoś arkusza tak skopiuje te dane, taki msgebox z wyborem arkuszy. ZAMIAST SHEETS1 ŻEBY TU TE OKIENKO WYSKOCZYŁO Z...
prosze o pomoc jak napisac proste makro zeby po kliknieciu danego przyciku obok wpisalo nazwe uzytkownika oraz date i godzine? pozdrawiam serdecznie i z gory dziekuje :) Monika
Zawiesza się czyli, uruchamia się dokument excela, a następnie się zawiesza, czegoś ciągle szuka (myszka się obraca, a program nieodpowiada), a także nie pojawiają się przyciski makro (widzę tylko tekst jeden, który został wcześniej napisany). Niestety po zaznaczeniu tych opcji dokument nadal nie chce się całkowicie otworzyć. Oto zdjęcia z opcjami,...
Jak masz kłopot ze wstawieniem to spakuj to zipem A na temat zrób tak jak radzi paweliw wstaw hiperłącza odwołujace się do tego samego dokumentu i już
Zamień Sheets("Obliczenia").Select na Sheets("Obliczenia").Activate A najlepiej jeszcze uprość te makro [syntax=vb]Sub kopiuj() Sheets("Obliczenia").Range("A3:A506").Co... Sheets("Wynik").Activate End Sub [/syntax]
W kodzie przycisku CmbAktualizujdane zmień/dodaj linie: 1 zmień) If POB <> "" Then kwadrat = POB * POB + Sqr(POB) 2 dodaj za linią pobrania = ) dodania = Val(UsfTowary.TxtDodan.Value) 3 zmień) If pobrania > dostepnosc + dodania Then 4 zmień) ifno = MsgBox("Stan Towaru po aktualizacji: " & dostepnosc - pobrania + dodania , vbInformation,...
Tak na szybko...
Witaj Dołożyłem przycisk uruchamiający makro. Pozdrawiam
W poście niżej masz to opisane Ale tu zrobiłbym ciut inaczej, Np [syntax=vb]Sub otworz() 'otwieranie pliku z okna dialogowego z filtrem Dim fd As FileDialog Dim wkb As Workbook Set fd = Application.FileDialog(msoFileDialogFile... With fd .InitialFileName = "H:\CCC\ccc\" .Filters.Clear .Filters.Add "Pliki Excel", "*.xl*; *.xls*" .AllowMultiSelect...
Wiesz, ja nadal nie jestem pewna, czy dobrze Cię rozumiem, ale wyszło mi coś takiego jak w załączniku. Po uruchomieniu makra pod przyciskiem - wstawia daty, uzupełniając puste komórki. Choć nie odmienia nazw miesięcy przez przypadki - czyli np. 2 wrzesień, a nie 2 września itd.
Zdaje się, że dla każdego powiatu musisz mieć osobne procedury dla przycisków. W przykładzie makro "orientuje się" po nazwie miasta wpisanej w komórce zakrytej przyciskiem.
Nagraj to makro i przypisz do przycisku. Przycisk wiesz jak zrobić? Wiesz jak przypisać makro do przycisku? Makro powinno wyglądać mniej więcej tak: [syntax=vb]Sub aktualizuj() ' aktualizacja danych z zakresu A1 Range("A1").Select Selection.QueryTable.Refresh BackgroundQuery:=False End Sub [/syntax] .. ewentualnie we właściwościach danych zewnętrznych...
Nie wiem czy pomoże ale ustaw niski poziom bezpieczeństwa makr.
1. Należy utworzyć makro, które wykona wszystkie potrzebne czynności 2. PLIK->Opcje->Dostosowanie Wstążki->Wybierz polecenia z->Makra itd.
Jak uruchomię makro przyciskiem 'dopisz', to w okienku nie ma danych.
dla przycisku tak daj takie samo makro tylko zamień True na False
Musiałem dodać fragmenty kodu odpowiedzialne za zróżnicowaną numerację kopiowanych przycisków, a następnie identyfikację przycisku "Clear", który został użyty. Wszystkie przyciski "Copy" działają identycznie - kopiują zawsze pierwszą tablicę na pierwsze wolne miejsce. Możesz tej pierwszej tablicy nie wypełniać, potraktować ją jako szablon, unikniesz...
W ostateczności jest Tłumacz Google ... eee ... a może zbysiomysio pamięta jeszcze ze szkoły ? ... do końca lat 80-tych rosyjski był uczony nawet w ogólniakach ... no ale może rzeczywiście nie jest "taki stary" ... :-]] ? .... :-) ... żeby pamiętać czasy, w których nie było jeszcze nawet komórek ... :D :D :D :D ... a nawet internetu ... :D :D :D ......
Zobacz przykład. Makro uruchamiane jest przez dwuklik w komórce z krzyżykiem...
Czy na pewno potrzebujesz makra? W załączniku formuła i przykład makra (pod przyciskiem). "Współrzędne" pobierane z L1, L2.
Wypróbuj takie coś (załącznik). Nie testowałem specjalnie, więc popraw jeśli coś będzie nie tak. Pod wszystkie przyciski masz podpiętą tę samą procedurę. Makro, wbrew pozorom, jest dosyć proste.
Oczywiście - dajesz przycisk i do niego podpinasz makro, w nim tylko jedna linijka Range("A1:D8").Copy Tylko po co? nie łatwiej crtl + c?
Albo zrób sobie "odtwarzarkę wzorów", czyli makro, które je przywróci, moduł vba zabezpieczysz hasłem oraz przed podglądem, wstawisz przycisk w arkusz ... i wtedy żaden użytkownik ci nie straszny, będzie mógł kasować wzory do woli, co minutę ... jedno wciśnięcie przycisku i masz odtworzone formułki, a złośliwy użytkownik zgrzyta zębami ... Dodano po...
Zależy, jak chcesz żeby się makro wykonywało. Albo zarejestruj makro i kod wklej tam, albo wstaw przycisk i w zdarzeniu przycisku.
excel makro przyciski usuwania przyciski makro przyciski excel
iiyama g2530hsu system radiowy namierza słychać radia kasety
telewizor sharp aquos rozruch tyrystorowy
Audi A4 B8 1.8 TFSI – niskie ciśnienie oleju i kontrolka EPC, diagnostyka i typowe usterki Lampart PST-2 – gdzie kupić sterownik 310 MHz, zamienniki, dostępność, instrukcja