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...
Zamiast Private Sub , zostaw "zwykłe" Sub, a na samej górze wpisz Option Private Module Wszystkie makra w tym module "znikną" z listy.
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).
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]
Przejdź do arkusza i uruchomić makro (powinien być w ogólnom modulu)
Czy to ma być coś takiego jak w załączniku? Uruchom makro Suma1000. Oczywiście dodatki musisz sobie dopisać. :cry:
Skoro program przestaje odpowiadać po uruchomieniu tzn że makro jest źle napisane - nie ważne że dzieje się to tylko czasami.
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
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.
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 (...
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...
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
Dodano po 4 W przypadku edycji kodu makra, zmienne globalne są anulowane. Następnie uruchom makro Workbook_Open
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]...
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...
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...
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ń?
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...
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...
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"...
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.
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,...
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,...
Takiego zdarzenia nie ma, ale można się pobawić zdarzeniem SelectionChange np. przy kliknięciu w nagłówek.
A może szukam niemożliwego? czy w ogóle makrem mogę uruchomić sygnalizator zewnętrzny?
Mam pytanie: czy jest możliwe w Excelu 2000 automatyczne uruchomienie makra po wpisaniu dowolnej wartości do danej komórki?
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.
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...
[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...
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[-...
podaje 0 a powinno 10 Dwie komórki 8 + 2 dalej podaje 0
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...
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...
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,...
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...
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...
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.
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
Najbardziej prawdopodobna przyczyna to makro jakiejś aplikacji uruchomionej w tle. Po prostu ta aplikacja "zjada" Ctrl W.
...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...
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...
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. Zrobiłem nagrałem makro które automatycznie odświeża 3 tabele (co 5 minut). Chciałem dodać możliwość włączenia i wyłączenia na podstawie wartości komórki. Wynik: Sub start() If (Range("AC11") = "TAK") Then Application.OnTime Now + TimeValue("00:05:00&quo... "button3"...
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...
To teraz uruchom makro normalnie. Plik A ma być zamknięty.
Da się zrobić przycisk który uruchomi makro. Pytanie co konkretnie ma robić makro?
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...
Przesyłam plik.Aktywacja arkusza "ZALEGŁOŚCI" powinna uruchomić makro
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)
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.
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...
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...
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
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ą.
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...
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.
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...
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...
:) 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....
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...
To obróć działanie kodu (zaznacz ile potrzebujesz i uruchom makro) [syntax=vbscript]Range("A1").AutoFill Destination:=Selection, Type:=xlFillFormats[/syntax]
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...
Jest tam makro. Otwórz pusty arkusz i uruchom makro DwaDzieścia :)
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, 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...
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...
Plik "D:\Grafiki.xls" ma juz byc na dysku G przed uruchomieniem makro
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.
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.
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...
Zaproponować dodatkowy arkusz do dopasowania adresów komórek i przycisk Uruchom makro. Cos takiego:
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...
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...
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...
Witam, Czy ktoś zetknął się z sytuacją na iOS, że żadne makra z Integry się nie pokazują do wyboru w aplikacji "Skróty"? Mam iOS 17.1 Integra Control 6.0.2 Integra 64 1.21 ETHM-PluS 2.09 Teoretycznie wszystkie wymagania spełniam. W aplikacji Integra Control mam kilka makr uzbrajania i rozbrajania. Jednak w aplikacji Skróty gdy wybiorę "Integra - Uruchom...
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
Uruchom makro Private Sub Workbook_Open, lub zamknij plik i otwórz ponownie. Zatrzymanie ręczne makra (przez przycisk resetuj) zeruje wartość zmiennej.
W załączniku masz plik z Makrem - żeby go uruchomić musisz włączyć Makra, następnie wciśnij ctrl + Q Makro zrobione w excelu 2000 (bo takiego mam) więc mogą się pojawić problemy z kompatybilnością, wtedy ci to przepiszę na nowszą wersje, jak będę w pracy i znajdę chwilkę wolnego. Wyrzuciłem wiersze z błędną wartością w kolumnie G (było ich sporo) bo...
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.
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 :?:
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...
scalić pomijając kody Och, nie chce mi się już przerabiać (czytaj: znacznie upraszczać kodu, bo tablica w takim przypadku jest zbędna). Dołożyłem scalanie, podkreślanie i takie tam... Resztę sobie dopracuj. Makro wystarczy uruchomić z poziomu arkusza źródłowego (dla ułatwienia dałem przycisk). Na "przywitanie" dostałeś (prawie) gotowca. Ale następnym...
To "inne makro" jest uruchamiane na "żadanie", ktoś z kolegów i koleżanek musi kliknąć uruchom to "inne makro". Kwestia ile osób w danej chwili kliknie uruchom to makro, w jeden sekundzie(w danej chwili) może być ilość: 0, 1 lub 4 lub nawet 100. Nie mam na to wpływu.
Przy porannej kawie wyszło coś takiego (załącznik). Zapisz plik w folderze, tym samym gdzie "Pula.xlsx" i uruchom makro. dodano po chwili: sorry, zapomniałem załączyć plik :)
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)
makro uruchomić uruchomić makro formuła makro uruchomić skrypt
gniazdka angielskie cieknie pojemnika proszek esp8266 flashowanie
tosca303 schemat tosca303 schemat
Pralko-suszarka Beko HTV8733XS0 - podwójny sygnał dźwiękowy, pranie nie startuje Jak wyłączyć czerwone podświetlenie na laptopie HP?