No OK, ale jeśli nacisnę 'zapisz' i nie zamknę pliku? Po mojemu zapisywanie w logu powinno być przy BeforeClose
To całe makro?? Ten fragment służy jedynie do wybrania nazwy pliku. Zapis nastąpi w momencie wywołania: [syntax=vb]ThisWorkbook.SaveAs (ZapiszJako)[/syntax]
Spróbuj tak: 1. Wejdź w Narzędzia -> Makro -> Zarejestruj nowe makro 2. Nazwij makro, opcjonalnie wybierz klawisz skrótu, a z listy Przechowuj makro w: wybierz Skoroszyt makr osobistych 3. Nagraj makro lub po prostu zakończ rejestrację. 4. Zamknij plik. Kiedy zapyta o zapis zmian w arkuszu makr osobistych, zatwierdź zmiany. 5. Otwórz dowolny plik, wejdź...
ze tak czy siak potrzebne są dwa klawisze Można z jednym np. "end" wrzuć to do modułu [syntax=vbscript]Sub test() MsgBox "ok" End Sub[/syntax] a to do thisworkbook [syntax=vbscript]Private Sub Workbook_Open() Application.OnKey "{end}", "test" End Sub[/syntax] Zapisz zamknij i uruchom skoroszyt naciśnij "end"
makro musisz napisać ;) http://www.exceltip.com/st/Save_a_workbo... http://www.ozgrid.com/forum/showthread.p... http://www.lqnet.com/Excel/SaveAs.asp http://www.excel-vba.com/vba-12-code-wor...
Cześć. Chciałbym żeby w makro Zapisz excel pobierał ścieżkę z komórki H1. Obecnie w makro mam ustawioną wartośc stałą jako Pulpit ("C:\Users\Pawel\Desktop\") i wygląda to w ten sposób: Sub zapisz() ' ' zapisz Makro Range("H3").Select ActiveWorkbook.SaveAs Filename:= _ "C:\Users\Pawel\Desktop\" + ActiveCell.Text,...
Witam! Możesz wykorzystać kod: :spoko: [syntax=vbscript]Public Sub zapisz() Dim Wb_Name As Variant Wb_Name = Application.GetSaveAsFilename If Wb_Name <> False Then ActiveWorkbook.SaveAs Filename:=Wb_Name End If End Sub [/syntax]
można to zrobić w 3 etapach 1. Przejdź do lokalizacji (ChDrive, ChDir) 2. przy pomocy funkcji Dir i FileDateTime zrobić listę plików 3. Sortuj listę malejąco po Data-godzina pierwszy na liście będzie plik, którego szukasz
Dopasuj sobie takie makro: [syntax=vbscript]Sub Przelicz() Dim cel As Range With Worksheets("Generator cen") For Each cel In Worksheets("310").Range("A2:A180") .Range("B3") = cel.Value cel.Offset(, 3) = .Range("B26").Value Next cel End With End Sub[/syntax] Po otwarciu załącznika zapisz go sobie w formacie .xlsm. Ja użyłem starego formatu .xls ze względu...
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,...
Jak plik .xlsx(.xlsm), to spakuj go RAR'em lub ZIP'em; lub zapisz jako .xls
Co prawda z VBA też nie jestem za mocny ale moze da sie coś zrobić. Podrzuć to co juz stworzyłeś (załącznik) to spróbuje nałożyć na to jakieś makro w stylu zapisz dane.
No, to prawie wszystko masz gotowe, tylko o funkcji CDate() zapomniałeś - "w polskich warunkach systemowych" FileDateTime() zwraca tekst, a nie podtyp daty z "Variant", jak napisane jest w pomocy podręcznej - łatwo to sprawdzić, np. przez "?TypeName(test2)" w oknie Immediate. Czyli porównujesz np.: tak: "If CDate(test) > CDate(test2) Then", chociaż...
Witam Może być makro [syntax=vbscript]Sub Zapisz() Application.ScreenUpdating = False plik = Left(ActiveWorkbook.FullName, InStr(ActiveWorkbook.FullName, ".")) & "txt" ActiveSheet.Copy ActiveWorkbook.SaveAs Filename:=plik, FileFormat:=xlCSVMSDOS ActiveWorkbook.Close False MsgBox "zapisano " & plik End Sub[/syntax]
Nagraj sobie makro zapisywania. Poniżej zarejestrowane (bez korekty) dwa: "Zapisz jako" oraz Ctrl+s (zwykłe zapisz) http://obrazki.elektroda.pl/3841968300_1... i wybierasz z listy. Aby oprogramować komórkę/zakres potrzebujesz procedury zdarzeniowej [url=http://dzono4.w.interiowo.pl/kurs/d... Tu należy warunkowo wywołać...
Przedstawione makro nie do końca tylko "zapisuje jako" plik. Ono tworzy nowy plik kopiuje odpowiednie dane (arkusze) zapisuje go pod pewna nazwa i go zamyka. Przy czym, ponieważ jest wyłączony "podgląd", nie widzisz wszystkich kroków. Też tak chcesz stworzyć plik? Czy wystarczy ci "zwykłe" zapisz jako - czyli plik nazwijmy go źródłowym, na którym włączysz...
Witam, Polecam Ci zapoznać się z Visual Basic dla Worda (słowa kluczowe na googlu: VBA WORD). Język prosty, a daje duże możliwości pracy np. z Excelem lub Wordem. A może wystarczy Ci nagrać makro?? Włącz na pasku Visual Basic, nagraj makro czerwoną kropką (w najprostszej wersji: plik->zapisz jako i wybierz format txt), potem zakończ kwadratem, wciśnij...
Oferują sposób - aktywowany Arkusz 2, ma dialogu, który zaprasza zaznaczyc wierszy do edycji. Następnie Kliknij OK - dziala makro Inny sposób zapisz w makro w postaci "1:1 , 5:26, 29:57" np. [syntax=vb] Private Sub Worksheet_Activate() Dim k&, och As Boolean Set arw = Range("2:2, 3:3, 5:8, 12:24") With Me .Unprotect For k = 1 To 11 och = UCase(.Cells(1,...
z komórek o pierto niżej t.z. z wiersza 2 ?(b2 c2 d2) pisać makro cały czas to lipa zapisz w Osobisty skoroszyt
Zrobiłem bez makr. Może ktoś Ci przerobi na makro. Łącze do formantu w komórce bieżącej, formatowanie niestandardowe ukrywające wpis ;;; formatowanie warunkowe określające kolor. Niestety łącza nie dają się kopiować, bo są zawsze adresami absolutnymi, nawet jeśli się je zapisze bez dolarów.
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...
Dzięki za link, Programowanie to nie do końca moja dziedzina. Potrzebuję, aby podczas zamknięcia lub przy skrócie ctrl+s lub kliknięciu na zapis, aby sama tworzyła się kopia z datą. Problem w tym, że przeszukałem już trochę forów i w zasadzie nic nie znalazłem. Sam Excel ma jakiś mechanizm kopi no on jest szczerze mówiąc kiepski. Tutaj znalazłem coś...
Mam rozwiązanie. Niech klawisz "0" nazywa się "C0" wtedy: Private Sub C0_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) C0.BackColor = &H80000010 ' Zmieniamy kolor przycisku End Sub Dla klawisza "1", który nazywa się "C1" Private Sub C1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer,...
Witam :) Chcialem zapytac o pewna modyfikacje, otoz chcialbym alby plik generejuacy sie podczas zapisu nie posiadal przycisku "next" Niestety moje modyfikacje nie dzialja. udalo mi sie skasowac przycisk "next" ale niestety kasuje sie on rowniez w arkuszu zrodlowym. Prosze o pomoc PS oczywiscie mam na mysli przycisk "zapisz" zamiast "next"
zapisz makro jak formatujesz komorke, potem tylko wystarczy odpalic to makro po wybraniu konkretnej wartosci z listy.
pokazyje błąd. Nie powinno tak być, albo nie rozumiem. WYSZUKAJ.PIONOWO(A1;Y!A:B;2;0) tylko wtedy, jeśli LICZ.JEŻELI(Y!A:A;A1)>0 Innymi słowy jeśli w Y jest, w przeciwnym razie zapisz ""(empty string) Czy możliwe by nie zmieniał komórki Arkusza X. jesli nie wyszuka w Arkuszu Y odpowienika ? Nie, bo jesteśmy wszystkie formuły przepisze w klatki kolumny...
Taa, ci francuzy co tydzień zmieniają swoje poprawne znaki. Jedno z: 1. Zrób sobie kolekcje tychże tablic. 2. Zapisz sobie makro w którym otwierasz inny plik i robisz kopię komórki A1, będziesz mieć kod.
Witam Poszukuję pomocy ze stworzeniem makra dla zapisu plików w excelu. Mianowicie chodzi mi o to żeby plik excela który otwieram z pulpitu po jego wypełnieniu i kliknięciu w dyskietkę (zapisz), zapisywał się automatycznie z datą w docelowym folderze. Może ma ktoś już podobne makro które mógłbym wykorzystać ?
Zapisz/zapamiętaj nazwę kontrolki (cmbLista bodaj), usuń ComboBox z formy, wstaw ListBox, nazwij go tak samo (kichać standardy w tym przypadku) i powinno działać ;)
czy jest jakieś polecenie które mógłbym dodać w tym miejscu aby w nowo otwartym pliku dodatkowo usunąć jeszcze wszystkie makra? Zapisz jako... zwykły xlsx w ostateczności: [url=http://www.cpearson.com/excel/vbe.a... patrz rozdział "Deleting All VBA Code In A Project"
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 :)
Jeżeli to są funkcje excela (nie makro) to: Skopiuj (nie przenoś) skoroszyt B do katalogu gdzie jest skoroszyt A. Otwórz tylko skoroszyt A "Wejdź" w formułę gdzie jest odwołanie do skoroszytu B (będzie się jeszcze odwoływać do starej lokalizacji skoroszytu B) Skopiuj ścieżkę (zaznacz w formule ścieżkę do pliku B i Ctrl+C ) "Wyjdź" z komórki i zaznacz...
Witam,potrzebuję rozwiązania takiego problemu w Excelu,że jeśli wpisałbym w jednej komórce cyfre od 1 do 9999 to w drugiej pojawiłaby zapisana ona słownie.Problem w tym,że chciałbym by była to jak najprostsza metoda poprzez wykorzystanie bazy danych zawierającej zapisane te cyfry ,bez używania żadnego makra.
Pomysł z utworzeniem osobnego "przycisku" jest jak najbardziej godny uwagi i zastosowania. Chcąc uzyskać dostepnosć do makra przez cały czas, nalezy makro zarejestrowac w pliku personal.xls, a nie jak podaje kolega normal.dot ( tak na marginesie to taki plik tworzy Word, nie Excel ). Plik personal.xls pojawi sie , po zarejestrowaniu makra ( musi byc...
Przetwórz dane w excelu np do drygiego arkusza na postać taka jaka chcesz (nie wiem do końca z twojego przykładu co z czego wynika) i zapisz jako ... txt Unicode. I masz plik.
Chyba że w pliku Excel uda się wyłaczyć za pomocą makra opcję Zapisz jako....
Wiem, przewidywałem takie rozwiązanie, ale jest ono trochę uciążliwe. Potrzebuję z jednego skoroszytu z wieloma arkuszami wygenerować każdy arkusz osobno - jako nowy plik xls. Dawałem zapisz jako, usuwałem co niepotrzebne, dodawałem co chciałem i... wszystko było ok, ale dla jednego docelowego pliku. Potrzebuję 10. Może dało by się zrobić tak: 1. Zapisz...
Pewnie można, ale to już dłuższa historia... :) Najprościej - jeżeli plik-źródło jest w tej samej lokacji - wstawić kwerendę wybierającą dane (Dane->Importuj dane zewnętrzne->Nowa kwerenda bazy danych, wybrać Excel Files * i OK, wskazać plik-źródło (można zaznaczyć "Tylko do odczytu"), a dalej z kreatora" wybrać zakładkę, rozwinąć ją krzyżykiem, wybrać...
Nie rozumem o co chodzi z tym leczeniem kanałowym i co to ma do dolnej kolumny... Ogólnie ciekawy pomysł... dolna kolumna... Biorąc kod marcimix wyszło takie coś: [syntax=vb]Type iCell Row As Integer Col As Integer End Type Sub ColorNext() Dim C As iCell Dim r As Range Dim tmp As Range Dim step As Integer C.Row = Excel.ActiveCell.Row C.Col = Excel.ActiveCell.Column...
Witam serdecznie! Mam zakres komórek w wierszu, np. A1:A10, które domyślnie posiadają białe tło. Pracując w arkuszu kolor tła będzie zmieniany na, powiedzmy, niebieski i z powrotem na biały. Potrzebne jest mi makro, które zliczy ile razy dokonano zmiany koloru na niebieski, w całym wierszu. Co więcej, przydałby się przycisk "zapisz", do zatwierdzania,...
Czy zapisujesz plik w formacie dopuszczającym użycie makr tzn. np. xls lub xlsm? Bo jeśli to jest .xlsx, to zapisze się bez makr.
Jeżeli problem jest powodowany przez VBA i tylko w tym jednym pliku, to czasem - nie zawsze - pomaga coś takiego (Excel 2003): - otwórz dowolny plik Excela, ustaw Narzędzia->Makro->Zabezpieczenia na poziom BARDZO WYSOKIE, zamknij plik. - spróbuj otworzyć uszkodzony plik, - jeżeli się uda, zapisz otwarty plik. Teraz możesz przywrócić poziom zabezpieczeń...
Pierwsza zmiana wpisuje noc (zapisz), druga zmiana wpisuje rano (zapisz)... A co się dzieje z wartością komórki "noc" po pierwszym zapisie :?: a co przy drugim zapisie ? :D W mojej ocenie makro zapisujące powinno na końcu czyścić wpisy poprzedniej zmiany np zapisu czasu przez poszczególne zmiany można wykorzystać Twój pierwotny kod w postaci: [syntax=vbscript]Sub...
Prawdopodobnie zapisujesz pliki w starszym formacie, który nie jest do końca kompatybilny z Excel 2007 (w nagłówku masz napisane "Tryb zgodności"). Spróbuj wszystko sobie sformatować tak jak powinno być, a następnie zapisać arkusz we współczesnym formacie excela (z rozszerzeniem xlsx lub xlsm - jesli plik z makrami): "Zapisz jako" > "Skoroszyt programu...
:arrow: 10fanta W Twoim przypadku można zupełnie prosto: 1. zapisz w komórce "gdzieś z boku" 1,1 2. skopiuj komórkę Ctrl+c 3. zaznacz "wymnażany" zakres 4. PPM, wybierz 'wklej specjalnie', w oknie dialogowym zaznacz "przemnóż"
Wyrzuć co niepotrzebne w procedurach Thisworbook. Powinno zostać tylko chowanie kolumn.[syntax=vb]Private Sub Workbook_BeforeClose(Cancel As Boolean) ' i tutaj wstawiłem makro ukrywające ThisWorkbook.Save End Sub[/syntax]Wykorzystaj swoje makro. Żeby ukrywanie było skuteczne, musisz wymusić zapisanie pliku. Dlatego może okazać się niezbędne automatyczne...
:) makrem przywrócić poprzednie funkcje? można ale nie lepiej (prościej) aby makro tworzyło nowy skoroszyt lub po zastosowaniu makra zamiast naciskać zapisz wciśnij zapisz jako i nadaj nową nazwę cennika np z datą. Przyznam jednak że miałbym wątpliwości aby otworzyć nieznany plik excela w którym jest makro (monit przy uruchomieniu). Wg mnie najlepiej...
Siemka wyskrobałem takie makro ale nie chce mi zapisywać pliku niby jest zapisz i nic się nie dzieje [syntax=vb] Private Sub Workbook_AfterSave(ByVal Success As Boolean) plik = Application.GetSaveAsFilename(InitialFil... " & Cells(1, 1) & " 2014", _ Title:=" Zapisz plik z danymi") If plik <> "False" Then End If end sub [/syntax]...
excel wyświetla mi okno do zapisu makra Zapisz skoroszyt jako plik z obsługą makr (xlsm).
Witam, Proszę o pomoc w napisaniu makra które po otwarciu pliku "arkusz ocen" będzie prosiło użytkownika o wskazanie lokalizacji pliku "baza". Po wskazaniu pliku excel otworzy plik "baza" skopiuję arkusz 1 (w tym pliku jest tylko jeden arkusz) i wstawi go do pliku "arkusz ocen" jak pierwszy arkusz. I teraz jeżeli w pliku "arkusz ocen" jest już skopiowany...
Sub Zapisz_28() Dim arh As Workbook Dim mies As Worksheet Set mies = ThisWorkbook.ActiveSheet nazwa = mies.Range("nazwa arkusza") Set arh = Workbooks.Open("D:\GRAFIK_28.xlsm") Application.DisplayAlerts = False For Each sh In arh.Sheets If sh.Name = nazwa Then sh.Delete Next Application.DisplayAlerts = True mies.Copy after:=arh.Sheets(arh.Sheets.Count)...
Witam, Może znajdzie się ktoś, kto ma pomysł, na mój problem: Stworzyłem makro, które z formatki wypełnionej przez użytkownika, kopiuje dane, dodaje inne potrzebne kolumny i kody i wrzuca wszystko do csv - korzystając z funkcji SaveAs z parametrem Local:=True. wbkNowy.SaveAs Filename:=Sciezka, FileFormat:=xlCSV, CreateBackup:=False, Local:=True Wszystko...
Zarejestrowałem Ci ten import jako makro. Uruchamiasz skrótem Ctrl+i. Sprawdź, czy będzie działać w Twojej wersji Excela (rejestracja była w 2007). Kolumny z kwotami są sformatowane po polsku. Jeśli wolisz, żeby były kropki dziesiętne, usuń te 3 instrukcje na końcu makra: [syntax=vbscript]Columns("E").NumberForm... = "0.00"[/syntax] Załączony plik ma...
Oczywiście, ale :) Excel lubi płatać figle. Zapisz jeden wiersz z CheckBoxem, skopiuj go 100 razy, po czym usuń przez zaznaczenie 80 wierszy. Ile jest CheckBoxów w arkuszu? I co będzie gdy uruchomisz powyższe makro? Raczej użyłbym czegoś w stylu For wiersz = 1 To Range("A65536").End... 'tu drukowanie zaznaczonych w gałęzi...
Moze cos od poczatku zle robie? Plik z makrem jest kopiowany z komputera z danymi na komputer z nowym excelem i windowsem. Zmiany wprowadzam bezposrednio w dwa pliki xls i xlsm po zapisz jako (myslalem na poczatku ze moze to wina formatu pliku). Teraz po ruszeniu makra od poczatku wrocil blad 1004 [syntax=vb]Worksheets("Working").Select Range("a1:iv65536").ClearContents...
Jeszcze jedna rzecz: Stworzyłem szablon Excel z obsługą makr - jak zapiszę moje słówka w taki sposób makrem, to Excel zmienia mi od razu nazwę mojego szablonu. Czyli - szablon zamiast eksport do Anki, staje się plikiem import txt - czy można to jakoś zmienić, tak, aby plik import txt zapisywał się jako nowy plik - bez ruszania szablonu?
Przecież plik .xls możesz otworzyć też w 2007 a do PDF'a zapisuje się przez Save as/Zapisz jako... Co w VBA daje wynik: Sub exportTOpdf() ' ' exportTOpdf Macro ' ' ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="scieżka\do\zapisania... Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False,...
importujące kilka plików PDF :?: do arkusza excel Jeśli chodzi Ci o import danych z "tekstowych" plików PDF do Excela to IMHO najprostszym i najtańszym :D sposobem jest wykorzystanie możliwości programu Adobe Reader - zapisz plik jako tekst :idea: Uzyskujesz plik txt - jak na zrzucie 1051520 a potem w zależności od potrzeb łatwo można importować za...
Nagrałem makro i niby jest ok lecz teraz pojawił mi się kolejny problem. Jak zrobić coś takiego żeby po naciśnięciu tego przycisku zapisz wyskoczyło okno zapisz jako lecz nazwę tego pliku żeby pobrało np. z komórki A1. Oczywiście zapis ma być przypisany do danego katalogu np. moje dokumenty
Jak najbardziej możesz działać na "błędach" Właśnie błąd N/A oznacza brak danej czyli zastosuj funkcję czy.brak i dołącz ją do tego co już stworzyłeś ale w "inwersji" czyli: =IF(ISNA(VLOOKUP(I14,$A$2:$H$5,1,0)),"NI... MA","JEST") dołaczanie pliku: Przyciśnij odpowiedz ale nie ten z (+2pkt) później poprzez przycisk przeglądaj wskaż plik na dysku, a potem...
Witam Mam problem ze stworzeniem makra. W zasadzie to nie wiem jak się za to zabrać . Parę miesięcy temu byłem na podstawowym szkoleniu z excel i tam miałem okazję napisać kilka prostych rzeczy i na tym moje doświadczenie się kończy. Widzę że na tym forum jest dużo ludzi którzy mają szeroka wiedzę na ten temat i mam nadzieję że ktoś zechce mi pomóc....
1. pobiera listę plików .xlsx w folderze 2. usuwa zakładki, tworzy nowe i orzenosi dane z pobranego pliku z folderu 3. przenosi dane z jednej zakładki do finalnej KOR 4. przenosi poszczególne wiersze z zakładki RAT do zakładki KOR do tego samego wiersza jako kolejne kolumny 5. tworzy nowy plik z danymi z zakladki KOR, zapisuje i przechodzi do pkt 1...
Spróbuj tak: [code][syntax=vbscript] Sub ZapiszIUsuń() Dim Plik As String Plik = ThisWorkbook.FullName ThisWorkbook.SaveAs Filename:="C:\NowaŚcieżkaDoPliku\" & ThisWorkbook.Name Kill Plik End Sub [/syntax] W cudzysłowie trzeba podać ścieżkę docelową andie
hmmm jeżeli zabezpieczę plik Hasłem to makro nie będzie działało ??
Spróbuj tak. Wyłącz ochronę arkusza i zapisz skoroszyt. W module Ten_skorosozyt dodaj kod: [syntax=vbscript]Private Sub Workbook_Open() Me.Worksheets("Arkusz1").Protect UserInterfaceOnly:=True, Password:="" End Sub[/syntax] Podmień w kodzie właściwą nazwę arkusza i (opcjonalnie) dodaj hasło. Zamknij i uruchom ponownie skoroszyt. Makra się będą wykonywać,...
36 wartości musi się powtórzyć 30 razy, pod nim kolejny itd. Przy twojej ilości wpisów (23113) w pliku Excela szybko to przestanie działać... Zapisz sobie plik w nowym formacie jako xlsx (2007 i nowsze), ale nie na zasadzie "Zapisz jako" tylko tworząc nowy i przeklejając tam wpisy. Jeśli zapiszesz jako XLSx to niestety będzie to zapis w trybie zgodności...
Witam. Mam wielką prośbę. Dostałem w pracy zadanie utworzenia wizualizacji do procesu walcowania taśmy wraz z raportowaniem przebiegu.. Wizualizację (napisaną w In-Touch z wykorzystaniem SPC) połączyłem za pomocą DDE z arkuszem excel'a w którym ma być tworzony raport z walcowania taśmy. I tu zaczyna się mój problem. Samą wizualizację napisałem bez problemu...
Możesz napisać makro ale według mnie lepiej jest ręcznie używać opcji zapisz jako - i dodać do nazwy pliku np:001, 002 itd. dodaję link może się przyda http://www.swiatexcela.pl/2011/10/17/aut...
Witajcie, Zwracam się do Was z pytaniem, czy istnieje możliwość stworzenia jakiegoś makra zliczającego czasu od uruchomienia programu do jego zamknięcia ? Mój pomysł (niedoskonały) Uruchomienie przez plik .vbs programu, którego ma dotyczyć zliczanie czasu i równolegle uruchomienie pliku Excel, gdzie z kolei uruchomi się makro, które zapisze aktualny...
A gdzie ma być to makro zapisane? Tak jak miałeś zrobione, to wszystkie arkusze zostałyby przeniesione do nowych skoroszytów (bez makr), a ten skoroszyt źródłowy zniknąłby wraz z makrem, bo nie byłoby w nim arkuszy. Musisz mieć przynajmniej 1 arkusz (ja go nazwałem Ostatni), który zostanie w skoroszycie i wraz z nim makro. Ten skoroszyt możesz sobie...
Kolejna prośba. Wiem, że dla Was będzie to sprawa prosta, ja się cały czas uczę i będzie mi potrzebna pomoc: W Arkuszu 1 wprowadzam dane w wierszu 1 Po naciśnięciu przycisku ZAPISZ (tutaj właśnie potrzebuję makra) kopiuje wpisane dane i wkleja w kolejny wolny wiersz w Arkuszu 2 (jednocześnie kasując wpisane dane w Arkuszu 1 i przygotowując go do dalszej...
We wszystkich makrach, w kodzie arkusza także. Fragmenty z załącznika: W kodzie przycisku zapisz[syntax=vb]cmdSave.Enabled = False 'wyłączenie przycisku cmdExit.Enabled = True 'dopisz tu[/syntax]W kodzie arkusza przy zmianie: [syntax=vb] If Dir(ThisWorkbook.Path & "\" & nazwa) = Empty Then cmdSave.Enabled = True cmdExit.Enabled = False 'tu też Else...
Nie wiem jak :/ Podam ci jeden ze sposobów :) Zapisz jako bat i wrzuć do katalogu z tymi csv i uruchom [syntax=dos](at)echo off setlocal ENABLEDELAYEDEXPANSION set licz=1 for %%i in (*.csv) do ( if !licz!==1 ( for /f "tokens=6 delims=," %%j in ('type "%%i"') do echo %%j>>wynik.xls ) else ( for /f "skip=1 tokens=6 delims=," %%j in ('type "%%i"') do...
Dla pewności: Wróć do komputera na którym to działa, skopiuj i zapisz do pliku tekstowego kod od "sub..." do "end sub" makra powiązanego z przyciskiem, przenieś plik do komputera, na którym nie działa, wklej kod w edytorze VB, powiąż makro z przyciskiem opcji. Możesz też wyeksportować do pliku *.bas i zaimportować na drugim komputerze Z drugiej strony...
Mam makro po którego uruchomieniu wyświetla się forma z checklistą, polem umożliwiającym wpisanie tekstu, kilka optionbuttonów i 66 checkboxów po kliknięciu zapisz wszystkie dane zapisywane są do odpowiednich komórek, jednak jeśli, któreś z pól, lub żadne nie zostanie uzupełnione i tak można zapisać w tym wypadku bezwartościową informację. Takie działanie...
Dzięki działa, ale w międzyczasie stworzyłem swój własny formularz do wprowadzania danych i również działa... ale nie wiem jak zrobić żeby po przyciśnięciu zapisz rekord się zapisywał ale również czyścił pola do wprowadzenia następnego klienta? Niestety nie wiem, jak wygląda Twoje makro? Nie bardzo też rozumiem z czym z czym masz problem, skoro sam...
Witam ponownie, Nie bardzo rozumiem, albo chyba coś robię źle. 1)Mam dwa arkusze zest (arkusz1), temp (arkusz2). 2)Utworzyłem trzy przyciski w arkuszu zest(arkusz1) Generuj, usuń, zapisz. 3) Mechanizm1: Generuje sobie arkusze o odpowiednich nazwach, według przykładu od 1001 do 1009 i teraz np. chcę zapisać każdy ten arkusz osobno w katalogu (np.C:\Users\Michal\Desktop\Zestawienia)...
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)...
Trzeba go zapisać z obsługą makr prawdopodobnie.
Witam Chciałbym stworzyć w Excelu VBA makro które pozwoli na zapisanie pliku pod nową nazwą z dodaniem daty na końcu przed rozszerzeniem. xlsx (przy zastosowaniu takiej formuły jak przy samym excelu =JEŻELI(DZIEŃ.TYG(DZIŚ();2)=1;DZIŚ()-3;D... Nazwa pliku wynikowego np."roboczy 2018-12-20.xlsx) gdzie data będzie się zmieniała w zależności od dnia...
Panowie wyskoczył mi inny problem, który myślałem, że rozwiąże przy okazji poprzedniego. Program działa bez zarzutu, tak jak pisałem wcześniej raz nawet przejechałem ręcznie przy użyciu f8 i makro wykonało bez problemu wszystkie niezbędne operacje na ponad 10 detalach. Problem pojawia sie przy puszczeniu go w automacie. Jeśli w liście mam więcej niż...
[quote="Andrzej59"]Zrobione w PQ[/quote Po dopisaniu do listy jednej lub dowolnej liczby pozycji trzeba arkusz zapisać i odświeżyć a tabele same się uaktualnią
Zobacz nowy plik bo podmieniłem. Druga rzecz - dodałem wcześniej zapis danych, a ty piszesz że na tym wywala błąd, więc: Czy jesteś zalogowany jako administrator? Rozpakuj i zapisz gdzieś na dysku mój plik i jeszcze raz sprawdź. Bo makro zgłasza błąd "autozapisu" pliku. Dodane po chwili -------------------------- Nie sprawdzałem szybkości działąnia....
makro nagrywa dopiero jak wybiore folder i zapisze, a wtedy juz mam nadpisany z gory folder lub jest to polozenie w ktorym jest dany plik excel'owski jesli usunę tą linijkę. Więc prosiłbym o kod , do samej "funkcji" : Zapisz jako. (żeby mi sie okienko pokazało tak jakbym to zrobił manualnie z wybranym formatem .pdf) Dodano po 56 ooo, jeszcze inaczej...
hej, dzięki, Działa. Jednocześnie przez weekend posiedziałem nad tematem i napisałem coś takiego, też działa. Zostawiam dla potomnych, ale mam kolejne pytanie. Mianowicie, jak w tym nowym folderze osadzić plik zapisywany wg wartości w komórce? Obecnie zapisuje plik wg wartości w komórce ale nie w nowostworzonym folderze. Sub MakeFolders() ' zaznacz1komorke...
To pewnie będzie trzeba zmienić podejście. Masz dane z ostatniego miesiąca (ile wierszy?) i potrafisz go przekonwertować do wymaganej postaci, masz z poprzednich miesięcy (znowu ile?) i to wszystko potem musisz złączyć (czy tu nie wejdziemy w ograniczenie Excela?) i przetwarzać? Dobrze to rozumiem? Jeżeli potrafisz przekonwertować plik w rozsądnym czasie...
że „For i = 5 To 14” do zakładałem, że sprawdzanie zaczyna się od 5, 6, 7 itd wszystko dobrze - zaczyna od 5-tej kolumny [syntax=vb]Sub ostatnia_z_cyframi() Arkusz = ActiveWorkbook.Name Dim z1 As String z1 = "zest_1" Set Doc_1 = Workbooks(Arkusz).Sheets(z1) For i = 5 To 14 If Val(Doc_1.Cells(51, i)) > 0 Then nr_kol = i Next i Doc_1.Cells(55,...
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...
Teoretycznie można coś podobnego zrobić - choć w praktyce jest to bardzo złe rozwiązanie, a już zwłaszcza na plikach w pracy, gdzie istotne jest bezpieczeństwo i pewność danych... Może najpierw wykład, potem kod ;) Garść faktów: Excel nie nadaje się do pracy wielozadaniowej (czy równoległej, zwał jak zwał). Teoretycznie można w pliku włączyć jakiś tam...
Taki problem, który pewnie jest dla wielu banalny. Zapisując plik za pośrednictwem zwykłej funkcji: Zapisz jako i wybierając .CSV rozdzielany przecinkami uzyskuję plik, który przy ponownym otwarciu jest podzielony na kolumny (patrz załącznik: 1058226 ZDEM_via_Excel.csv) tymczasem gdy stosuję taki kod do zapisania pliku. ActiveWorkbook.SaveAs Filename:="C:\ZDEM.csv"...
Nie wiem jak napisać pętlę, która będzie potrafiła kopiować tylko niepuste komórki ze wskazanej kolumny. Załóżmy, że w Arkuszu1 w kolumnie A jest 2000 komórek, z czego dane znajdują się tylko w 500 z pustymi w różnych miejscach pomiędzy. Chciałbym napisać makro, które utworzy nowy plik we wskazanej lokalizacji (stałej - U:\Lukasz\Raporty\) o zmiennej...
Normalnie tak było, ale nie działa... naprawdę... Wyłączyłam makro, wszystko najpierw DEL zapisałam i nic...
Poczekaj na specjalistów albo sam nagraj makro i spróbuj je zmodyfikować.
W skoroszycie Excel przed wyjściem z niego makro zamyka arkusze, np. Y i Z. Jeśli będąc w otwartym skoroszycie (np. Z), wyślę ten skoroszyt mailem jako załącznik korzystając z funkcji Excel "Plik=>Zapisz i wyślij", wówczas adresat poczty widzi arkusz Z w trybie podglądu - co jest niepożądane. Czy można jakoś tuż przed skorzystaniem z funkcji "Plik=>Zapisz...
Witam Nie potrafię pisać makr i jestem zielony w tym temacie dlatego proszę o pomoc.Mam plik "sprawozdania" w którym znajdują się trzy skoroszyty o nazwie "RAPORT, Sprawozdanie-2, Sprawozdanie-3". Problem polega na tym aby po naciśnięciu przycisku "Zapisz", wszystkie dane z skoroszytu RAPORT wiersze 3,4,5 z odpowiednich komórek zapisywały się w skoroszytach...
Dziwna sprawa w przypadku zapisania mój antywirus wykrywa trojana ....który ewidentnie zawiera trojana w katalogu pliku excel ....czekam na kontakt. Próbowałeś zapisać to na swoim komputerze?
Ponieważ w Outlooku nie pracował, bo go nie używają. Ale wiem, że może mieć także makra i uruchamiania, może automatycznie zapisać plik w odpowiedniej lokalizacji i również rozpakowac go.
Czesc, Niestety przyszlo mi dzialac w pracy przy pomocy OneDrive, nie kalsycznego serwera gdzie kazdy moze po prostu wejsc do folderu.... i pojawil sie problem z transferem plikow. Mianowice, potrzebuje stworzyc makro, ktore bedzie dosyc prostym UserFormem, w ktorym pozostali wypelnia podstawowe dane oraz za pomoca przycisku ''browse'' wskaza mi plik...
Witam, Bardzo dziękuje za pomoc i podpowiedzi. (at)JRV Masz całkowitą rację - wystarczy odwołać się do If Weekday(kolejny_dzien) = vbMonday Then przez dzień tygodnia, dla: Doc.Cells(p_w + i, p_k).Interior.Color = RGB(122, 122, 122) i wtedy „dopisać kolor tła” (jest w załączonym przykładzie ;-) ) Nie wiem dlaczego „zafiksowałem się”...
Potrzebuję napisać makro w Excelu, które: przy wyłączaniu Excela zapisze wszystkie otwarte dokumenty w jakichś plikach po włączaniu otworzy je.... Pomocy, potrzebuje to na wczoraj :)
excel makro zapisz excel zapisz makro zapisz otwórz
wspomaga pompa skoda epson przesunąć głowica gniazdka angielskie
Brak ciepłej wody w piecu gazowym z solarem Nawigacja Navitel na karcie SD dla Windows CE - opinie i analiza