Musisz wykorzystać w kodzie danego arkusza np 'worksheet_activate' i wtedy call makro
Masz wprowadzony plik (PDFMaker.dot) który ma się zawsze uruchamiać przy starcie worda. Jeżeli tak ma nie być wykasuj go z katalogu c:\Program Files\Microsoft Office\Office11\startup (lub przenieś do innego) A dzieje się tak bo ten plik (szablon dokumentu) który chce się otworzyć ma w sobie makro. I zawsze będzie ci się otwierał z tym komunikatem w...
Zamiast MsgBox ("1")
:arrow: marek003 A cóż to ja napisałem w pierwszym poście? :| A tak dla ułatwienia (jeżeli autor problemu chce się trzymać istniejącego kodu: Public Sub Change() Dim OstW As Long Dim Nazwa As String Dim target As Range Set target = ActiveCell With ActiveSheet OstW = Last(.Columns("A")... If OstW = 0 Then Exit Sub If Not...
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ą...
Po prostu czy da się zrobić to tak że zapisze plik a po ponownym odpaleniu wszystko działa dalej tak jak przez zamknięciem? Plik zapisujesz z obsługą makr (*.xlsm)? Makra można kopiować pomiędzy plikami. Zobacz [url=http://www.cpearson.com/excel/vbe.a... Rozdział "Copy A Module From One Project To Another". Chyba, że chodzi o coś innego...
Możesz np. sprawdzać co jakiś czas istnienie pliku w jakimś udziale sieciowym (nawet na tym urządzeniu). Wgrywasz plik, makro go widzi i cośtam robi. Kasujesz go, makro reaguje jak mu zaprogramujesz. Oczywiście oba komputery muszą się móc zobaczyć zatem być w sieci.
Jest taka możliwość? Tak istnieje. Zapoznaj się z 'Application.OnTime'
[syntax=vbscript]Option Explicit Dim xlApp, xlBook Set xlApp = CreateObject("Excel.Application") Set xlBook = xlApp.Workbooks.Open("N:\a.xlsm") 'Lokalizacja pliku EXcel xlApp.visible = true xlBook.refreshall WScript.Sleep 15000 xlApp.Run "Makro1" 'Nazwa makra do uruchomienia xlBook.Close xlApp.Quit Set xlBook = Nothing Set xlApp = Nothing WScript.Quit...
:arrow: Hefal Zaglądałeś [url=http://www.google.pl/#hl=pl&source=... Już w pierwszym linku masz odpowiedź...
Zalacz Twoj plik
... aby bez względu z którego arkusza wywołuje makro ... Zakładka "TABELE" ma chyba jednak nie podlegać żadnym działaniom takiego makra ? Działałaby wtedy sama na sobie ... Edycja: Dwa warianty podstawowe oraz dwa skrótowe tych podstawowych, wybierz sobie najbardziej pasujący: [syntax=vba] Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal...
[syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) If ((Target.Row - 27) Mod 4) = 0 Then Target.Offset(1).Calculate End Sub [/syntax]
Zablokować pierwszy wiersz, zmienić wysokość, wstawić tam wszystkie przyciski i używać jako "paska menu"...
Tak ma być?
Wrzuć SQL do kodu VBA , a wymagane dane wprowadź np. za pomocą inputBoxa. Przykładowo: [syntax=vbscript] Dim sSQL As String, idRaport As Long idRaport = InputBox("Podaj ID raportu", "Wprowadzenie danych") sSQL = "INSERT INTO KS_delta_przedostatnie_dane " _ & "SELECT * FROM slajdy_KS_baza " _ & "WHERE id_raportu = " & idRaport dbs.Execute...
Przede wszystkim załącz przykładowy plik i jednoznaczny opis, aby było można zorientować się do czego zmierzasz ? Wstępnie można Ci zaproponować uruchamianie jednego makra, które w zależności od wstawionej opcji (1, 2, 3) w określonej komórce uruchamiać będzie różne działania (kopiowanie danych, drukowanie lub zamykanie skopiowanego skoroszytu) ;-)
Pomyślałem i wykonałem: Private Sub Worksheet_Calculate() Sprawdz = Range("F11").Value Select Case Sprawdz Case 1 Call sortuj_malejąco Case 0 Call sortuj_rosnąco End Select End Sub Działa :D :D :D sortuj_malejąco sortuj_rosnąco To są oczywiście makra zarejestrowane w arkuszu Dodano po 46 To co podałem wyżej działa z komórką F11 w aktywnym arkuszu. Czy...
Dzień dobry, proszę o pomoc w konfiguracji sterowania roletami w systemie SATEL INTEGRA. Otóż mam sterowanie roletami zrealizowane poprzez moduły INT-ORS. Wszystko pięknie działa, tzn. opuszczanie, podnoszenie, sterowanie kilkoma roletami, itp. Problem pojawia się w momencie, kiedy chcę zrealizować automatyczne opuszczenie do połowy kilku rolet równocześnie...
Jeżeli chodzi o uruchamianie makra w konkretnym arkuszu, to może lepiej je umieścić w Module i uruchamiać na ActiveSheet? Oto by mi właśnie chodziło z tym, że chciałbym aby przeskakiwanie i uruchamianie makr wykonywało się po wciśnięciu jednego przycisku znajdującego się w arkuszu "Menu", który w moim skoroszycie będzie miał zawsze taką nazwę. Z góry...
Po kliknięciu GO pojawia się taki komunikat jak na załączniku (w bezpieczeństwo makr mam włączone pozwolenie na uruchamianie makr). Ręczne uruchamianie z pozycji makra działa bez problemu.
Cześć, jeden z komputerów w mojej sieci ma problem z ładowaniem makr w plikach word. Przy próbie załadowania makra wyskakuje okno dialogowe z komunikatem "Program Word nie może wywołać zdarzenia" W oknie Projekt w VBA widoczny jest tylko plik normal, nie ma zaś folderów projektu danego pliku. Dodam, że: - ustawienia w opcjach w Wordzie pozwalają na...
https://obrazki.elektroda.pl/5132775900_... Chociaż na zdjęciu widać mini płytkę z PIC18F1220, to posłuży ona jedynie do praktycznego zaprezentowania obsługi wątków które zaimplementowałem. Obecne możliwości kodu który chce zaprezentować, to działanie równoległe 2 lub trzech wątków, w tym głównej funkcji main która jest pierwszym wątkiem....
co mam z tym kodem zrobić? Jak nie wiesz co to VBA i makra - to nic nie zrobisz, a wygląda - że chyba nie wiesz. Jeśli wiesz co to makra - wklej w dokument z przypisami w treść nowego makra treść tej procedury i sprawdź działanie (uruchom makro), czy to jest to o co ci chodzi? Dokument musi być zapisany w formie umożliwiającej uruchamianie makr (w...
Witaj Dołożyłem przycisk uruchamiający makro. Pozdrawiam
Program definitywnie wykasowałem. Nieintuicyjna konfiguracja, po restarcie zamiast ustawionej wcześniej kombinacji, wybrany program uruchamia się po naciśnięciu kursora w dół, gdzie kursor nie był używany w żadnym z makr. Z klawiaturą Razer mam program, którzy obsługuje też makra i tu działa wszystko idealnie.
Dziwię się bo u mnie działa. Zmieniłem trochę formułę w kolumnie F by nie wykorzystywać makra a zwykłe funkcje excela. Nie wiem po co ktoś użył makra jeżeli można to było zrobić wbudowanymi funkcjami. Zawsze wbudowane funkcje działają szybciej niż makro.(wykasowałem makro) Dzięki temu dwie zalety: nie trzeba pozwalać na uruchamianie makra a po drugie...
... Ok wstążka z makrami ogarnięta ... Na pewno ? I jak jest uruchamiana ? Uruchamianie i usuwanie menu "KOSZTORYS" aktywowane jest makrami z modułu "Ten_soroszyt": ... No i prośba o dodanie do tej listy tego pola z możliwością podania ilości j.m Jak by to miało wyglądać? I tutaj kolega pospieszył się ze swoimi poprawkami, a ja spóźniłem ze swoimi...
Hello, i have problem with macro. I want created a buttton that Refresh Query and use this macro: Sub RUNQuery() ' ' RUNQuery Macro ' ' ActiveWorkbook.RefreshAll End Sub And when i use it it works, but when i send the file to another person and they want to refresh they have error. They change setting to enable macros but still don't work. Can i ask...
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ż...
możliwość stworzenia makra które będzie kopiować wypełnione wartościami kolumny w dół zaznaczając komórkę A2, jednak przy kopiowaniu pomijało by wiersze dla których nie ma podanych wartości w kolumnach D i F Jakoś tak (?) ... a może inaczej ... Założenia: 1) Arkusz z danymi = 'Arkusz1' 2) Arkusz docelowy kopiowania = 'Arkusz2' Uwagi: 1) Wielokrotne...
Wywołaj w kodzie arkusza 'Kredyty' (makro 'ListaZb' w module) [syntax=vb]Private Sub Worksheet_Activate() ListaZb 'nazwa uruchamianego makra End Sub[/syntax]
takiego założenie nie wykonałem. nie potrafie zrobić już początku :P czyli automatycznego makra po uzupełnieniu danych. Kombinowałem z makrem które się tworzy na podstawie tabeli przestawnej jednak autofiltr nie działa tak jak powinien. W jaki sposób mogę podczas makra usuwać zawartość nie potrzebnych wierszy. Próbowałem poprzez uruchamianie auto filtra...
Witam Przeczytaj do końca zanim otworzysz załącznik Dwa pytania do ekspertów: W załączeniu mam przykład pliku który po włączeniu dodaje nowy pasek menu. (w 2007 nową zakładkę w menu o nazwie "Dodatki") I tu jest właśnie "zagwostka" plik nie ma makr (wszystkie wykasowałem - choć były bardzo ciekawe i pouczające). Można też ustawić pełne zabezpieczenia...
Jak uruchomię makro przyciskiem 'dopisz', to w okienku nie ma danych.
Metoda PrintOut z klasy workshet nie powiodła się Uruchamiasz makro z aktywnego arkusza "formularz" :!: a drukujesz inny arkusz "oswiadczenie" :idea: Twój wcześniejszy kod jest jednoznaczny :D tj. ActiveWindow. Selected Sheets
Działa prawie idealnie! ale kiedy się wspisuje po kolei noc, rano, południe, wieczór, a jak wybiórczo, to już nie. Ale i tak już jesteśmy do przodu hihi Dziekuje serdecznie i miłego dnia :bye: 'Łąńżurz' ... :D ... odpowiaduje tak ... :D .... cyt.: "a może by ten kod w ogóle skrócić odrobinę, np.:" - wersja nr 1 z nadpisywaniem: [syntax=vba] Sub log_02()...
Dzień dobry, Operacja konsolidacji jest z założenia operacją statyczną. Jeżeli włączy Pan opcję tworzenia łączy, to utworzy się tzw. konspekt, który też zawiera łącza statyczne. Będzie to działać poprawnie tylko wtedy, gdy będzie Pan zmieniał długości kabli, ale każda zmiana nazwy pozycji wymaga skasowania starej konsolidacji i utworzenia wszystkiego...
Chyba łatwiej zrobić dwuklik na wierszu, z którego chcesz kopiować. Równocześnie uruchamiasz makro i wskazujesz wiersz. Możesz też się upewnić, czy to właściwy wiersz. Oczywiście można też wstawić tam InputBox, tylko wtedy jak chcesz uruchamiać to makro? Jeśli chodzi o moją propozycję, to komórki docelowe wypisujesz po kolei jako adresy obiektu Range:...
Dodać nowy moduł w VB, wkleić do niego kod i uruchomić. W celu ułatwienia użytkowania, można dodać przycisk uruchamiający makro do wstążki - nie posiadam wersji 2016 ale dla 2010 to należy zrobić tak: Opcje programu Outlook -> Dostosowywanie wstążki. W oknie po lewej - Wybierz polecenia z: Makra (zaznaczasz właściwą procedurę). W oknie po prawej...
Nigdy nie słyszałem o takiej stronce bo i po co robić polskie napisy bez polskich liter? (chyba dla ludzi w twojej sytuacji). Za to polecam polskie napisy i np Worda. Robisz makro, które zmienia ci wszystkie polskie znaki na odpowiadające im znaki ISO, odpalasz plik z napisami, uruchamiasz makro i w parę sekund masz napisy przerobione.
Sprobuj[syntax=vb]For ark = 4 To 36 For wrs = 26 To 36 Sheets(ark).Rows(wrs).Hidden = Sheets(ark).Cells(wrs, 3) = 0 Next Next [/syntax]
Dziwne - u mnie kilkukrotne naciśnięcie Alt + F4 działa, czasem za pierwszym razem nie łapie. Sprawdzałeś?
1. Zmiana koloru nie jest zdarzeniem, więc musisz uruchamiać makro (w ostateczności można wykorzystać 'SelectionChange', ale ma to w tej sytuacji swoje minusy) Następna sprawa, to skąd Excel "ma wiedzieć" jaki kolor był przed zmianą? Potrzebna byłaby tabelka w dodatkowym arkuszu kolor>zakres obszaru wydruku. 2. Myślę, że wystarczy zwykłe JEŻELI(Arkusz1!suma>160;Arkusz1!suma-160...
aby po zmianie wartości w komórce B11 recznie? With Range("B39") Gdzie End With ?
Jest prosty sposób na uruchomienie makra jeśli aktywowana będzie określona komórka. Powiedzmy, że zmieniasz dane w A1. Jeżeli posługujesz się klawiaturą to następna aktywowana komórka będzie A2 lub B1. Przykład uruchomienia makra dla B1 Private Sub Worksheet_SelectionChange(ByVal Target As Range) wiersz = 1 kolumna = 2 If Target.Row = wiersz...
Trzeba było takie informacje: Z programu wagowego eksportowany jest cały pomiar (wszystkie ważenia) do excela Każde takie rozliczenie chcę robić w następnym skoroszycie. przedstawić we wcześniejszych postach :cunning: Jeśli te tabelki mają taką strukturę jak przedstawiłeś w załączonym pliku :!: to nie ma żadnego problemu :D Wprowadź sobie to makro do...
Witaj. Nie piszesz, w jaki sposób chcesz tego inputboxa użyć, więc nie wiadomo, dlaczego nie działa. Najlepiej zamieść przykładowy arkusz, będzie też wtedy wiadomo, w jaki sposób są wpisywane dane do tej tablicy.
.. Stworzyłem proste makro, które sprawdza czy komórka X jest pusta, jeżeli TAK to czyści komórkę Y za pomocą Clear.Contents. Procedura wywoływana jest po przeliczeniu arkusza: Worksheet_Calculate.. Makro może i jest proste, ale powiązałeś je w arkuszu w tak zagmatwany sposób, że jego wykonanie się zapętla. Twoje makro wykonując się, powoduje wykonanie...
Był błąd - chyba go poprawiłem. Zmieniłem trochę całość - eksportowałem jako moduł bas - dołącz do swojego projektu i użyj. Również zamieszczam arkusz testowy z importowanym modułem. Użycie jest proste - zaznaczasz zakres komórek, na którym chcesz przeprowadzić zmiany i w menu Narzędzia -> Makro -> Makra uruchamiasz jedyne makro, jakie jest - zrób_gwiazdki....
uruchamianie makra makrem uruchamianie makra otwierania automatyczne uruchamianie makra
rysowanie wykresu karta pamięci uszkodzona bosch szlifierka oscylacyjny
soldano atomic ferguson d890hx
Schemat elektryczny ładowarki Parkside PLGK 12 A3 Vestel 17MB170 VES500QNDT-2D-N41 Firmware Recovery for S/N 8522002 000129