Spróbuj wyłączyć odświeżanie: Application.ScreenUpdating=False za linią z Windows(rap).Activate. Włącz na końcu =True Jeśli nie zadziała można przerobić kod tak, żeby nie było potrzeby "biegania" po arkuszach (bez activate, select, etc)... Np fragment z sortowaniem (nie odwołuj się do okna instancji, tylko do konkretów). W przykładzie przypisanie i...
Jak zrobisz już te różne makra, które się mają uruchamiać warunkowo to wrzuć tutaj. Pointeresuj się trochę edytorem makr i językiem VBA. Formularze to nie tylko przyciski którym się przypisuje nagrane makra. Makra są zapisywane w języku VBA. Można je pisać samodzielnie bez nagrywania, lub nagrywać i dowolnie edytować (np. wstawić jakieś warunki "if")....
Zobacz gdzie co jest na przykładzie.
Wykorzystaj zdarzenie Worksheet_Activate . Najprościej[syntax=vb]Private Sub Worksheet_Activate() Call CommandButton1_Click End Sub[/syntax]
Set Wb=Open(Fn) ==> Set Wb = Workbooks.Open("D:\abc\" & Fn) Zbyt dosłownie potraktowałeś ogólny zapis o otwarciu pliku.
Zwykle: [syntax=vb]Call nazwamakra[/syntax]
Bardzo dobrym rozwiązaniem jest PDF Creator . Darmowy, nie zostawia w dokumencie "kwiatków". Działa jako wirtualna drukarka. [url=http://sourceforge.net/projects/pdf... Creator
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...
Należy oprogramować zdarzenie SheetChange skoroszytu. Wykrywa ono równocześnie, w którym arkuszu i w której komórce nastąpiła zmiana. Kod: [syntax=text]Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If Target.Address <> "$F$6" Then Exit Sub If IsNumeric(Target) And Target > 0 Then Sh.Tab.Color = vbRed Else Sh.Tab.Color...
uruchomi makro o nazwie "test1" wpisane w ThisWorkbook ThisWorkbook, to A, czy B? Jeżeli B, to: [syntax=vbscript]Sub MojeMakro() InnaLokalizacja = "\\Serwer\PlikiExcela\" Plik = "B.xlsm" Workbooks.Open Filename:=InnaLokalizacja & Plik Sheets(Sheets.Count).Select Run "'" & Plik & "'!" & "ThisWorkbook.Test1" End Sub [/syntax]
Zamiast Private Sub , zostaw "zwykłe" Sub, a na samej górze wpisz Option Private Module Wszystkie makra w tym module "znikną" z listy.
Skoro program przestaje odpowiadać po uruchomieniu tzn że makro jest źle napisane - nie ważne że dzieje się to tylko czasami.
Z uwagi na brak obsługi przerwań w makro Excela jak chcesz uruchomić makro na jakiś czas to użyj Wait (jest opisany w pomocy). Wtedy możesz uruchomić makro na np. 2 minuty. Możesz spróbować też z z komendą Run (wywołanie innego makra).
Czy to ma być coś takiego jak w załączniku? Uruchom makro Suma1000. Oczywiście dodatki musisz sobie dopisać. :cry:
Prosta instrukcja warunkowa: [syntax=vbscript] Sub Test If Worksheets("chłodnia").Range("l10")="OK" Then Call drukuj_klient ' tutaj nazwa procedury, którą chcesz wykonać Else Exit sub ' tutaj ew. coś co miało by się wykonać, jeśli nie będzie oczekiwanej wartości End if End Sub [/syntax] andie
Przejdź do arkusza i uruchomić makro (powinien być w ogólnom modulu)
Jak można zrobić, żeby przed uruchomieniem tej procedury makro sprawdziło czy w tabeli ("A3:D&) nie ma już danych osoby wstawionej do komórek Przykładowo - sprawdzanie nazwiska (w praktyce trzeba by zastosować rozbudowany słownik bo mogą występować pracownicy o tym samym nazwisku :D ) można zrobić poprzez małą modyfikację Twojego kodu :spoko: [syntax=vbscript]...
Dopisz przed tą linią: debug.print .Shapes(.Cells(w, 1).Text).name naciśnij Ctrl+g uruchom makro. I co tam wypisało?
sklep1(;;zmienna3) 1. Wyedytuj stary wpis z średnikami. 2. Uruchom makro. 3. Otrzymasz nowy wpis
Mi jednak chodzi o to by makro się samo uruchamiało. Tu masz makro, które monitoruje określony zakres pod kątem zmiany. Dodaj do tego kod swojego makra sortującego. [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) Dim KeyCells As Range ' The variable KeyCells contains the cells that will ' cause an alert when they are changed. Set...
Odnalazłem odpowiedź na pytanie które zadałem, postanowiłem więc bez zakładania nowego tematu opisać ją tutaj. Potrzebujemy darmowego programu [url=http://www.replsoft.com/downloads.h... File Utilities Oraz dodatek Batch Replacer for MS Word [url=http://www.replsoft.com/brformsword... Replacer for MS Word Po zainstalowaniu programu (...
Możesz wpisać w jednej komórce =dziś() , w drugiej datę docelową. Różnica większa od zera pozwala uruchomić makro (warunek wewnątrz makra). A pewnie i do makra wciągniesz bezpośrednio tą metodę bez używania komórek.
Zrezygnuj w takim razie z MsgBox i przygotuj sobie stosowany formularz(yk). W Initalize uruchom makro z opóźnieniem (Application.Ontime), w którym będzie jedna linijka zamykająca formularz(yk) + On Error Resume Next, gdyby zamknięcie nastąpiło przed czasem...
Dodano po 4 W przypadku edycji kodu makra, zmienne globalne są anulowane. Następnie uruchom makro Workbook_Open
Próbuje kolega zrobić coś w sposób który zupełnie nie pasuje do zaistniałego problemu/sytuacji. Jak zrozumiałem z tego skomplikowanego wywodu, to chodzi o to, żeby sprawdzać czy jakaś konkretna aplikacja jest uruchomiona i jeżeli nie, to uruchomić ja, zalogować się do niej itd. Jaki sens ma sprawdzenie jakichkolwiek pixel-i? A co będzie, jak się otworzy...
Dołóż pętlę sprawdzającą przed tą kopiującą. Jeśli jest nieprawidłowo, przerwij. Np [syntax=vbscript]Dim b As Boolean For wrs = 9 To 49 If WorksheetFunction.Sum(Range("BG" & wrs & ":BJ" & wrs)) > 0 And Range("BK" & wrs) = "" Then b = True Exit For End If Next If b Then MsgBox "proszę uzupełnić dane w wierszu " & wrs, vbExclamation, "kopiowanie anulowane"...
W związku z pytaniem na pw. Utworzyłem sobie plik w c:\ o nazwie plik1.xlsx, w którym wpisałem tekst w komórki Od B34 w prawo. Następnie uruchomiłem makro (c:\ w InputBox'ie). Dane pięknie skopiowały się do "Arkusz2", komunikat: "skopiowano z 1 pliku". Możliwe przyczyny błędu: -podajesz złą lokalizację -lokalizacja jest dobra ale nie ma tam plików -nazwy...
To dodaj do tego makro, które jest uruchamiane za pomocą klawisza F8 na klawiaturze ze złączem USB, która nie jest podłączona do tego komputera. Już żadne pytanie na Elektrodzie mnie nie zadziwi. A mnie już nie zdziwi żadna odpowiedź pseudo "pomagiera"... BTW z propozycji Kolegi JRV sam chętnie skorzystam bo nawet nie wiedziałem, że jest taka możliwość...
Dlaczego nie użyjesz harmonogramu zadań?
Cześć. Mam nagrane makro na sortowanie tabeli ale chciałbym aby ono się automatycznie uruchamiało po wstawieniu daty (lub po prostu wypełnieniem komórki) w kolumnie C (obojętnie w którym wierszu). Czy ktoś byłby tak miły i napisałby mi taki kod? Przykładowy plik w załączniku. Makro które chcę aby się automatycznie uruchamiało ma nazwę sortTabeliDoZrobienia...
Proszę bardzo. Zmieniać kody będzie we wszystkich arkuszach tam gdzie zaznaczysz cos do zmiany i uruchomisz makro. Sub Makro1() For x = 1 To 18 Selection.Replace What:=Worksheets("kody"... + 1, 1).Value, Replacement:=Worksheets("ko... + 1, 2).Value, LookAt:=xlPart,...
A może szukam niemożliwego? czy w ogóle makrem mogę uruchomić sygnalizator zewnętrzny?
Jeżeli jest to związane z Twoim poprzednim tematem, to jest to do zrobienia. Można zrobić procedurę, która przetworzy dane przy okazji importu do Excela. Będzie trochę kombinacji... O wiele prościej będzie przeznaczyć dodatkowy arkusz lub osobny skoroszyt, do którego zaimportujesz dane z Outlooka, po czym w Excelu uruchomisz makro, które wstawi dane...
Witam! Mam taki problem,chciałbym aby takie makro Sub czas1() ' ' czas1 Makro ' Makro zarejestrowane 2009-02-05, ' ' Klawisz skrótu: Ctrl+c ' Range("G10004:H10004"&... Selection.Copy Range("G10006").Select Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _ False,...
spróbuj może z funkcją "=IF()" zamiast "jeżeli". Jeżeli, to patologiczny wynalazek Microsoftu.
Która konkretnie komórka (co zawiera) jest zmieniana, że powoduje wzbudzenie tego zdarzenia? Na pewno $AY$12 bo inaczej nie zadziałało by change event, może jest to powiązane z zakresem który ma obecnie zaznaczony czyli I14:I18 i w AY12 pojawia się 0 lub 1 a to z kolei chce uruchomić dane makro.
Wygląda dobrze. Czy wyzwalacz nawet nie uruchamia Excela, czy też tylko mejla nie wysyła? P.S. Mejl trafia do skrzynki nadawczej. Zostanie wysłany po uruchomieniu Outlooka.
Mam pytanie: czy jest możliwe w Excelu 2000 automatyczne uruchomienie makra po wpisaniu dowolnej wartości do danej komórki?
Takiego zdarzenia nie ma, ale można się pobawić zdarzeniem SelectionChange np. przy kliknięciu w nagłówek.
Przecież excel prowadzi za rączkę przy tworzeniu wykresów....... Klikasz odpowiednią ikonkę i dalej. A jak chcesz z tego zrobić makro to przedtem uruchom procedurę : zarejestruj nowe makro. Pozdr.J.
Formułę można wpisać bezpośrednio do całego zakresu: [syntax=vb]Range("K342:O773").Formula = "=VLOOKUP(RC[8],'Próby'!C1:C8,2,0)"[/syn...
Uruchom makro i wybierz Makro1 / lub podepnij pod przycisk. Ja tylko wtrące że można prościej napisać to makro (zostawiając pomysł) [syntax=vb]Sub Makro1() Dim maxIndex, x, y As Integer maxIndex = Cells(ActiveSheet.Rows.Count, 2).End(xlUp).Row For x = 1 To maxIndex For y = 1 To maxIndex If Abs(Cells(x, 2).Value + Cells(y, 2)) < 0.01 Then Cells(x,...
podaje 0 a powinno 10 Dwie komórki 8 + 2 dalej podaje 0
[syntax=vbscript]Sub PDFy() s = "C:\PlikiPDF\" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=s & "Excel.pdf" Set Wrd = CreateObject("Word.Application") a = s & "Excel.pdf " For x = 1 To 2 Set Doc = Wrd.Documents.Open(s & x & ".docx") p = s & "Doc" & x & ".pdf" Doc.SaveAs p, 17 a = a & " " & p Doc.Close Next Wrd.Quit q = Shell(s & "pdftk.exe...
Nie wiem jakie makro pobrałeś (jest ich wiele i różne zasady konwersji z postaci cyfrowej na słowną). Ja umieszczam plik z makrem (np. Słownie.xls) w katalogu ...\Microsoft Office\Office\XLStart i wraz ze startem excela mam dostępną funkcję "Słownie" - jako funkcja "Użytkownika" (ostatnia na wybieranej kategorii funkcji). http://obrazki.elektroda.net/20_11552040...
Jednak potrzebuje kod napisany pod VBA :cunning: Jeśli dane masz posortowane wg kolumny pomieszczenia :!: to możesz uruchomić makro wyliczające sumy :please: [syntax=vbscript]Public Sub Sumujwgpomieszczen() i = 11 While Not IsEmpty(Cells(i, 2)) Cells(i, 9).FormulaR1C1 = "=COUNTIF(R11C2:RC[-7],RC[-7])" Cells(i, 8).FormulaR1C1 = _ "=IF(R[1]C[1]=1,SUMPRODUCT(--(R11C2:RC[-...
Trochę Cię okłamałem To nie kłam na przyszłość. Mama nie uczyła?;) A w takiej sytuacji umieść arkusz 'Zbiorczy', jako ostatni na liście arkuszy. P.S. Próbowałeś uruchomić to makro? Zapewne nie...
...czy ten kod aktywuje się automatycznie z uruchomieniem pliku w którym to makro będzie?... To zależy od Ciebie. Ja zrobiłbym to na zasadzie umieszczenia tych trzech procedur w module i odwołań do nich w ThisWorkbook : [syntax=vb]Private Sub Workbook_BeforeClose(Cancel As Boolean) ResetBar End Sub Private Sub Workbook_Open() BlokujWytnijWklej End...
Zrobiłem nagrałem makro które automatycznie odświeża 3 tabele (co 5 minut). Nie do końca. Makro "start" odświeża 3 tabele i planuje jednorazowe uruchomienie makra "button3". Żeby działało co zadany czas musisz wywołać procedurę "start" w "button3". Co może być nie tak? makro czasem działa, czasem nie. Wpisz jawnie nazwę arkusza, w którym znajduje się...
Próbujesz w OpenOffice uruchomić makro napisane w Excelu? Nie będzie działać. Trzeba przepisać. Mnóstwo informacji znajdziesz w Internecie. Tu przykład makra wydruku z zapisaniem "oryginał/kopia": http://obrazki.elektroda.pl/5534132900_1... Generalnie nie jest to trudne. Trzeba "złapać". Zakres C7:C10 aktywnego arkusza w VBA zapisujesz...
Najbardziej prawdopodobna przyczyna to makro jakiejś aplikacji uruchomionej w tle. Po prostu ta aplikacja "zjada" Ctrl W.
Załączam przykładowe rozwiązanie z użyciem makr. Raczej jako ciekawostkę. Koder ze mnie marny, ale działa jak chciałem. Plusy: - sprawdzanie poprawności nazwy pokoju - sprawdzanie, czy przydzielona liczba osób zmieści się w pokoju - można przydzielić dwa nazwiska do jednego pokoju - makro działa na dowolnej liczbie pokoi zdefiniowanej w arkuszu (max...
Wystarczy w module wpisać Sub cyk() Calculate Application.OnTime Now + TimeValue("00:00:01&quo... "cyk" End Sub w jakiejkolwiek komórce arkusza wpisać =teraz() (sformatować żeby było widać sekundy) i uruchomić makro cyk a zacznie pokazywać "na bieżąco" bieżący czas A czas w różnych miastach: Dodaj/odejmij do komórki...
A jaki sposób mogę "masowo" stworzyć chekboxa dla 1200 pozycji Możesz spróbować tak: zaznaczyć odpowiedni zakres w kolumnie dla checkboxów, a następnie uruchomić makro: [syntax=vbscript]Sub InsertCheckBoxes() Dim Rng As Range Dim WorkRng As Range Dim Ws As Worksheet On Error Resume Next xTitleId = "Excel" Set WorkRng = Application.Selection Set WorkRng...
Moim zdaniem przyczyną problemu jest brak kwalifikowanego adresu komórki w funkcji umieszczonej w module ogólnym. Range("Q5") odwołuje się do komórki Q5 w arkuszu aktywnym. Jeśli przejdziemy do innego arkusza niż "pacjent", a funkcja się przeliczy, to będzie chciała pobrać dane z komórki Q5 w aktualnie aktywnym arkuszu, a tam ich nie znajdzie, więc...
Zamknij pętlę "For Z" w pętli "For i" wg schematu If i <= Wiersz - 1 Then For i = 1 To 6 For Z = 1 To Wiersz - i For x = 3 To Kolumna ... Next x Next Z ThisWorkbook.Worksheets(3).Cells... 3) = i ThisWorkbook.Worksheets(3).Cells... 4) = "od 1 - " & i + 1 Next i
1. Otwórz Excela. 2. Plik/otwórz. 3. Trzymaj shift i naciśnij 'otwórz'.
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...
Witam, poszukuje kodu który powodował by że makro może zostać uruchomione tylko przez wskazanych użytkowników Z gory dziękuje za pomoc
Otwórz dokument w MS Word. Naciśnij Alt + F11, aby otworzyć edytor VBA. W edytorze kliknij Wstaw → Moduł. Skopiuj poniższy kod makra do edytora. Jak działa makro: Przeszukuje cały dokument znak po znaku. Kiedy napotka znak kończący zdanie (. ! ? lub -), sprawdza, czy za nim występuje spacja i mała litera. Jeśli tak, zamienia małą literę na wielką. Po...
Przyciski muszą być. Proponuję ponowną instalację programu DloadX. Ewentualnie próba uruchomienia z innego komputera. Dodano po 49 Ok, zasugerowałem się tym, że mowa o nowym ETHM-1 Plus (a nie o starym ETHM-1). W starym ETHM-1 (bez plusa) faktycznie przycisków (odczyt/zapis) nie ma, natomiast makra można wyeksportować i później w apce mobilnej zaimportować...
A czy można i jak zapisać aby działało w całej kolumnie? W kolumnie, wierszu, zakresie, poza zakresem. Jak sobie życzysz. Po wpisaniu 'Target' i postawieniu kropki w edytowanym kodzie, otworzy się lista rozwijalna z własnościami i metodami. M.in. Address, Column, Range, Row, itp. W niemal każdym przypadku będzie nieco inna składnia zapisu. Można o...
a proszę zerknąć na screena co tak naprawdę kod zrobił Myślałem że to zamierzone (bo nie znam całego kodu) - choć jak się teraz okazuje nieświadomie. (więcej szczęścia :) ) Użyłeś odwołań względnych - poza tym formatowanie warunkowe ma pewne mankamenty jeżeli chodzi o adresowanie bo odwołuje się do zaznaczonej wcześniej komórki (a w makro nie ma żadnego...
jak napisać program obliczający sumę 1+1/2 + 1/3 +1/4.... +1/n dla n podanego w polu edycyjnym , wynik pokaż w msg box lub label . Program ma być napisany w języku VBA Oczywiście, poniżej znajdziesz przykładowy kod napisany w VBA, który oblicza sumę ciągu harmonijnego 1 + 1/2 + 1/3 + ... + 1/n, gdzie n jest liczbą podaną przez użytkownika. Kod ten...
Da się zrobić przycisk który uruchomi makro. Pytanie co konkretnie ma robić makro?
ws to zmienna tymczasowa, w której pętla for each przechowuje Worksheet z kolekcji na którym akurat jest. To makro działa na arkuszach workbooka, na którym zostało uruchomione (ThisWorkbook.Worksheets), jego nazwa nie ma nic do rzeczy...
Witam Założyłem, że linie to zdania (paragraph) - w przypadku gdyby zdanie zawierało kilka linii zmiana kolejności linii zmieni szyk zdania. W moim przypadku zmieni się kolejność zdań. Makro uruchamia się przez alt+X. Zaznaczany jest cały zapisany tekst i losowo zmieniana jest kolejność zdań w tekście. Sub Makro1() ' ' Makro1 Makro ' Makro zapisane...
To teraz uruchom makro normalnie. Plik A ma być zamknięty.
Tak, w momencie przekształcania plik źródłowy jest otwarty. Po uruchomieniu makro widać, że przechodzi do arkuszy lecz nie zmienia formuły na wartość (kiedy wstawiłem do kodu {ENTER} o którym wspomniałeś to komórki przeskakiwały w dół tylko na tym jednym arkuszu gdzie znajdował się przycisk do makro)
Dzięki za poprawną formę kodu. Oczywiście na początku u mnie nie zadziałał, ale doszedłem w końcu w czym jest problem. Wraz z uruchomieniem makro, przed kopią danych do innego skoroszytu, były usuwane wszystkie odstępy przy użyciu Trim, co skutkowało tym że dane przyjmowały postać tekstu. Teraz zostało mi dostosować swoje makro pod Twój kod z pętlą.
No to już tylko makro. Np takie Sub Wpisz_Jest() Columns("A:A").Sel... On Error Resume Next wiersz = Selection.Find(What:=Range(&... After:=ActiveCell, LookAt:=xlWhole).Row Cells(wiersz, 3) = "Jest" Cells(1, 2).Select End Sub Możesz je umieścić w kodzie arkusza...
Co może być tego przyczyną? Plik jest otwarty. Zamknij go, a jeżeli to plik w LAN, to powiadom użytkowników, że mają zaprzestać edycji tych plików. Zrób tak: - uruchom ponownie komputer, - uruchom makro ... i czekaj. Zgłaszasz błędy, a nie mówisz, co robiłeś, że one wystąpiły.
Przesyłam plik.Aktywacja arkusza "ZALEGŁOŚCI" powinna uruchomić makro
Harmonogram zadań>zaplanuj uruchomienie pliku>makro w Thisworkbook.Open W przypadku Application.OnTime plik musi być otwarty 4 lutego 2014 przed godziną 14:00 (kto ci o tym przypomni?).
Uruchom rejestrację makr Zrób co chcesz aby zrobiło makro Formułę musisz wpisać do komórki (a nie wklejać) Zatrzymać rejestrację i wejść w edycję makra Tam zobaczysz kod i formułę w takiej postaci jak chce VBA Dostosować makr do swoich potrzeb I tyle Mam nadzieję iż teraz jest to jasne.
tylko dlaczego (7)? Czy jest jakiś spis tych pól w zależności od indeksu. Liczbę właściwości zliczysz przez .Properties.Count . Nas interesuje tylko kilka. Otwórz nowy skoroszyt, uruchom poniższe makro (umieszczone w module). Następnie zmień nazwę arkusza2, zmień kolejność na pasku, i uruchom ponownie. [syntax=vb]Sub PropId() With ThisWorkbook.VBProject.VBComponents("Ark...
Po prostu do dokumentu z istniejącymi już przypisami : 1. dodaj nowe makro, 2. wejdź w jego edycję, 3. wklej ten kod, zapisz dokument. [syntax=vb]Sub wyswietlaj() Dim oDoc As Document Dim ftn As Footnote Set oDoc = ActiveDocument For Each ftn In ActiveDocument.Footnotes oDoc.Range.InsertAfter (ftn.Range.Text) oDoc.Range.InsertAfter (vbCrLf) Next End...
To obróć działanie kodu (zaznacz ile potrzebujesz i uruchom makro) [syntax=vbscript]Range("A1").AutoFill Destination:=Selection, Type:=xlFillFormats[/syntax]
Witam, Proszę Was o pomoc w napisaniu makra, które otwierałoby po kolei wszystkie pliki z danego folderu i uruchamiało stworzone wcześniej makro. Wyobrażam sobie to tak, że w folderze z plikami do przerobienia znajduje się jakiś plik, który należy uruchomić i w nim odpalić makro, które: 1. otwiera każdy plik po kolei z folderu 2. uruchamia moje makro...
Plik "D:\Grafiki.xls" ma juz byc na dysku G przed uruchomieniem makro
Witam, Czy istnieje możliwość, aby zrobić makro, które uruchamia makro o konkretnej godzinie i konkretnego dnia? Przykładowo: Wpisuję w komórkę A1 - 31.01.2019 15:30 I aby to makro uruchomiło inne makro (przykładowo o nazwie "makro1" dokładnie o tej porze bez klikania, itd? Dodatkowo: jeżeli plik nie byłby włączony o 15:30 - to makro (przy pierwszym...
No nie mam już głowy. Powyższe oczywiście działa skrypt odpala plik i czeka 15s zanim uruchomi makro. Niestety nie wiem dlaczego plik uruchomiony w ten sposób przez skrypt nie chce się aktualizować, nie łączy się z bazą a ten sam plik uruchomiony kilka chwil później ręcznie robi to bez problemu.
Jest funkcja rejestrowania i odtwarzania makra. Uruchom rejestrowanie makra i wykonaj 2-3 cykle powtarzających się operacji, potem możesz makro edytować w Visual Basicu. W kodzie powinieneś zauważyć pewne prawidłowości, wtedy zamienisz procedurę na pętle z tyloma iteracjami, ile potrzeba do przetworzenia całości danych.
Witam, A nie jest tu istotne, że za każdym razem bez względu na porę dnia kiedy uruchomimy makro, zawsze będzie się wpisywać w arkuszu ' log ' bieżący stempel daty, nawet jeśli już raz coś w komórce zaistniało ? Jeśli dajmy na to, uruchomię makro w nocy, to pojawi się "obecne, nocne" "teraz" (Now()), jeśli potem po paru godzinach, rano, uruchomię makro...
:) Nie to nie zadanie szkolne potrzebuje tego dla swojego arkusza nad którym pracuje i potrzebne mi takie rozwiązanie na przyszłość. W pytaniu zawarłem jedynie przykład, który mógłbym we własnym zakresie rozbudować, ale mam problem z pobraniem numeru wiersza dokładnie z kontrolki na którą klikam aby uruchomić makro. Jestem bardzo zielony w temacie....
Jest tam makro. Otwórz pusty arkusz i uruchom makro DwaDzieścia :)
Witam. Proszę o pomoc. Potrzebne mi jest makro w Excelu, które będzie uruchamiać się po zmianie zawartości komórki, czyli jak ktoś coś wpisze i zatwierdzi enterem to ma się uruchomić makro. Samo makro ma działać w następujący sposób, że po zmianie zawartości w A1/Arkusz1, zostanie uruchomione drukowanie tej komórki, a jednocześnie jej zawartość zostanie...
Kreska jest błędem, natomiast makro działa jak należy. Makro jest uruchamiane przez przycisk, który należy dodać do arkusza lub przez menu Narzędzia.Makro.Makro.. Uruchom.
Zaproponować dodatkowy arkusz do dopasowania adresów komórek i przycisk Uruchom makro. Cos takiego:
Jeśli dobrze zrozumiałam - to chodzi o uruchomienie makra po kliknięciu w dowolną komórkę w kolumnie A? To może wystarczy to: [syntax=vbscript]Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.column= 1 Then Application.Run "Makro1" End If End Sub[/syntax] Ten kod uruchomi makro. Czy samo Makro1 powinno być przerobione? To zależy...
(at)maciejgonet Zauważyłem teraz, że dostaję ten sam błąd (1004 undo of object) podczas wklejania komórki z excela. Po tym komunikacie makro przestaje działać dopóki nie uruchomię jeszcze raz excela.
Witam, mam taki drobny problem (nie jestem wprawny w VBA ale od czasu do czasu coś tam sobie próbuję usprawnić), więc liczę na Waszą podpowiedź. Dajmy na to, że w kolumnie A (w wierszach od 5 do 10) mam nazwy makr. Chciałbym aby z poziomu jakiegoś innego makra: 1. sprawdzić który wiersz jest aktywny (to nie jest dla mnie problemem) 2. Jeśli aktywny...
Zeszyt rozumiany jako inny plik? Tu już trzeba wyjaśnic dodatkową nieścisłość. Czy makro ma wcześniej otworzyć ten zeszyt czy jest już (i będzie zawsze przy próbie uruchomienia makra) otawrty? Na marginesie Proponuje ci pouczyć się samamu. excel ma coś takiego jak nagrywanie makr. Włącz nagrywanie Zrób to co chcesz zrobić z plikiem, arkuszem itd wyłącz...
Dzięki wszystkim ale już sobie poradziłem, skorzystałem z nagrywania makr :) i później zapisałem to do "przycisku" i teraz otwierając dokument który ma stron np. 40 a ja ustawie się na stronie 35 i uruchomię makro to drukuje mi tylko stronę na której aktualnie jestem czyli 35 Pozdrawiam Jarek
Jeśli chodzi o procedurę zdarzeniową, to istnieje pewien haczyk. Instrukcja UCase powoduje zmianę. Należałoby najpierw sprawdzić kod znaku i jeśli jest to litera mała, wyłączyć zdarzenia i dokonać zmiany, zastosować licznik lub jeszcze inne rozwiązanie. W innym przypadku Excel zawiesi się nie mogąc skończyć procedury. Zmiana uruchomi makro, które dokona...
Uruchom makro Private Sub Workbook_Open, lub zamknij plik i otwórz ponownie. Zatrzymanie ręczne makra (przez przycisk resetuj) zeruje wartość zmiennej.
Dzięki PRL za pomoc! Już jest prawie dobrze. Jest tylko jeszcze jeden mankament. Otóż jeżeli np. w wierszu G2 mam wartość 5 to makro kopiuje wiersz 2 pięć razy a powinno kopiować 4 razy. Ilość skopiowanych wierszy razem z tym, który pozostaje powinna być taka jak wartość w komórce w kolumnie G jeszcze przed uruchomieniem makra. Czyli suma wierszy po...
Mógłbyś proszę to sprawdzić? Niestety nie mogę sprawdzić Twojego pliku :cry: bo go nie mam :D Otwórz oba pliki, uruchom makro i ... jeśli masz takie same pliki jakie zamieściłeś na forum :?: to sprawdź co się dzieje w pliku docelowym w wierszu 39 :please: i niżej :?:
Tak, nagrałam to makro w tym pliku, w którym mi wywala błąd w kodzie I jak uruchomisz to makro w tym pliku na serwerze to wszystko ok? (to podstaw pod te makro zmienne i zobacz)
lesławek - tak się nie da. Sam spróbuj - ale skopiuj liczbę a nie komórkę. W załączeniu proste makro. Uruchomisz skrótem klawiszowym ctrl+m (można to zmienić) Makro odejmuje od komórki z lewej coś co jest w schowku i wprowadza to formułą w zaznaczonej komórce. [syntax=vb]Sub odejmij_schowek() Dim mem As DataObject On Error Resume Next Set mem = New...
uruchom makro formułą makro uruchom skrypt uruchom chkdsk
demontaż blaupunkt automapa windows szaleć touchpad
wykrywacz metali schemat odbiornik pcf801
Wymiana żarówki w Aprilia RS 50 2003 - krok po kroku Hulajnoga elektryczna - wyświetlacz zgasł, akumulator naładowany, co sprawdzić?