Nie precyzujesz co ma być zapisane w nowym pliku. Zakładam, że arkusz "dane". Wklej kod do modułu standardowego, zdefiniuj ścieżkę zapisu i podepnij pod przycisk [syntax=vb]Sub Zapis() sc = "C:\" 'wpisz path jako string, koniecznie z ukośnikiem na końcu nazwa = Range("B1") If Cells(1, 2) & Cells(2, 2) <> Empty Then With Sheets("dane2") ostWrs...
No tak. Miałeś ActiveSheet. [syntax=vbscript]Sub Drukuj_jezeli() Dim Arkusz As Worksheet For Each Arkusz In Sheets With Arkusz If .Name <> "Dane z zam" And .Name <> "Arkusz1" Then If Application.WorksheetFunction.CountIf(.R... ">0") > 0 Then .PrintOut .ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "D:\test\pdf\" + .Range("f7")...
Może i Makrem byłoby łatwiej ale.....poległem. No to masz z instrukcją "if" :) (dodane do twojego kodu) [syntax=vbscript]Private Sub CommandButton4_Click() On Error Resume Next 'po błędzie kontynuuje dalej Application.ScreenUpdating = False DatExample = Date Dim s As String s = "C:\Users\jasuc\OneDrive\Tamex Żwirkop\Kopia Dane Tamex\PDF\" y = 2 With...
Załączam przykładowe makro: - zapisu do pdf bieżącego arkusza Excela - wydruk pliku arkusza za pomocą komendy Shell i Acrobat DC - wydruk zewnętrznego pliku *.pdf za pomocą komendy Shell i Acrobat DC. Nie ma żadnych zabezpieczeń (błędne ścieżki, brak plików itp.) Trzeba uzupełnić własną ścieżkę do Acrobat.exe. Oczywiście to tylko prosty przykład, możliwości...
Dziękuję koledze LordBlick, poprosiłem go o odblokowanie tematu, bo wydaje mi się, że mimo pozornej prostoty problemu warto się nad nim chwilę zastanowić. Zanim przejdę do odpowiedzi na post #3, powiem dwa słowa o makrodefinicjach. Wiele osób z nich chętnie korzysta, w pokazanym wyżej przykładzie zdecydowanie lepiej posługiwać się makrami LED_ON i LED_OFF...
Podmień na [syntax=vbscript]NowaNazwa = ThisWorkbook.ActiveSheet.Range("A1").Val... & ".xlsm"[/syntax]
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]
hmm dalej nic, A nie masz czasami w tym "e5" jakiegoś znaku typu (<>?/")?
Powiem że (polskie) google nie oferuje za dużo info na temat VBA Word, a nagrywanie to jakaś masakra. No ale udało się. Może to dla znawców trochę toporne ale zawsze jakieś rozwiązanie: [syntax=vb]Sub osobny_plik() Application.Browser.Target = wdBrowsePage For i = 1 To ActiveDocument.BuiltInDocumentProperties... of Pages") ActiveDocument.Bookmarks("\page").Range....
Witam, Zielony z makro szukam pomocy :-) Uprościłem pytanie, poszukuję makra które uruchamiałoby się automatycznie po wprowadzeniu zmiany w arkuszu dane C3, makro powinno zapamiętać i zapisać poprzednią wartość C3 do arkusza zestawienie C5, przy kolejnym wpisie do C3 w danych, kolejny zapis w C6 w arkuszu zestawienie itd. Mógłby ktoś pomóc w stworzeniu...
Nie wiem, czy się rozumiemy... [syntax=vbscript]Sub ZapiszPlik() ActiveWorkbook.SaveAs Filename:=[H1] & [H3], FileFormat:= _ xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False End Sub [/syntax]
Przetestuj załączone rozwiązanie. Przed uruchomieniem należy: - Plik csv nazwać: "dane.csv" - Załączony skoroszyt zapisać w folderze, w którym znajduje się plik "dane.csv" U mnie cała procedura wykonuje się ok. 1 min. pozdrawiam andie
Skoro sam trochę zrobiłeś, to pomoc Ci się należy.;) [syntax=vbscript]Sub Sumuj() Dim x As Long, a As Double x = 1 Do While Cells(x, "A") <> "" a = a + Cells(x, "A") x = x + 1 Loop [D2] = a Open ThisWorkbook.Path & "\wynik.txt" For Output As #1 Write #1, a Close #1 End Sub [/syntax]
Wklejam, może się komuś przyda Po co tylko ta pętla otwierająca 5x ten sam plik - zapis - zamknięcie?
Udało sie GetData(moc_a, "MODBUS TCP/IP", 4x, 86, 1) wynik_a = moc_a SetData(wynik_a, "Local HMI", LW, 0, 1)
Podepnij sobie pod przycisk "Zapisz" następujące makro [syntax=vb]Sub zapisz_karte() Dim sFlnNm As String 'nazwa pliku z komórki A1 Dim sPath As String 'ścieżka zapisu na razie taka sama jak pliku źródłowego Dim sWrbkFrm As String 'nazwa pliku docelowego z rozszerzeniem sPath = ThisWorkbook.Path & "\" sFlnNm = Range("A1").Value If sFlnNm = "" Then MsgBox...
Rozumiem że w jednym pliku excela jest zapisane makro i otwierasz w excelu następny plik wykonujesz makro i chcesz zapisać zmiany w drugim pliku, otworzyć następny, wykonać makro i zapisać zmiany. Jeśli tak to ostatnia linijka powinna mieć postać ActiveWorkbook.SaveCopyAs Filename:=katalogZapisu & "\" & Format(Date, "DD-MM-YYYY") & "_" & ActiveWorkbook.Name...
Przydałby się przykładowy plik, żeby chcący Tobie pomóc, nie musieli robić tego za Ciebie.
Spróbuj[syntax=vbscript]Sub ADODB_method() 'Apr 15, 2014 ' 1 kolumna slowo, 2 kolumna definicja badz tlumaczenie - pisac bezposrednio slowo w a1, i definicje badz tlumaczenie w b1 , makro eksportuje plik wsadowy do anki do tego samego folderu w ktorym jest arkusz excela Dim fd As Object Const myDelim As String = "," '<<< select comma or semicolon...
Tak samo jak Adamas nie piszę w Wordzie, ale to działa: [syntax=vb]Sub dokument() Dim wartosc As String, wrs As Integer, x As Integer x = 1 Open "C:\Przyklad.txt" For Input As #1 'tu podaj ścieżkę, lub tylko nazwę jeśli w tym samym katalogu Do Until EOF(1) For Each tbl In ActiveDocument.Tables For wrs = 1 To ActiveDocument.Tables(x).Rows.Count Input...
Jak zmienia się którykolwiek TextBox uruchamia się procedura TTextBox. Jak wykonuje się makro w którym jest zapis do TextBox uruchamia się ponownie i tak ciągle. Proponuję zostawić Label, tu też można wyśrodkować tekst. W załączniku poprawiony Label i kod od Private Sub ListBox12_Change(), bo nie zawsze zwracał poprawne dane.
A jakby baza losowań z czasem okazała się nieaktualna to jak temu zaradzić? Co rozumiesz pod pojęciem "nieaktualna"? Bazę pobieramy z http://www.mbnet.com.pl/dl.txt" jeżeli będzie na innej stronie należy w makro poprawić zapis. Mogę to zrobić by się nie "grzebać" w makro a pobierać dane z komórki gdzie wpisze się ścieżkę dostępu do bazy. Jednak nie...
Głównym założeniem makra miał być podział dokumentu na strony i zapis ich w oddzielnych plikach PDF. Wszystko pięknie i ładnie do momentu...... Cześć tabeli na stronie przeskoczyła na stronę nastepną. jak niżej https://obrazki.elektroda.pl/6132375300_... Po przejsciu makra wygenerowana zostaje fizyczna strona z końcówką tabeli. Wszystkie...
Rozumiem, że makro ma być w pliku PRE-ALERT? Jeśli tak, to przetestuj poniższy kod: [syntax=vb]Sub NowyArkusz() Dim wbkPrealert As Excel.Workbook Dim oWSShell As Object Dim strPath$ Workbooks.Add a = Now() b = Year(a) c = Month(a) D = Day(a) Set wbkPrealert = ThisWorkbook Set oWSShell = CreateObject("Wscript.Shell") strPath = oWSShell.SpecialFolders("Desktop")...
Mam w tych plikach faktury w postaci tekstowej. Trochę to dziwne :D Faktury w postaci tekstowej :?: Z jakiego to programu wyeksportowane ? załącz przykładowy plik. Potrzebuję, aby makro Excela otwierało te pliki tekstowe jeden po drugim i wstawiało w określone miejsca pliku nowy tekst, by powstała korekta faktury Konieczny byłby szablon takiej faktury...
Pomoże ktoś??
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 :)
idat wpisywane recznie, na poczatku nowej I zmiany, lub gdy juz potrzeba wpisac dane I zmiany(nowej). wtedy kasuje sie tabela I, II, III zmiany. Makro dodaje nowy wiersz ze wpisana data. Dane w 'Tabela zapisu ' gotowe kazdy raz, jak byly zmiany w itab
Zablokowany plik do edycji , to może inny użytkownik ma otwarty i Twoje zamiany skasuje przy zapisie.
Plik działa, ale wymaga abym nazwę wpisał sam i wskazał adres zapisu Jakoś nie widzę zapisywania. Powinno być w pytaniu po Else... Czas mierz przed msgbox'em z pytaniem, a wynik możesz wyświetlić w tytule.
Zupełnie o tym zapomniałem. Teraz wszystko działa. A czemu kwalifikator nie jest potrzebny przy zapisie danych do pliku, w którym jest makro. Poniższy zapis działa poprawnie. TenPlik.Range(Cells(OWD + 20, 4), Cells(OWD + 22, 38)) = Dane Przy odczycie danych z pliku zewnętrznego nawet po otworzeniu pliku i ustawieniu arkusza "Wyniki zbiorcze" jako aktywnego...
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ć ?
To jest trochę, moim zdaniem , źle przez Satela zrobione ale musisz zrobić tak : w DloadX w zakładce ETHM1-Plus>GuardX /Integra Control musisz stworzyć Makro załączające dane wyjście . Potem , oczywiście po zapisie do centrali , importujesz z poziomu aplikacji na iPad / iPhone makra. Następnie z poziomu ustawień kamery musisz dodać to wyjście którym...
Na pasku górnym otwierasz Makra - Nowe Makro. Wpisujesz nazwę elementu i OK. Otwiera się okno Edytor Elementów. Tam rysujesz cały element od podstaw, wybierając kształty, dodajesz wyprowadzenia (PinDown, PinLeft itp.) numerując je i wprowadzając nazwy. Można też przerobić istniejący element. Jak skończysz, klikasz OK i element pojawia się na obszarze...
Poproszę linijkę bez komentarza, bo powyższy zapis jest błędny.
Zgadzam się ze zdaniem kolegi Prot . Po jakimś czasie uzbiera się tych kopii tyle, że zrobi się bałagan. Wg mnie, kopię takiego zestawienia można zmieścić w jednym wierszu arkusza (jednej linijce pliku tekstowego). Do podglądu/wydruku archiwów wystarczy odwrócić makro zapisu + jakaś zgrabna wyszukiwarka/filter. Jeśli z jakiegoś powodu będzie potrzebny...
Mam parę problemów z kodem poniższy kod kopiuje wszystkie dane w wybranego pliku do pliku z makrem, problem polega na tym że po skopiowaniu danych plik źródłowy pozostaje otwarty a powinien się automatycznie zamknąć po skopiowaniu [syntax=vbscript]Sub WyborPliku() ' ' WyborPliku Makro ' ' Klawisz skrótu: Ctrl+j ' Wybor okreslonego pliku na którym ma...
Nie zapisuje nowego pliku w .xlsx bo jak pisałem w tym rozszerzeniu nie może być makra a Ty masz makro, jest błąd i nie zapisuje. Nie usuniesz makra z którego w danej chwili korzystasz. Trzeba to obejść tworząc kopię Arkusza bez makra i zapisując kopie. Sub Zapis() Dim Sciezka As String Dim adres1 As String Dim adres2 As String adres1 = Range("G2")...
Set Wb=Open(Fn) ==> Set Wb = Workbooks.Open("D:\abc\" & Fn) Zbyt dosłownie potraktowałeś ogólny zapis o otwarciu pliku.
Chciałbym się podpiąć pod pytanie. Chciałbym jednam żeby mój plik z makrem po zakończeniu procedury zamknął się?? czy to w ogóle możliwe?? Kończę swoje makro poleceniem: ActiveWindow.Close SaveChanges:=False Zamyka mi się jednak wszystko ale sam excel (bez otwartego żadnego pliku) jest otwarty.
żeby skopiował wartość innej komórki Cells(x, 2) = InnaKomorka;) Kolego, jak poprzednim razem, proszę pisać konkretnie. Dodano po 35 Łukaszu, ja Ci nie pomogłem tym wpisem. Pewnie nie zauważyłeś średnika na końcu.:) Napisz konkretnie, co makro ma robić w przypadku, gdy w 'Arkusz2', w kolumnie D znajdzie się zapis 'VW', to Ci przerobię powyższe makro.
... W mojej ocenie makro zapisujące powinno na końcu czyścić wpisy poprzedniej zmiany ... Słuszna uwaga ... ale nie za każdym razem, czyli kod w innym miejscu. Czyścić powinno się komórki tak, by wykonała to ostatnia zmiana, która będzie tam coś wpisywać, tak aby przed swoim wpisem miała informację o tym, że poprzednicy w ogóle coś wpisywali (bo może...
Jako ścieżkę i nazwę (z A1) podstaw[syntax=vb] Filename:= Environ("UserProfile") & "\Desktop\" & Range("A1") & ".pdf"[/syntax]
Natomiast mam pytanie. Ponieważ gdy chce drukować ten dokument zawsze dostaję informacje że marginesy są błędnie ustawione i czy chce kontynuować wydruk Podmień makro do drukowania i zobacz. [syntax=vbscript]Sub PrintToSpecificPrinter() Dim PrinterName As String PrinterName = "STL-TE100" ' Save the current active printer Dim currentPrinter As String...
Mimo tej modyfikacji, makro cały czas zachowuje się tak samo - wywala ten sam błąd. Przecież masz w nim te stare makro. Po podmianie makra na te co podałem wyżej, wszystko działa w pliku testowym2
Witam Mam wielki problem. Mam plik Excela w nim jest makro. Problem jest taki że jak otworze plik z danymi i nie zapisze danych lub zapisze to plik znika z folderu. Nie można odnaleźć gdzie on podzial. Gdzie jest problem? Excel wersja2007.
Widzę, że lubisz chyba jak się Ciebie ciągnie za język. :D Chętnie bym się w tym temacie doedukował jak coś wskażesz. Jak dla mnie śp. pamięci "kozak vba" "Charles Pearson" http://www.cpearson.com/excel/optimize.h... ps widzę że nie którzy stosują zapis np. [A1] łatwiejszy zapis ale jak piszą wolniejszy.
Po dodaniu w 2 linijce jak wyżej mam " invalid use of prioerty" U mnie działa
A dlaczego warunkujesz działanie działanie Textboxów w Arkuszu1 od stanu filtrowania w Arkuszu2 (który jest całkowicie pusty) ? Popraw makro w zapisie "Arkusz1" zamiast "Arkusz2" i będzie działać :D
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]
Po zapisie do Flash centrala z reguły się restartuje.
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ź...
Brak załącznika. Podobny temat [url=https://www.elektroda.pl/rtvforum/t...
Witam Dziękuje Działa, ale chciałbym mieć możliwość całkowitego zablokowania możliwości zapisu pliku z włączonymi filtrami. Makro działa - wywala błąd, ale mimo wszystko pozwala użytkownikowi zapisać plik.
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
No to na załączonym obrazku powinieneś mieć Arkusz3.Name Nie wiem, skąd wykombinowałeś to Arkusz3.cennik - tzn. domyślam się skąd, ale tak jest źle.
Makroinstrukcja jest 'wklejana' a podprocedura wykonywana poprzez skok. Makro jest szybsze (mnie instrukcji, nie trzeba nic zapisywać na stosie) ale kod wynikowy jest dłuższy (bo za każdym razem jest umieszczany).
Tym razem nie napiszę gotowca, lecz pół;) [syntax=vbscript]Function KolejnyNumerPliku(Katalog As String) As Integer Dim Plik As String Plik = Dir(Katalog & "*.xlsx") x = 1 While Plik <> "" n = Val(Plik) If n > x Then x = n Plik = Dir Wend KolejnyNumerPliku = x + 1 End Function Sub Test() MsgBox (KolejnyNumerPliku("C:\PlikiExcela\")) End...
[syntax=vb]Sub zapisz1() numer = InputBox("Podaj numer kolejny") NewFilename = numer & "-2015 " & ".xls" ActiveWorkbook.SaveAs Filename:=NewFilename End Sub[/syntax] lub [syntax=vb]Sub zapisz2() ActiveWorkbook.SaveAs Filename:="FORMULARZE" & ".xls" End Sub[/syntax]
Dodać nowy moduł w VB, wkleić do niego kod i uruchomić. W celu ułatwienia użytkowania, można dodać przycisk uruchamiający makro do wstążki - nie posiadam wersji 2016 ale dla 2010 to należy zrobić tak: Opcje programu Outlook -> Dostosowywanie wstążki. W oknie po lewej - Wybierz polecenia z: Makra (zaznaczasz właściwą procedurę). W oknie po prawej...
Czyli 4 pierwsze bajty masz zapisane w EEPROM. Do odczytu służy makro eeprom_read_byte(), zaś do zapisu eeprom_write_byte(). Prawdopodobnie, nie analizowałem, błędy masz w warunkach... R
Nie wiem czy dobrze rozumuję. Wyniki obu porównań można umieścić w odpowiednich arkuszach pliku "makro.xls", skopiować (arkusze wynikowe) do nowych plików, nadać im nazwy i zapisać (zamknąć z zapisem).
Przede wszystkim dziękuję za pochylenie się nad moim problemem :) Co do zapisywania pliku z samą godziną, bez minut i sekund (czyli samo hh w formacie) - zrobiłam to celowo. Plik użytkuje wiele osób, jest wielokrotnie otwierany w ciągu dnia. Taka nazwa nie generuje błędu przy kolejnym zapisie w tej samej godzinie, jak pisałeś, natomiast powoduje nadpisanie...
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ć...
Zapis do wielu rejestrów to 16, nie 10. Możesz napisać sobie makro.
(at)zbysiomysio Zobacz jak się pisze pulpit.
Aby poprawnie utworzyć nazwę arkuszową w VBA trzeba użyć metody Names.Add Można sobie nagrać stosowne makro i wtedy otrzymasz zapis kodu: RefersTo , który jest drugim parametrem w wywołaniu metody Names.Add [syntax=text]ActiveWorkbook.Names.Add "kod", "=L2!$B$13:INDEX(L2!$B$13:$B$44,COUNTA(L... [/syntax]Tekst formuły musi być podany w wersji...
Witam, Mam problem z makro. Tworząc pewien raport w każdy poniedziałek filtruje daty w kolumnie Y dla poprzedniego tygodnia. W formularzu Excel umieściłam w 2ch komórkach następujące funkcje; Y3 =dziś(), Y2 =dziś() -6, a następnie w filtrze niestandardowym wybieram większy lub równy Y2 i mniejszy lub równy Y3, aby uzyskać interesujący mnie przedział...
Napisalem wszystko od nowa. Makro testuje czy folder istnieje jesli tak - zapisuje w nim nowy plik pod warunkiem ze plik juz sie tam nie znajduje, jesli nie - tworzy nowy folder i zapisuje w nim nowy plik - nowy miesiac. =INFO("Directory") nie dzialalo dobrze w moim przypadku gdyz nie zawsze pokazywalo prawidlowa lokalizacje. Co o tym myslicie? Czy...
Widzę, że wątek wisi od... zimy ;) Makro przy wydruku, czy zapisie wymaga zdarzenia. Tu się w OO sprawa komplikuje. O wiele łatwiej będzie napisać makro drukowania dla przycisku i w nim umieścić numerację...
[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 widzę sensu w działaniu tego kodu, gdyż za każdym przebiegiem pętli zmienia się zawartość 4 tych samych komórek. Zakres C3:C6. Poza tym nie wiem po co w pętli wyświetlanie informacji MsgBox. Zapytam więc: co chciałeś osiągnąć pisząc to makro?
Z czego wynika niespójność zapisu danych w ostatnim arkuszu? W wierszu drugim są te dane zapisane koło siebie, kolumna po kolumnie. W wierszu trzecim między każdą kolumną jest przerwa. Czemu tak jest? Jeśli makro ma sortować wyniki z lotto to można je uprościć, nie musi liczyć do 100 pozycji w wierszu, tylko do sześciu, do tego nie musi liczyć na liczbach...
Witam Próbuję dane z excel - z różnych arkuszy przenieść do WORD. Znalazłam wątek "Makro zapis danych z EXcel do Word" (Niestety wątek jest zamknięty więc zakładam nowy. ) W wspomnianym wątku zamieszczono bardzo przydatny wzór - w załączniku. Jeśli uruchamiam makro z oryginalnego pliku działa bez zarzutu. Jednak przeniesienie fragmentu kodu nie skutkuje...
Zapisanie etykietę w wordzie z roszerzeniem.doc lub .docx nic nie daje. Nie mam pomyslu jak mozna obejść "etykietę" aby makro dzialalo. Nie sadze aby twórca systemu chcial zmienić zapis.
Prosta sprawa a tu taka dyskusja :) , Teraz to wychodzi, że zawsze jest lepiej załączyć przykładowy plik (dane mogą być fikcyjne), ale "budowa" musi być oryginalna. Sama nazwa nawet jak będą znaki specjalne musi się wyświetlić w okienku "nazwa pliku" ale przy próbie zapisu dostaniesz błąd. ps. w tym elka2-nie działajca, formula jest w d8 a kod w makrze...
No na pewno jest szybszy przy zapisie i odczycie. Zresztą na oficjalnej stronie przy Pro jest podany zapis i odczyt, a przy XT tylko odczyt. http://www.pqi.com.tw/product2.asp?cate1... http://www.pqi.com.tw/product2.asp?cate1... Mógłbyś mi wysłać fotkę w wysokiej rozdzielczości (najlepiej makro) blokady zapisu?
Brakuje jakby tego ostatniego elementu. Nie wiem czy tu nie brakuje czegoś żeby zapisywało nowo utworzony plik, a nie ten z makrem, ale nie wiem jak to zmienić. Pomijam "budowę" tego kodu, jak już to tak. [syntax=vbscript] ActiveWorkbook.SaveAs Filename:="H:\" & Format(Date, "yyyy.mm.dd") & "_Zestawienie Zgromadzeń Inwestorów" & ".xlsx", _ FileFormat:=xlOpenXMLWorkbook,...
Wyjścia nie muszą być przydzielone do grup! Wyjścia powinny być w tym przypadku ustawione na przełączniki mono lub bi. Nie zapomniałeś wpisać hasło w definicjach (istniejące w systemie - przypisane do użytkownika z uprawnieniami sterowania) albo zaznaczyć pytanie o hasło? Zawsze najpierw zczytuj dane z klawiatury a później nanoś zmiany i zapisuj do...
Witam. Próbowałem dziś poprawić conieco w manipulatorze INT-TSG więc połączyłem się przez ETHM-1 i odczytałem z centrali dane . Potem zgodnie z instrukcją instalatora Str10 Pkt.6.5 chce odczytać makropolecenia które są zapisane w manipulatorze ... niestety przycisku ODCZYT nima ... Ktoś wie co jest grane ? http://obrazki.elektroda.pl/7983272900_1...
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"...
Niestety nie działa to jak należy. Po aktywowaniu makra wyskakuje okienko zapisu, gdzie muszę wpisać nazwę i wybrać typ zapisywanego pliku. https://obrazki.elektroda.pl/9879440800_... Chciałbym aby plik zapisywał się automatycznie i miał nazwę pliku przed zapisem z dodaniem na końcu nazwy daty aktualnej w momencie zapisu. Dodatkowo...
Potrzebuję stworzyć taki algorytm/makro który będzie automatycznie dobierał zakres danych wykorzystanych do wykresu (każda taśma ma inna długość co ta tym idzie różną ilość zapisanych pomiarów) oraz tworzył wykres przebiegu walcowania. Jak to się ma do układu danych? Nie można zaimportować jedynie kolumn z danymi, a wykresy tylko aktualizować (zostawić...
Mam funkcję "worksheet_change" i zmieniam wartość w Arkuszu 1 w dowolnym polu. Następuje wywołanie funkcji "worksheet_change" i rusza makro. Niestety rusza makro które wykonuje operację dla ponad 1000 komórek. Mam pytanie, czy da się odczytać w VBA w jakiej komórce została zmieniona wartość (czyli położenie komórki w arkuszu, następnie wartość wpisaną...
Procedura jest prawie dobra. Zapisu do pliku dane.txt można dokonać przez:[syntax=vb] Open "C:\dane.txt" For Output As #1 [/syntax] Ponieważ zapisujemy do pliku a nie odczytujemy z niego (linia po linii), zapis [syntax=vb] Do Until EOF(1) .... Loop [/syntax] nie ma sensu i należy go usunąć.
E tam "zlituje" zaraz ... zwykłe "sie mu zechce" i tyla ... bo jak się zagmatwy"wowawoło"wuje proste sprawy, to ludziskom innym się nie chce ... Drugie marko ma drukować wszystkie arkusze z skoroszytu "akrusz ocen" ale przez zapisam makro musi poprosić o podanie ścieżki zapisu jak i makro musi dopisywać numerek przy każdym zapisie (tak żeby nie nadpisać...
Dzień dobry. Za pomocą Logo AcessToll pobieram wartość licznika do Excela. Udało mi się stworzyć arkusz, który generuje trend z ostatnich 100 próbek pobieranych co 60sec, czyli mam informację z ostatnich 100 minut. Aby mieć dane z całego dnia, potrzebuje makra lub formuły, która będzie przepisywała wartość komórki A3 w arkuszu do kolejnych wierszy w...
no to by było coś, ale nigdy nie słyszałem o tym żeby używać SQL-a w Excelu
Cześć, napisałem 2 makra i nijak nie mogę ich połączyć. Makro 1 - tworzy nowy folder Makro 2 - zapisuje plik pod nową nazwą folder i plik pod aktualną datą, ta w komórce Q2. Oba makra działają, folder się tworzy, plik zapisuje się pod nową nazwą ale nie w nowym folderze Sub X() ' zaznacz1komorke Range("Q2").Select 'zrób nowy foler Dim Rng As Range Dim...
Można wysłać dane za pomocą RS232 bezpośrednio do EXELA . Wystarczy napisać makro w exelu.
Zapytam jeszcze raz JAK WYŁĄCZYĆ OKNO O ISTNIEJĄCYM DOKUMENCIE PRZY ZAPISIE! Napisałem makro które ma zapisywać kilka pól w kilka miejsc. Więc zapisz lub autozapis nie rozwiązują tego problemu.
wtedy nie zastap tylko w makro FormulaLocal
Cześć, dzięki za podesłane rozwiązanie niestety dla mnie nie jest do końca przydatne ze względu na to że, chodziło mi o "ZAPIS NOWEGO PLIKU POD NAZWĄ Z ARKUSZA" jak zostało to opisane poniżej. Potrzebuję dla generatora pytań napisać makro które pozwoli mi na zapisanie nowego Zeszytu(pliku) pod nazwą z Arkusza(Dane). Tak abym mógł wprowadzić kilkadziesiąt...
proponuję zastosować zarówno przed każdym zapisem i odczytem jak i po zapisie/odczycie eepromu makro eeprom_busy_wait() które jest tym samym co while(eeprom_is_ready()==0)
Witam proboje skompilować kod PDU z pewnego ebooka według mnie brakuje tutaj makrodefinicji #include ... tylko jakiej prosze o pomoc code char CPIN[] = "AT+CPIN=1643"; //wprowadzenie numeru PIN code char CHOOSEMEM[] = "AT+CPMS="; //wybór domy lnej ś lokalizacji pamięci code char ECHOOFF[] = "ATE0";...
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ł.
Potrzebuję zrobić przycisk który będzie odejmował od czasu zapisanego w komórce 1 minutę. W komórce zapisany jest stempel czasowy czyli data z godziną wydarzenia. Format zapisu rrrr.mm.dd gg:mm:ss. Zrobiłem przycisk który wstawia datę i czas aktualny, ale czasem potrzebna mi korekta i potrzebne są przyciski odejmujące 1 minutę, 2 minuty, 3 minuty.
's ' nie jest specjalny symwol jako np. F1, Tab, etc. Application.OnKey "^s", "Zapis" Private Sub Workbook_BeforeClose(Cancel As Boolean) Zapis End Sub
Witajcie, mam taki problem. Stworzyłem sobie makro tworzące plik csv (z konkretnego zakresu danych) w określonej lokalizacji, w moim przypadku chodzi o Pulpit. O ile makro działa u mnie na kompie, będzie problem jeżeli z pliku i makra będzie chciał skorzystać ktoś na innym kompie (inna ścieżka zapisu). Czy może mi ktoś podpowiedzieć jak sobie z tym...
przekopiowałem kod do vba w moim pliku przestało to wszystko działać Zaproponowałem kod prywatny do obsługi skoroszytu - zatem musisz go wkleić dla obiektu ThisWorkbook :!: Po skopiowaniu kodu i dostosowaniu nazwy roboczego arkusza - plik musi być zapisany jako xlsm :!: Ze względu na zastosowane uproszczenia zapisu kodu - każdorazowo trzeba "wychodzić"...
zapis makro excel makro zapis zapis pliku makro
punto wymiana oleju esp8285 tasmota pasma bydgoszcz
czujnik ciśnienia spalin mercedes auris hybrid
ProgTV: Przywracanie kanałów DVB-T2 na PC Sony FDR-AX33 błąd E:61:30 - przyczyny i rozwiązania
