Po mojemu nie zadziała, bo vb "zajęte" jest wykonywaniem pętli. Spróbuj z wywołaniem co sekundę makra "kontrolnego" i zmienną "decyzyjną". Makro 'kasowanie', to w tym przypadku po prostu skok na skróty . [syntax=vbscript]Private o As Integer Sub czekaj() o = 0 UpdateClock End Sub Sub kasowanie() o = 30 End Sub Private Sub UpdateClock() If o = 30 Then...
Niestety dalej się zapętla. A jest możliwość dla osobnego buttona? tak żeby były buttony: Start Stop 1. Niemożliwe, pewnie kod przycisku masz w innym module niż procedurę. 2. To nie jest konieczne.
Do wyboru: 1. Włącz ochronę makr, zrób porządek i wyłącz ponownie. 2. Otwórz plik z okna Excela'a, trzymając klawisz 'Schift'. 3. Otwórz za pomocą Calc'a (Open Office)
nie wysypało się po prostu zatrzymałem makro ;) (ctrl+break)
Włącz rejestrowanie makra i wykonaj z ręki wykresy. Zatrzymaj makro i przeedytuj jego kod usuwając zbędne elementy.
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.
A to o czym napisałeś - da się to przełożyć na makro? Przetestowałbym i powiedział czy o to chodzi. Da się. Wg. mnie to jest dokładnie to o co Ci chodzi. Jeżeli chcesz to zamienić na makro - włącz rejestrowanie makra, wykonaj po kolei to Co napisałem, zatrzymaj makro i podejrzyj kod. Jeżeli Ci nie wyjdzie, wieczorem jak znajdę chwilę pomogę.
Cytat z microsoftu dot. skrótów klawiszowych: [syntax=vb]Bieżąca data Zaznacz komórkę i naciśnij klawisze CTRL+; Bieżąca godzina Zaznacz komórkę i naciśnij klawisze CTRL+SHIFT+; Bieżąca data i godzina Zaznacz komórkę i naciśnij klawisze CTRL+; oraz naciśnij klawisz SPACE, a następnie klawisze CTRL+SHIFT+;[/syntax] Albo robisz to więc w sposób nr 3,...
Tu jest przykład jak bym chciał to wydrukować na drukarce mojej koleżanki z pracy: If key = 6 Then Arkusz3.PrintOut Copies:=1, ActivePrinter:="\\MAŁGOSIA\HP LaserJet 3200 Series PCL 6 na Ne06:", Collate:=True Jeżeli znasz adres XEROA5 to wpisz jak nie to wykorzystaj nagrywanie makra. Włącz "zarejestruj makro". Wybierz menu...
..a jeżeli da się to zrobić w VB to jakich komend powinienem użyć by otwierać kolejno pliki txt i zapisywać je jako nowe w formacie xls Włącz nagrywanie makra, wykonaj po kolei czynności dla jednego pliku, zatrzymaj makro, a następnie podejrzyj kod VB. Trochę mało czytelnie opisałeś swój problem i nie bardzo chce mi się wgryzać w treść pierwszego postu...
Jeszcze lepsze się u mnie jaja dzieją. Losowo z nieznanych przyczyn działające wcześniej makro wiesza się w losowych miejscach. Straciłem sporo czasu zanim się zorientowałem, że w takim przypadku pomaga jedynie RESTART KOMPUTERA. Inny numer: WORD potrafi poprawnie mi wykonywać makro, a po którejś pętli (wykonywaniu tego samego makra od nowa) np. przestaje...
Witam, Mam problem z makrem, które loguje się na stronkę "x", i za pomocą pętli wprowadza potrzebne dane z excela. W skrócie wygląda to tak: 1. wciśnij przycisk "Add" (przenosi do strony z formularzem), 2. wypełnij formularz danymi z excela 3. wciśnij przycisk "Submit" (przenosi spowrotem do stronki z przyciskiem Add) Problem mam taki, że po wciśnięciu...
Uruchom makro Private Sub Workbook_Open, lub zamknij plik i otwórz ponownie. Zatrzymanie ręczne makra (przez przycisk resetuj) zeruje wartość zmiennej.
Jeżeli tak to proponuje nagrać makro i podpiąć je pod przycisk (będzie najprościej). Włącz na wstążce zakładkę deweloper Plik-opcje-Dostosowanie wstążki-i w oknie po prawej stronie zaznaczyć Deweloper i OK Na wstążce pojawi się karta deweloper.Otwórz ją. Przejdź na twój pierwszy arkusz. Wciśnij "Zarejestruj makro" Teraz postępuj tak jak zawsze robisz...
Poproszę o sugestie... Moim zdaniem taki kod przy 1 mln rekordów jest bardzo ryzykowny :!: Jeżeli wytniesz taką kolumnę i z jakichkolwiek względów makro się zatrzyma - to tracisz te dane :cry: Bezpieczniej by było skopiować cały arkusz do drugiego arkusza i dopiero tam wykonać to makro :idea: :D
Wygląda na to że wszystko robisz dobrze. Prawdopodobnie nie masz uprawnień administratora i do zapisu bezpośrednio na dysk C, ew. to kwestia ustawienia czegoś w zabezpieczeniach Worda (widzę że to ten nowy, ja się zatrzymałem na 2007). Utwórz na nim jakiś katalog, zmień ścieżką w makro i do niego próbuj zapisać. Oczywiście nazwa pliku ma tutaj znaczenie...
1. Pokaż co już masz zrobione 2. Napisz z czym dokładnie masz problem/na czym się zatrzymałeś 3. czym jest ta "baza tłumaczeń"?
Jak wykombinować automatyczne wysyłanie wiadomości po otwarciu (Workbook_Open) przez menadżera oraz zamknięciu po wykonaniu w taki sposób żeby plik przy normalnym uruchomieniu nie wykonywał wysyłania itd Możesz zatrzymać wykonywanie makra przez otwarcie pliku z wciśniętym sziftem (lub "czarowanie" ze skryptami wtedy bez workbook open) ps Albo dodaj...
Chciałem to użyć na swoich plikach i wystąpił błąd, wyświetla mi się Run time error '5': invallid procedure call or argument, czy moze być to spowodowane tym ze przed wierszem 54 i ta całą tabela mam tekst ? To ze wywaliło błąd oznacza, że całe makro się zatrzymało?
Tu mam wrażenie że jest coś z synchronizacją pomiędzy zamykaniem pliku i kończeniem makra, tak jakby zamykanie pliku trwa a on już skończył makro i dlatego się widok nie odświeża a przycisk cały czas jest jakby wduszony - nie odciska się, i wtedy czegoś mu brakuje, szukam sposobu by je jakoś zatrzymać może jakiś pasek postępu
Załóżmy, że wykonujemy plecenie: RS_SET dyrektywa: Dodano po 3 swoją drogą może to mały offtopic ale jak zachowuje się preprocesor w przypadku takich dyrektyw: [syntax=cpp]int main() { int x=1,y=2,z=3; cout<<x<<y<<z<<"... #define y x cout<<x<<y<<z<<"... #define z y cout<<x<<y<<z<<"...
:) Zrobiłem tak jak pisałeś i do polowy wyszło jak trzeba. Zatrzymałem sie na tym że mam przekopiować makro od Ciebie. Nie mam pojęcia zielonego jak to zrobić? Jk je znaleźć? Jak przenieść??
No ale czy monostabilny można wyłączyć drugim impulsem (tak jak bistabilny) przed końcem czasu działania? - Z klawiatury można (sterowanie->dane wyjście->dowolny klawisz numeryczny). - Z wejścia o typie ""Wył. grupę wyjść". Idea: Centrala musi wiedzieć, czy aktualnie roleta jest w ruchu lub czy stoi. Musi wiedzieć, jaki ostatni ruch robiła roleta (czy...
Powyższe działa bez zarzutu. Makro cały czas rośnie ale zatrzymałem się nad wyciągnięciem z plików źródłowych daty ich utworzenia. Czy ktoś ma jakis pomysł? MS
Cześć, Piszę do Was, bo może ktoś miałby pomysł jak rozwiązać pewne kwestie, nad którą się zatrzymałem robiąc makro. Sprawa wygląda tak, że jest arkusz 'umowy', gdzie są umowy, etapy ich realizacji i inne dane. Na ich podstawie makro obrabia dane i wprowadza je do zakładki 'faktury' i pojawia się pierwszy problem: - chciałem zrobić przycisk, pod które...
Witam Chcę makrem przeszukiwać komórki w bieżącej kolumnie idąc w górę arkusza. Makro zatrzyma się jeśli znajdzie określoną wartość. Jednak jest problem jeśli nie znajdzie tej wartości. Przesuwam się po komórkach poleceniem: ActiveCell.Offset(-1, 0).Range("A1").Sel... Nie wiem czemu jest w treści A1, ale działa. Teraz chciałbym...
Witam, Niedawno zrobiłem programik, który generuje 3przebiegi przesunięte w fazie. Triggerem dla pierwszego przebiegu jest detektor zera sieci na INT0. Chciałem całą obsługę generowania sygnałów zrobić na przerwaniu Timera. Ale mój ból jak wywołać przerwanie Timera natychmiast po otrzymaniu sygnału na INT0 Wykombinowałem sobie takie o to rzeczy tuż...
Dzięki, o to chodziło :) [syntax=vb]Public Function sciezka() As String Dim NazwiskoImie As String With Alpex NazwiskoImie = .txtNazwisko & " " & .txtImie1 sciezka = ActiveWorkbook.Path & "\Dokumenty\Pracownik\" & NazwiskoImie & "\" & NazwiskoImie End With End Function[/syntax] EDIT: Podczas testowania makra zauważyłem ze wyskakuje jedem maly błąd....
Witam mam działające makro które pobiera dane z serwera (wycinek kodu) Workbooks.Open Filename:="http://xxxxx.pl/... Windows("dane.xls").Ac... Sheets("Arkusz1").Sele... i chodzi o to żeby przed wykonaniem makra najpierw został sprawdzony url czy jest tam baza dane.xls (jeżli nie ma to wiadomo...
Sub Makro1() szuk = Sheets("WPROWADZANIE").Range("B2") With Sheets("EWIDENCJA") wrs = .Columns(2).Find(What:=szuk, LookAt:=xlWhole).Row 'jeśli nie znajdzie, przerwie komunikatem błędu /zastosować On Error/ .Rows(wrs).Copy Sheets("WPROWADZANIE").Cells(3, 1) 'tu można podstawić wynik Range().End(xldown).Row End With Sheets("WPROWADZANIE").Range("B2")...
Otwierając plik Excel ze strony www (klik w zwykły button) plik Excela nie otwiera się, aż do momentu kiedy nie zatrzymam działania makra - dla wyjaśnienia po kliknięciu w przycisk makro czeka na pojawienie się nowego pliku o określonej nazwie. Przechodząc kod krokowo wszystko działa poprawnie. Puszczając makro automatycznie niestety plik się nie włącza...
Teraz mam taki problem jak jest błąd w usuwaniu wszystko działa jak należy ale jeśli wprowadzę poprawnie czyli w usuwanych wprowadzę kod do usunięcia z wstawianych na "nnn" "mmm" to skrypt robi wszystko prawidłowo jednak po wykonaniu tego przestaje działać i drugi raz Generalnie masz całą instrukcje 'if' blednie zrobioną, teraz kolega (at)adamas_nt...
Stworzyłem makro na to filtrowanie: http://obrazki.elektroda.net/17_12375753... Ten błąd pokazuje się tylko jeśli zmienię nazwę na inną lub dodam. Co może być jeszcze nie tak?
CInt konwertuje typ zmiennej na Integer. On Error Resume Next powoduje ignorowanie błędów (Makro działa dalej bez zatrzymania).
Dziełasz na "zwykłym" adresowaniu czy na FormulaR1C1 Przy "zwykłym" kopiowanie: Cells(1,2)=Cells(1,1) Zaznaczenie cells(1,3).select Poza tym excel ma coś takiego jak "zarejestruj makro". więc włącz ten zapis, zrób co trzeba, zatrzymaj zapis i zobacz jaki kod powstał.
Witam, Czy ktoś z was jest w stanie mi pomóc? Bedę ogromnie wdzięczny bo zupełnie się zatrzymałem na tym temacie. Chciałbym aby moje makro używało formuły złącz teksty i w komórce B2 złączyło teksty z komórek C2 i G2 a potem powielało to we wszystkich wierszach aż do końca (ilości wierszy zmienne). Na pewno potrzebna mi jakaś zmienna która zaznaczy...
Włącz nagrywanie makra, zaznacz cały arkusz, naciśnij delete i zatrzymaj nagrywanie makra, a zauważysz: [syntax=vbscript]Sheets("Import").Select Cells.Select Selection.ClearContents[/syntax] ;) Proszę nacisnąć pomógł nie tylko mnie, a przede wszystkim Marcinowi. To jego był kod...:)
Skleciłem jakiś kod i wydaje się działać: [syntax=vbscript]Sub szukaj_kursywy_przed_data() Dim Rng As Range Selection.find.ClearFormatting Selection.find.Font.Italic = True Selection.find.Replacement.ClearFormatti... With Selection.find .Text = " ^#^#^#^#" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False...
Wystartuj rejestrowanie makra, zmień interesującą cię komórkę na inny kolor, następnie zamień kolor na pierwotny, zatrzymaj rejestracje makra. Wyjdź w edycje makra, dodaj warunek i pętle jak się zmienia kolor i jak on się zapisuje będziesz miał już w tym zarejestrowanym makrze.
Makro to też bardzo fajna rzecz, ale ja jakoś nie potrafię tworzyć makr z kodów, jak poleca JRV. Ale w zupełności wystarcza mi sposób z tego opisu: http://www.komputerswiat.pl/poradniki/pr... Czyli wykonujemy czynności z opisu do momentu gdy kursor zamieni nam się na "kasetę magnetofonową"....
Witam, Ja też zrobiłem silnik parowy parę tygodni temu, cylinder z bardzo starego dysku twardego (oś do głowicy, z odkręconymi głowicami, i 'odkręconym uzwojeniem, a tłok to jest łożysko z tej osi). Wideo dałem na jutuba, ale jest bardzo niskiej jakości: [youtube]http://www.youtube.com/watch?v=... Koło zamachowe jest zrobione z bębna...
Może nie zauważasz :) Komputer za szybki? Zerknij do załącznika. :arrow: JVR - Zatrzyma się, gdy VBA "rozgrzeje się do czerwoności". Na różnych maszynach w różnych miejscach. U mnie Excel zawiesił się na amen.
Brak załącznika to poważny mankament! Nie wiadomo, jakie dane są w kolumnie "O". W kodzie PRL jest sprawdzany warunek: [syntax=vbscript]Sheets(x).Cells(y, "O") >= -30[/syntax]Otóż warunek ten spełniają nie tylko liczby >= -30, ale również puste komórki, dowolne teksty, w tym teksty puste, wartości logiczne. A jeśli w komórce jest wartość błędu, to program...
Informacyjnie dodam, że w innym typie terminala zrobiłem sobie makro które po naciskaniu klawisza wysyłało mi od razu trzy komendy jednocześnie po sobie odzwierciedlając poniższe: Ctrl+Z /2 Z Chcąc od razu zatrzymać silnik. Na sprawnym dysku działało. Myślałem, że szybko wbijając się po uzyskaniu zachęty, z kolejnymi rozkazami po prostu zatrzymam go,...
Najlepiej jeszcze aby procesor tekstu sam wypełnił za użytkowników paragrafy ;). Z tego co wiem to MS-Word nie kompiluje plików. Uważaj bo w informatyce ten termin ma trochę specyficzne znaczenie. Chodzi ci oczywiście o łączenie/scalanie plików, a to po angielsku "combining" lub "merging". Wydaje mi się, że za bardzo byś sobie chciał ułatwić/zautomatyzować...
Witam, mam problem z poniższym zadaniem. Nie potrafię kompletnie wpaść na pomysł jak je rozwiązać. Wykorzystując pętlę Do …. While….Loop napisz makro, które sumuje wpisane dane i wyświetla ich sumę w komórce D2. Zatrzymanie pętli następuje po wprowadzeniu pustej wartości. Wszystkie obliczenia mają być wykonywane w pamięci komputera ale wpisywane...
Nie licze na gotowca.... Proszę o jakieś instrukcje... Zupełnie nie wiem od czego zacząć... Czytam rózne artykuły po sieci i nic z tego nie rozumiem a na dodatek wszystkie instrukcje są pod excela 2003 w 2007 jest troche inaczej menu ułożone. Znalazłem juz opcję makra, sprobowałem zarejestrować makro potem jakoś wszedłem do tego i tu sie zatrzymałem....
Napisałem takie makra w pliku2.xlsm [syntax=vba] Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim NazwPliku As Variant, Sciezka As Variant Dim Plik As Workbook NazwPliku = "Plik1.xlsm" For Each Plik In Workbooks If Plik.Name = NazwPliku Then Cancel = True End If Next Plik End Sub [/syntax] i jest OK. Ponieważ jest plik1.xlsm otwarty plik2.xlsm...
Temat już mocno przeterminowany, ale w ramach wiedzy załączam poniżej makro autozapisu co 15 minut, które działa w nowszych wersjach excela np 2010 Wklejamy w ten skoroszyt Option Explicit ' Zmienna przechowująca czas ostatniego zapisu Private dtLastSaveTime As Date Private Sub Workbook_SheetChange(ByVal Sh As Object, _ ByVal Target As Range)...
Witam serdecznie, Poszukuje rozwiązania problemu mianowicie: NIe jestem w stanie poradzić sobie z kodem, który sprawi, że: Mam zaznaczoną komórkę f6 (przykładowo). Używam makro i zależy mi aby po skończeniu (działania robione na różnych wierszach w 3 kolumnach) wracało mi dokładnie do komórki, która była aktualnie zaznaczona przed włączeniem makro tj...
co może być innego przyczyną tego błędu ? Jaki masz zakres tabeli do kopiowania (?), bo z kodu: [syntax=vba] Range("H9").Select Range(Selection, Selection.End(xlDown)).Select [/syntax] można "odnieść wrażenie", że kopiujesz zakres od 'H9' w dół do ostatniego wiersza w arkuszu, tak więc kiedy chcesz ten zakres wstawić w inny arkusz:[syntax=vba] Sheets("DANE...
Cześć, Mam makro, które zapisuje plik co 30 minut. Kod jest wrzucony bezpośrednio do pliku - gdyż jest on jeszcze przysyłany dalej, a kopia tworzy się na dysku wspólnym. Włączenie następuje przy otworzeniu skoroszytu. Problem w tym, że nawet po zamknięcie co 30 minut otwiera mi się ten sam plik i się zapisuje. Próbowałem zmieniać interwał przed wyjściem...
Dopiero ogarniam język VBA i lepiej idzie mi nauka na gotowych przykładach, gdzie mogę dokonywać zmian analizując otrzymane efekty. Spróbuj więc tak: 1. Wstaw tabelę lub zdefiniuj nazwę zakresu z nagłówkami (tego w załączonym pliku nie ma) 2. Włącz rejestrator makr i naciśnij ikonę formularza 3. Zamknij formularz, zatrzymaj rejestrowanie 4. Przekopiuj...
Witam, mam problem, mam w wordzie umieszczony numer w odpowiednim miejscu o określonej czcionce i wielkości wyglądający tak: 00000001. Muszę wydrukować 4 kopie tego dokumentu po czym kolejne 4 kopie ale z numerem 00000002 i tak w kółko aż do setek tysięcy. Czyli co 4 kopie wydruku numer powinien być wyższy o jeden. Jak coś takiego zautomatyzować? Chciałbym...
Witam, mam pomysł na stworzenie pewnej rzeczy a totalnie brakuje mi pomysłu jak przeskoczyć pewien krok. Potrzebuje makro które będzie mi szukało wyniku po kodzie z danej komórki, ale z uwzględnieniem dodatkowych opcji. Przykładowo teraz mam bazę gdzie czerwony to 1 a czarny to 2. Gdy w komórce A1 wpisze czarny to w B1 wyskakuje mi 2. Moje pytanie jest...
Sposób1. Przed zapisaniem usunąć procedurę dodawania i zapisywania licznika. Sposób2. w procedurze ustawić warunek np: If ActiveWorkbook.Name = "BOOK1.xls" Then (...) End If Przy sposobie 2 makro zawsze będzie kopiowane i przy uruchamianiu pojawiać się będzie monit o makrach. Chociaż nie będzie działać z nieodpowiednią nazwą pliku. Ale jeżeli to nie...
Witam, Chciałbym bardzo poprosić o pomoc w napisaniu makra, które jest mi bardzo potrzebne do poprawnego działania pewnego pliku, niestety ten problem zatrzymał mnie w miejscu i zdecydowałem się poprosić o pomoc. Zeby lepiej wytłumaczyć o co mi chodzi wrzucam prosty plik excela z 4 podobnymi tabelkami - GrA,GrB,GrC,GrD i Rezerwa. Wszystkie tabelki składają...
Polecam zaprzyjaźnić się z debuugerem. Pomaga na zgryzoty :D Wstawiasz break ("czerwone kółko") na początku obu funkcji, ale nie przy deklaracji zmiennych (klikając na szarym polu po lewej stronie kodu). Potem robisz jakąś akcję w excelu, np. zmieniasz arkusze, i kiedy program zatrzyma wykonywanie w zaznaczonym miejscu, wciskając F8 przechodzisz kolejne...
Można zrobić to stosując makro, które w pętli przeszuka kolumnę komórka po komórce i po napotkaniu szukanej wartości skopiuje cały wiersz do nowego arkusza. Następnie wznowi przeszukiwanie od miejsca zatrzymania i po napotkaniu szukanej wartości - kopia wiersza. I tak do ostatniej niepustej komórki. To co napisałem wygląda prawie jak przepisane od Ciebie,...
Chciałbym aby makro działało w tle Ukryta instancja? Będzie "prawie" w tle. Zgadzam się z przedmówcą. Musisz pliki otwierać, ale nie musi to być widoczne.[syntax=vb]Dim myPath As String, myFile As String, myPass As String Dim oExcel As Excel.Application On Error GoTo qInst Set oExcel = CreateObject("Excel.Application") 'domyślnie Visible=False 'pocz...
Witam, może się komuś przyda. Miałem podobny problem, z tym, że makro otwierało mi kilkadziesiąt plików w pętli. Wszystko działało przez ponad półtora roku, a tu nagle jakiś tydzień temu zaczęło się zatrzymywać na metodzie open, ale nie przy pierwszym lecz przy drugim przejściu przez pętlę. Co ciekawe wystarczyło puścić dalej makro i przechodziło do...
Cześć, potrzebuję pomocy przy napisaniu kodu VBA. Opiszę pokrótce o co chodzi, niestety nie mogę zamieścić samego pliku. Temat jest obszerny ale opiszę temat na którym się zatrzymałem. Regularnie dostaję pliki, w których wiem, że są nagłówki kolumn: x, y, z. W każdej kolumnie są odpowiednie dane liczbowe. Niestety w różnych plikach dane mogą być w różnych...
Dzięki czyli jak dobrze rozumiem muszę wywołać jedno makro w drugim jeśli chcę je zatrzymac ?
Witam wszystkich. Aktualnie pracuję nad dużym plikiem analitycznym zawierającym trochę małych makr. W tej chwili mam problem z makrem do tworzenia arkuszy o nazwach pobieranych z zakresu komórek. Zależy mi na tym, aby makro sprawdzało, ile jest wypełnionych pól w dedykowanej tabeli (zakresie) przeznaczonym do wpisywania kodów przez użytkownika, a następnie...
Już myślałem, że się nie doczekam na ten plik. Proponuję taki kod: [syntax=vbscript]Sub ReplaceTest() Dim i As Long Application.FindFormat.NumberFormat = "h:mm:ss" Application.ReplaceFormat.NumberFormat = "h:mm" With ActiveSheet.UsedRange For i = 1 To .Columns.Count .Columns(i).Replace What:="", Replacement:="", _ SearchFormat:=True, ReplaceFormat:=True...
AVE... Nie ma ani jednego profesjonalnego fotografa, który robiłby zdjęcia smartfonem. Tak samo nie ma ani jednego profesjonalnego filmowca kręcącego filmy smartfonem. apple dodało do swoich drogich zabawek format RAW, kodek ProRes i inne bajery, by uzasadnić wysoką cenę. Inni producenci robią to samo w swoich smartfonach i wmawiają idiotom, że fotka...
Witam Wszystkich; Mam plik "x.xls" w którym za pomocą procedury zdarzeniowej "Workbook_Open" uruchamiam makro z Addin.xlam Zadaniem modułu jest otwarcie pliku "y.xls" a następnie nadpisanie nim pliku "x.xls". I tutaj zaczyna się problem, ponieważ po zamknięciu pliku "x.xls" celem go nadpisania, procedura zostaje zatrzymana. Będę wdzięczny za pomoc.
Ale zawsze idąc ze skrótu zatrzymuje się w miejscu, które wskazałem na początku. Makro z reguły zatrzymuje się w jednej linii kodu ze względu na generowany w niej błąd (np. zła nazwa arkusza, zła nazwa pliku, próba otwarcia otwartego pliku itp) - nie wskazałeś tej linii, a mnie (po drobnych modyfikacjach kodu :D ) wg moich wyliczeń operujesz na 4 skoroszytach...
Tak makro uruchamia outlooka i wysyła wiadomość i robi to całkowicie automatycznie, a ja bym chciała np. dopisac do takiego maila treść, albo dodac inne załączniki, wtedy nie moge tego zrobić, bo nie zatrzymuje się ta wiadomość w kopiach roboczych Outlooka. Dodano po 3 W jakej postaci Chcesz zapisywac "ta wiadomość "? Jako klasyczna wiadomość poczty...
Witam, Używam Satel Inetgra do automatyki domowej i chciałbym dołożyć do systemu funkcję, która pozwoli mi na wywołanie opcji furtki w przesuwnej bramie automatycznej. Obecnie wygląda to tak, że aktywując wyjście 25 otwieram bramę całkowicie, natomiast aby zatrzymać bramę po np. 3s od otwarcia, muszę ponownie wyzwolić to samo wyjście na INTIORS'ie,...
Rzeczywiście dane w kolumnie B nie były takie jak w makro, nie wiem dlaczego excel zmienia po wpisaniu więcej niż trzech kropek na jakąś większość ilość znaków... Poprawiłam dane w kolumnie B. Teraz śmiga. W załączeniu plik poprawiony. Dodałam jeszcze komendę do wyjświetlania okna gdy makro napotka na licznik nie zdefiniowany w makrze(np ".........8")....
Co do tej wcześniejszej niedziałającej wersji: 1. Otwórz plik. 2. Po uruchomieniu się VBA zatrzymaj działanie procedury. 3. Wejdź do Debug > Compile VBAProject 4. W okienku References "odptaszkuj" to co masz MISSING i powinno działać. Dodane: Nie czyta się śmieci. :D Poprzednim postem wprowadziłem Cię w błąd. Wybacz
Oki czyli załóżmy że zmienię przekładnie która mi zmniejszy jeszcze bardziej obroty na wyjściu. np: przy 20 Hz plansza będzie się kręcić z szybkością 10 obrotów na minute. Spowoduje ze nie zatrzymam planszy ręka tak? Mam jeszcze jedno pytanie załóżmy ze wymienię falownik na wektorowy to już silnik nie będzie się grzał i będzie mil stały moment przy...
Źle wywołujesz funkcję COVAR. Powinna być coś w ten deseń (przykładowo) Oj, kolega coś chyba dzisiaj niewyspany ;))) Cov a r to jakaś funkcja statystyczna funkcja w Excelu i wywołanie Application.Covar jest akceptowalne, przynajmniej w wersji 2007 (nigdzie nie widzę Cov e r), choć można też ją wywołać Application.WorksheetFunction.Covar(...) , to Excel...
Funkcja wyskakuje ponieważ zakresem jest cała kolumna ( range(A:A) ), a u Pana pierwszy wiersz jest pusty więc od razu jest Exit For. Jeśli nagłówek przesunie Pan o oczko w górę lub określi zakres np A3:A3000 powinno pójść :) Super zadziałało. Z małą poprawką zablokowania wpisu blokującego: 'k.EntireRow.Select 'zatrzyma sie na wierszu z duplikatem...
... Udao mi si kopiowanie, do pierwszej sumy 20, ale wyrzuca mi Excela jak ma otworzyć nowego Excela :( Pytania / uwagi: [syntax=vba] Sub Kopiuj_wklej_jeśli_20_1() Dim a As Variant 'dlaczego Variant ? Dim p As Long 'dlaczego Long ? Dim n As Variant 'dlaczego Variant ? 'gdzie Suma As CośTam ? '... Windows("Truck.xls").Activate 'po co - nie jest może...
Pozostaje metodą prób i błędów dobrać częstotliwość lub filtrowanie pomiędzy falownikiem i silnikiem. Fragment instrukcji: Podstawy obsługi falowników ABB serii ACS150, Pierwsze uruchomienie falowników ABB ACS150 - wprowadzanie parametrów silnika, ABB ACS150 - Przegląd Dostępnych Makroaplikacji, Makroaplikacja: "ABB Standard", Podstawową obsługę falowników...
Jednak poradziłem sobie =) Prosiłbym o nie zamykanie tematu bo pewnie nie jedna rzecz mnie jeszcze zatrzyma w tworzeniu tej bazy, a Twoje podpowiedzi naprawdę ułatwiają wiele! Jeszcze raz dzięki Więc kolejny problem na który się natknąłem: To co stworzyłem to typowa tablica użytkowa. Teraz musiałbym stworzyć tablicę która będzie się wyświetlała na ekranie...
Mam dwa pliki filmowe o nazwach: film1_720p.mkv film2_1080p.mkv Ciągi 720p i 1080p są bardzo istotne i nazwa filmu zawsze je zawiera. Chcę napisać makro (dla systemu Windows 7 64bit) - nie wiem w jakim języku programowania, by w zależności od ciągu 720p lub 1080p, zawartego w nazwie pliku, przełączało rozdzielczość ekranu monitora albo na 1280x720 albo...
Cześć, piszę swoje pierwsze makro i od wczoraj głowię się z pewnym tematem. Otóż chcę dać instrukcję, aby w komórce G2 (lub innej, oddalonej o jedną kolumnę od końca danych) pojawił się wynik działania =C2/B2-1. Plik zawsze zaczyna się w A1, a dane zawsze zaczynają się od B2, jednak liczba kolumn i wierszy jest różna (zależnie od zaciągniętego pliku),...
Może makro w Wordzie? Tablica jednowymiarowa typu Variant pomieści ~50 000 000 elementów. Tak na szybko (konieczna zamiana niektórych znaków na kropkę, tu "?" i usunięcie znaków końca akapitu): http://obrazki.elektroda.pl/6649622500_1... [syntax=vb]Sub Makro5() Dim a As Variant Selection.WholeStory txt = Selection txt = Replace(txt,...
Jeszcze mam drugie pytanie, w którym momencie trzeba zastosować ? To był tylko przykład żebyś zrozumiał jak działa pętla. Do komórek się odwołujesz .cells(numer wiersza, numer kolumny), są też inne sposoby, ale na razie stosuj ten. Pętlę zastosuj jakąkolwiek np: [syntax=vbnet] dim a as integer a=1 Set a1 = ThisWorkbook.Sheets("Arkusz1") Set a2 = ThisWorkbook.Sheets("Arkusz2")...
Witam serdecznie, Mam problem z odczytem danych metodą ADODB z innego arkusza Excel będącego na udziale sieciowym i który może być otwarty przez inną osobę na swoim komputerze. Korzystam z funkcji napisanej przez Tajana: [url=http://www.excelforum.pl/viewtopic.... do ExcelForum - Funkcja GetValue. O ile funkcja ma podstawowe zadanie czytać...
Witam, No niestety twoje makro działa na pewno szybciej niż LICZ.JEŻELI, ale po kilku godzinach obliczyło dopiero 10.000 wierszy. Mam pomysł jak by to mogło działać dużo szybciej, ale nie znam VBA do mark i zaczynam go dopiero ogarniać. Chyba, że komuś chciałoby się to zaimplementować... Pomysł jest taki. Słowa są posortowane alfabetycznie. Program...
Oglądałem dokumentacje i zmieniałem wszystkie sposoby wyświetlania i efekt jest tylko na to co rysuje się pod kursorem czyli jak źle to ustawie to mażąc kursorem po zatrzymanym menu mogę odwrócić ekran Dodano po 2 Ale FAIL :D Ktoś ogłupił funkcje, Dodano po 2 Dobra działa :D A Teraz głupie pytanie kto umie obsługiwać emWinGUIBulider, bo jakoś żadnego...
bedziesz mial trudny wybór :) te przekładnie z aukcji to chyba prawie to samo co większość wkrętaków elektrycznych, duzo osob z forum wlasnie takie napędy stosuje poniżej fotki takich najtanszych z MAKRO ale są w prawie każdym markecie - pierwszy typ jest najtańszy, (koło 12zł chyba) i pewnie dla ciebie najlepszy, ma zasobnik na 4 "paluszki", silnik...
Cieszę się za pozytywny odbiór, podkreślę że wszystko napisałem w 3 godziny i opublikowałem o 5:02. Stąd tekst może być nieco chaotyczny, lecz to też za sprawą wielu wątków, które pomijałem. Miałem trochę poślizg z tym artykułem, miałem go parę miesięcy temu napisać, wtedy skontaktowałem się z Administratorem serwisu i spytałem go o opinię na ten temat....
Proponuję spróbować takiej modyfikacji :D : [syntax=vbscript]Sub sortuj_dane_realizacja_zaladunkow() ' ' sortuj_dane_realizacja_zaladunkow Makro ' ' Dim nw As Long nw = Sheets("Realizacja załadunków").Cells(Rows.Count, "A").End(xlUp).Row ' wyznacza ostatni wiersz tabeli więc po co tu -7 'Range("D8").Select ActiveWorkbook.Worksheets("Realizacja załadunków").Sort.SortFields.Clear...
Witam, Od jakiegoś czasu wykorzystuję VBA żeby ułatwić sobie pracę. Ostatnio próbowałem napisać program, który wyszukuje dane w jednej kolumnie następnie pobiera dane z sąsiedniej i zamienia je z danymi z kolumny trzeciej, następnie robi pętle. Napisałem coś takiego: Private Sub CommandButton1_Click() Dim x, y As String Range("J2").Select x = ActiveCell.Value...
O proszę, miło wiedzieć, że mój kalendarz żyje i ma się dobrze ;) Odpowiadając na Twoje pytania: Jako że jest to forma i makro, po pierwsze Twój plik musi mieć rozszerzenie .xlsm Musisz do niego zaimportować formę kalendarza z mojego pliku - w VBA opcją ExportFile oraz Import File. To na początek. Ad. 1. i 2. Tu się trochę rozmijamy - może się pokazywać...
Cześć :) mam do Was pytanie. Muszę zrobić automatycznie wypełniającą się tabelkę za pomocą jednej funkcji. Umiem to zrobić gdy mam dwie funkcję (jedna na podstawie drugiej). Jednak mój szef nie przyjmuje takiego rozwiązania. Chodzi o to, że mam arkusz z bazą pracowników i firm, którzy należą do tej samej grupy i teraz w osobnym arkuszu muszę wpisać...
Ja też się zastanawiałem nad tą sumą. Czasem daje się to na zabezpieczenie przed tekstem lub pustym tekstem w komórce źródłowej, żeby zamienić to na zero. Podejrzewam, że przy tej liczbie plików raczej będą zamknięte, dlatego ja proponuję rozwiązanie nie tak proste, ale mam nadzieję skuteczne przy zamkniętych plikach. Najpierw trzeba utworzyć odpowiednie...
Musisz zmienić strukturę programu. Makra typu "loop_until_bit_is_clear" powodują zatrzymanie programu w "martwym punkcie". Gdyby program miał jeszcze do wykonania inne równoległe operacje , mógłby ich nie wykonać nigdy. Określ jeszcze raz jak ma działać twój program: - kiedy ma się zapalać/gasić dioda1, a kiedy dioda2? - czy przyciski W1 i W2 są do...
było by super Co było by? Testowalem Twój kod na XL2007 i XL2003 (inne nie mam) - wszystko dziala poprawnie
Widzę, że nie jest to kwestia pojedynczego błędu. Nie wiem z czego to wynika, ale kompletnie nie akceptujesz zasad języka. Nie można być tak upartym. W przypadku tej procedury do zmiennej Target przypisywany jest obiekt typu Range (zakres) ze wszystkimi własnościami. Range.Address jest identyczny z Selection arkusza w momencie uruchomienia procedury...
Panowie jeżeli to możliwe proszę o pomoc w podpięciu pętli do userform. Jeżeli w pętli używam msgboxa i przycisków TAK i NIE /TAK-szukaj dalej, NIE-przerwij szukanie/ to wszystko jest ok. Stworzony userform ma zastąpić msgboxa. Problem polega na tym, że nie wiem jak zatrzymać wyszukiwanie po uruchomieniu makra w którym jest pętla oraz z którego uruchamia...
Przed włączeniem zasilania należy wcisnąć na pulpicie klawisze BCZ(blokada czasomierza) i Mikro Neonówki pulpitu wyświetlają aktualny stan jednostki centralnej. AF adres pamięci, E0 .. słowo pamięci stałej, wskaźniki C i V, przerwania systemowe oraz od urz. zewnętrznych. Dokładnych nazw nie mogę sobie przypomnieć, a dokumentacja JC i notatki zaginęły...
Warszawa dokłada do komunikacji miejskiej 70%, dlatego bilety są dość tanie. http://www.um.warszawa.pl/sites/default/... Czym innym jest dokładać 70% do komunikacji miejskiej, a czym innym do biletów (jak wcześniej stwierdziłeś). Owszem, miasto dokłada, bo nie ma innego wyjścia. Gdyby tak nie było, to po Warszawie...
http://obrazki.elektroda.pl/7468894200_1... Pomimo ogromnego entuzjazmu sektora telekomunikacyjnego jak i potencjalnych konsumentów, wydatki na stacje bazowe i ich modernizacje w najbliższych latach będą spadać. Jak wynika z raportu opracowanego przez Dell'Oro Group spadki i stagnacja trwać będą jeszcze około trzech lat - wzrost spodziewany...
Witam wszystkich. Może ktoś wie co zrobić, żebySwift 90s po nadrukowaniu, nie wysuwała papieru aż do perforacji. W dosie tego nie robi. Drukuję w XP z Exela za pomocą makr (może być jakaś komenda w VisualBasicu).
zatrzymać bramę zatrzymać wirować tablet zatrzymać
matryca projektora yamaha filtr paliwo podświetlenie łącznika
philips fc690 prostownik ideal
Funai Combo VHS/DVD/TV – typowe usterki, naprawa zasilacza, pasków, lasera, mode switch Technics magnetofon – ślizgające sprzęgło, naprawa, wymiana filcu i sprężyny