Należy założyć, że pewnie jakieś 99,99% użytkowników nigdy nie spróbuje złamać nawet najprostszego hasła, pozostali zrobią to z łatwością, o ile ich do tego jakoś zachęcisz. Nie wiem czy twoja aplikacja w VBA (o którym poniekąd słusznie nie ma najlepszych opinii - patrz wyżej) będzie dla nich godnym przeciwnikiem, czy jest wystarczająco cenna. Czyli...
a w jaki sposób ustawie druk dwustronny? Tutaj właśnie jest cały problem :!: o którym prawdopodobnie pisał kolega (at)clubs można by to obejść ale za dużo 'roboty' Kodem VBA nie można przestawiać ustawień sterownika drukarki :cry: Obejściem problemu może być np. "zdublowane zainstalowanie" posiadanej drukarki (z możliwością druku dwustronnego :D )...
Odblokowano na wniosek autora tematu,
Google -> "excel amount of files in directory"
czy ktos moze pomoc rozwiazac problem? Najlepiej pomóż sobie sam :D Otwórz edytor VBA (najlepiej przy otwartej "matce" i kopii) i porównaj sobie kody modułów jednego i drugiego pliku, oraz kody UserForm-ów. Uzupełnić to możesz lekturą np https://www.cognity.pl/kurs-vba-procedur...
Dlaczego w ogóle te dane kopiujesz do Worda? Nie jest tak, że po skopiowaniu drukujesz etykiety na palety? Co to znaczy 'nadpisywać numery'? W załączniku plik xlsm - podwójne kliknięcie w kolumnę 'Dostawa'.
Plik musi mieć rozszerzenie .xlsm lub .xls
Oczywiście pozamieniałeś rozszerzenie pliku xlsm nie tam gdzie powinieneś :cunning: Umieść załączony plik w jakimś folderze testowym i wykonaj umieszczone tam makro :!: 982520
Możemy bez problemu zmienić plik xlsm na xlsx? Czy jednak taka zmiana wymaga tutaj zmian w kodzie?
Witam Mam program do wycen w excelu napisany w najnowszej wersji i potrzebuje u przedstawicieli otworzyć to w bezpłatnej aplikacji, gdy otwieram w openoffice nie otwierają się okna dialogowe z formularzami do wypełnienia jak w excelu. Czy jest coś darmowego co otwiera takie pliki z VBA z makrami lub jest jakiś sposób żeby ten plik przerobić?
Jesteś pewien, że masz pełen dostęp do C podmień i zobacz utworzy plik tam gdzie masz .xlsm [syntax=vbscript]Open ActiveWorkbook.Path & "\" & Range("B3") & ".dxf" For Output As #1[/syntax]
testuj [syntax=vb]Sub aaa() Dim pname As Variant Dim file As Variant Dim length As Variant pname = Application.GetOpenFilename( _ filefilter:="Pliki Worda (*.xlsm),*.xlsm", _ Title:="Wybierz plik do importu danych") file = Dir(pname, vbSystem) MsgBox file Path = Left(pname, InStrRev(pname, "\")) Cells(1, 10).Value = Path End Sub[/syntax]
Otwórz Excela (nowy plik), włącz rejestrator, zapisz plik z obsługą makr (xlsm), porównaj oba kody (parametr 'FileFormat') i już będziesz wiedział...
Plik nie może być xlsx, bo zapisujesz i wysyłasz plik z makrem. Albo zapisuj xlsm, albo zapisuj i wysyłaj kopię pliku.
Witam Czy jest możliwość zmiany ikony dla pliku xlsm. Nie chodzi mi o zmianę ikony dla wszystkich tego typu plików, ale dla konkretnego jednego pliku.
Witam. Panowie pomóżcie. Właśnie zrobiłem coś co nie powinno się nigdy stać. Niechcący sformatowałem mój pendrive. Niestety dane na nim umieszczone są (były) dla mnie bardzo ważne i są mi bardzo potrzebne. Na szybko znalazłem jakieś 2 programy do odzyskiwania danych no i mały sukces. Odzyskałem praktycznie wszystkie dana które potrzebuję ale jest mały...
Proszę o pomoc co tu jest źle i wskazówki jak to wpisać w kod w słowa "Ma nowe wpisy" żeby otwierał się ten plik. [syntax=vbscript].HTMLBody = "Cześć," & "<br>" & "<br>" & _ "<a href=""file:///E:\dokumenty\Analizy środowiskowe Ewa\B. po zmianach 17.08.xlsm"">Plik z monitoringiem środowiska</a>" & _ " ma nowe...
Takie automatyczne kopiowanie możliwe jest tylko poprzez VBA :D Proponuję wykorzystać dla arkusza 1 i 2 prywatne procedury wywoływane zdarzeniami zmian odpowiednio w kolumnie X i L. Przykładowe rozwiązanie w załączonym pliku xlsm :spoko: 864181
Cześć, Mam taki problem że za pomocą makra kopiuje dane z drugiego pliku. Problem w tym że dane z drugiego pliku pojawiają się dopiero po wykonaniu makra uruchamiającego się przy otwarciu (nie znam nazwy tego makra). W konsekwencji kopiuje same nagłówki bo dane nie zdążyły się jeszcze odświeżyć. Miał ktoś podobny problem ?
Dzięki za zainteresowanie tematem . Zauważyłem że nie ładują się comboboxy które we właściwości Row Source mają podaną na sztywno nazwę zakresu w arkuszu. Listy ładowane dynamicznie działają poprawnie . Moja wiedza w zakresie programowania to książki i przede wszystkim internet ; daleka od satysfakcjonującej , rozwiązanie które daje mi oczekiwany rezultat...
Może to Cię do czegoś natchnie... [syntax=vb]Const NAZWA_PLIKU As String = "C:\EX04\1.xlsm" Dim plik As Workbook Set plik = Workbooks.Open(Filename:=NAZWA_PLIKU) If plik.ReadOnly Then plik.Close (False) MsgBox "Nie podziałamy... :(" Else plik.Sheets(1).Range("A1").Value = Now plik.Close (True) MsgBox "Zapisano!..." End If[/syntax]
Wyślij tylko tabela przestawną lub całego arkusza? 'plik xlsm „Z” ' za każdym razem wyczyszczone?(Arkusz1)
Jeśli plik jest w formacie >Office2003 (xslx, xlsm, docx, docm, etc), należy zamieszczać po spakowaniu zip/rar.
Jak mam w tej sytuacji teraz postąpić? Musisz to robić w trybie edycji (tego Frame :D) jak na zrzucie - oczywiście plik xlsm :!: 948308
Po prostu czy da się zrobić to tak że zapisze plik a po ponownym odpaleniu wszystko działa dalej tak jak przez zamknięciem? Plik zapisujesz z obsługą makr (*.xlsm)? Makra można kopiować pomiędzy plikami. Zobacz [url=http://www.cpearson.com/excel/vbe.a... Rozdział "Copy A Module From One Project To Another". Chyba, że chodzi o coś innego...
Jeśli formuła jest w tabeli Excela, to się kopiuje. A jeśli chodzi o dodawanie załącznika, naciśnij pole "odpowiedz" pod postem. Pod polem na wpisanie odpowiedzi jest pomarańczowe pole "Dodaj załącznik", które należy kliknąć, a potem dodać plik. Tylko ten serwis nie przyjmuje plików .xlsm. Więc albo plik .xlsx, albo .xls. Pliki .xlsm trzeba zarchiwizować...
Wkleiłem kod do ten_skoroszyt W Twoim przykładowym pliku xlsm masz już jeden moduł z kodami VBA :?: i to tam powinieneś wkleić ten kod :!: (ewentualnie możesz wstawić drugi - czysty moduł tylko z tym jednym kodem :D ). Jak już tam będzie prawidłowy kod - to proponuję ustawić w opcjach makr - skrót klawiaturowy do jego uruchamiania :spoko: niestety...
Ważne plik z Makrem trzeba zmienic format na xlsm. bo tutaj jest jakas blokada i nie pozwala dodac takiego pliku jako załącznik:( W makrze zagniezdzonym w pliku powinny kopowiac sie dane do arkusza o nazwie CSV, wedlug poniżych założeń, nie wiem czemu nie przekleja mi tych danych [syntax=vbscript]Sheets("Arkusz1").Selec... Columns("BV:CZ").Select Selection.Copy...
Hej. Szukam pomocy. Potrzebuje skopiować konkretne dane z kilku plików do jednego zbiorczego. Mam pliki .xlsm - nazwa plików to: Numer Zamówienia Klient W pliku zbiorczym mam mieć dane z plików .xlsm Czy jest możliwość, że klikam na komórkę w pliku zbiorczym (Numer zamówienia) i wyskakuje mi okno z prośbą o podanie pliku z którego chcę skopiować dane,...
Witajcie Potrzebuję pomocy przy napisaniu kodu VBA. Mam w folderze: "zestawienia" kilkanaście plików .xlsm i .xlsx. Wszystkie pliki mają po jednym arkuszu (różne nazwy), ale nagłówki i liczba kolumn jest taka sama (kolumn jest od A do N). W tym folderze mam też utworzony plik: 2017_zbiorczy.xlsm w którym chciałabym aby dane z pozostałych plików zostały...
Gdzie mogę to odnaleźć żeby to skontrolować? O ile dobrze pamiętam, po dotarciu w strukturze xml pliku xlsm do tego obrazka image89.png można go otworzyć i sprawdzić co to jest ;-) Pamiętam taki przypadek, że ktoś miał problemy z jakimś plikiem xlsx i dopiero po analizie okazało się, że ktoś wcześniej wmontował do arkusza logo firmowe, które miało...
W tym pliku nadal nie ma kodu. Nie wiem, czy to wina jakiejś nowej wersji Excela, która coś miesza. Do wersji 2010 przynajmniej było tak, że jak plik .xlsm zapisuje się jako .xls (wersja zgodna z 2003), to kod jest tam zapisywany. Załącz wobec tego kod tej funkcji jako tekst i napisz w której wersji Excela to będzie używane, żeby jeszcze nie wyszły...
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...
zależy mi żeby makro zawierało listę funduszy (kodów), które można powiększać o kolejne nowe lub odejmować niepotrzebne. Makro będzie miało za zadanie usuwać wszystkie fundusze/kody inne niż na liście. Czy ja dobrze rozumiem kolego "m4xon", że oczekujesz żeby na forum ktoś sporządził Ci listę funduszy unijnych ? :D A na poważnie to gdybyś zamiast pustego...
[syntax=vb]Sub Worksheet_Change(ByVal Target As Excel.Range) If Target.Column = 4 Then Cells(Target.Row + 1, 1).Select End If End Sub[/syntax] P.S. W załączniku plik .xlsm, o który pytałeś - należy spakować przed wysłąniem na forum.
W przypadku dwóch nagłówków wystarczyłoby If-Else. Ale jeśli masz już prawie gotowe... Uzupełniłem tylko to i owo [syntax=vb]Function formatowanie(a As Single, naglowek As String) As String Select Case naglowek Case "Cena" formatowanie = Format(a, "####.00 zł") Case "Powierzchnia" formatowanie = Format(a, "#### m2") End Select End Function Sub Proba()...
Jak plik .xlsx(.xlsm), to spakuj go RAR'em lub ZIP'em; lub zapisz jako .xls
Nie wiem, czy moja propozycja jest tym, czego oczekiwałeś, bo kryteria filtra można definiować w różny sposób a ich odczytanie nie zawsze jest łatwe. Moja propozycja to taka funkcja UDF: [syntax=vbscript]Function KrytFiltra() As String Application.Volatile With Application.ThisCell.Parent.AutoFilter.F... If .On Then If .Operator = 0 Then KrytFiltra...
Poniżej rozwiązanie z wykorzystaniem VBA Kliknij prawym przyciskiem na nazwie arkusza, z menu kontekstowego wybierz "wyświetl kod". W edytorze VBA wpisz: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then If Target.Value = "x" Then Range("C1") = Range("B1") Else Range("C1") = "" End If End If End Sub Zapisz plik w formacie...
Dziękuję za odpowiedź i wskazówki. Zastosowałem je, czyli wyłączenie 'Set MyWB' oraz uporządkowany kod wg Twojego wpisu i efekt jest następujący: Na dotychczasowym komputerze zapisuje csv zgodnie z oczekiwaniami Na nowym komputerze Excel nie wyłącza się, jednak nie zapisuje pliku. Na pasku stanu pojawia się "Zaznacz obszar docelowy i naciśnij ENTER...
[syntax=vbscript].Attachments.Add ("C:\Plik Excela.xlsm")[/syntax]
Plik ma rozszerzenie xlsm, ale nie posiada makr. To zapisz jako zwykłego 'xlsx' i zobacz.
Ok pomogło, A jak teraz zrobić odniesienie do konkretnego arkusza by jego generowała nie aktywny ? Kolejny problem jest taki że jeżeli wygeneruje plik txt to tym samym używany plik xlsm staje się nim i pyta o zapisywanie po zamknięciu. Rozumiem że muszę zastosować coś takiego : fs.CreateTextFile - ale jak mam wprowadzić by nazwę pliku pobierał z komórki...
Popraw kolego tytuł wątku - winno być wg mnie "VBA Excel wyszukiwanie danych" :?: Żeby zamieścić tu na forum plik xlsm musisz go skompresować do formatu zip, rar lub 7z :!: Co do Twojego makra i arkuszy to musisz wyjaśnić co to za wielkości umieszczone są w arkuszu1 w kolumnach D, E i F :?: i po co komplikujesz wszystko ustawiając w arkuszu1 minimalne...
A nie wynika to z tego że mam włączoną bibliotekę z wyższej wersji Excela a plik czasem otwieram w niższej? Najprawdopodobniej tak właśnie jest. Nie wiadomo tylko do bibliotek jakich obiektów i w jaki sposób realizowane są wiązania. Najprościej załączyć plik (ten który działa w E2016), co kolega clubs próbował subtelnie zasugerować ;) Może być zupełnie...
Możesz zastosować takie makro: [syntax=vbscript]Sub Kopiowanie2() ' ' Kopiowanie2 Makro ' Dim lw As Long, i As Long, j As Long Sheets("Arkusz1").Activate '1 lw = Cells(Rows.Count, "A").End(xlUp).Row '2 j = 1 '3 For i = 2 To lw '4 Range("A" & i & ",B" & i & ",D" & i & ",F" & i).Copy _ Destination:=Sheets("Arkusz2").Range("A" & j).Resize(Range("G" & i))...
W akcji harmonogramu wskazujesz program Excel, a jako parametr podajesz ścieżkę do pliku xlsm.
Próbowałem dodać cały plik, niestety format xlsm nie jest dozwolony
Od razu jaśniej. Pliki xlsm należy spakować i dopiero wysłać.
Mam taki problem z makrem. W pewnym folderze mam tylko jeden plik i jest on w formacie .xlsm. Niech się nazywa 1.xlsm Moje aktualne makro tworzy mi nowy skoroszyt excela (do innego folderu niż ten w którym jest wspomniany wcześniej 1.xlsm). Następnie chcę dokonać przeklejenia pewnych danych z starego excela (tego o którym wspomniałem 1.xlsm) do nowego....
Może najpierw funkcja, która zaznaczy komórki żółte, a potem je zabezpieczy przed zmianą. Plik z możliwością działania makr (xlsm, xls) :idea: w arkuszu roboczym wprowadź taki kod makra :spoko: [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) Unprotect "a" Target.Interior.ColorIndex = 6 Target.Locked = True Protect "a" End Sub[/syntax]...
Witam. Jestem początkujący w temacie vba. Moje umiejętności polegają na zarejestrowaniu makra, zrobieniu przycisku itp. łatwych rzeczy. Moje pytanie brzmi następująco: czy jest możliwość napisania makro które w przedziale czasowym np. co 15 minut przechodziłoby między określonym plikiem excel a powerpoint? To znaczy o godzinie 12:00 przez kwadrans widzę...
Makro napisałem zaraz pod postem, ponieważ nie mogłem załączyć pliku xlsm
Witam, otóż mam plik *.xlsm zawierający około 10 arkuszy w których są formuły i makra. Po zakończeniu edycji tego pliku chcę go przekazać dalej, ale taki plik otwiera się bardzo długo i zajmuje dużo miejsca, a dodatkowo każde przeliczenie zajmuje kilka minut... Czy jest jakiś sposób aby zapisać same wartości bez formuł i makr? Pozdrawiam i z góry dzięki...
Jeśli używasz Excela 2010, to musisz plik .xlsx lub .xlsm skompresować do pliku .zip lub .rar, bo to forum nie przyjmuje plików .xlsx ani .xlsm. Z kolei jak się zapisze taki plik w formacie .xls, to część funkcjonalności jest obcinana i nie można takiego pliku poprawnie odczytać. W Excelu 2007 nie ma tego problemu, bo plik zapisany jako .xls, wczytany...
W załączniku. Niestety dalej to samo https://obrazki.elektroda.pl/8971039800_... Mam jeszcze coś takiego ale wskazuje mi błąd : [syntax=vbscript] Sub Przycisk2_Kliknięcie() Dim folder As String Dim plik As String folder = "c:\pliki\" plik = Dir(folder & "*.xlsm") Application.ScreenUpdating = False Do While plik <> "" With...
Chciałbym do tego makra dodać to, że wszystkie te pliki, które zostaną zapisane po odpaleniu makra i wybraniu ilości kopii otwierają się [syntax=vbscript]Workbooks.Open sciezka & Cells(2, 3) & ".xlsm"[/syntax] I chesz otworzyć na raz 10 plików? Porąbany pomysł.
Nie wiem co ma do tego koda marka, skoro nie w tym w ogóle problem. Fakt jest taki, że Twój plik xlsm jest uszkodzony :cunning: Ponieważ nie możesz go pokazać na forum :?: To próbuję uzyskać wszystkie informacje nt przyczyn jego uszkodzenia :idea: Jeśli sprawdziłeś dysk - pod kątem bad sektorów w rejonach zapisu tego pliku (kopia na pendrive - wcale...
Witajcie Mam plik xlsm (załączam spakowany), w którym w arkuszu1 mam dużo danych – liczba kolumn jest zawsze ta sama (A do AD) ale liczba wierszy jest zmienna. Potrzebuję utworzyć nowy arkusz: „Arkusz2” gdzie będą dane (w identycznej formie jak w arkuszu1) zawierające w kolumnie X (gdzie są nipy) tylko te nipy które wypisane mam w...
Pliku xlsm nie mogę załączyć wiec załączam txt z głównym kodem. z procedurą with też próbowałem ale nie wiedziałem o tych kropkach. Potestuję. Gdzie można zgłębić wiedzę na ten temat o którym piszesz ...?
Dopiero teraz zauważyłem że ty też działasz na 2007 lub 2010. Wszystkie kompy macie z takimi excelami? Jeżeli tak to zapisz plik jako xlsm (dla 2010 z makrem) nie będzie błędu który występuje w trybie zgodności. A jak będziesz chciał załączyć na forum to spakuj taki plik zipem i tyle.
Mam problem z edycją Makra ...Makro tworzy już dodatkowe arkusze zmieniając ich nazwę. Wybiera i zapisuje dane od 2 wiersza w nowych arkuszach. ...dość pilny temat Jeśli chcesz żeby ktoś Ci pomógł (i to pilnie :D ) - to daj "mu szanse" i pokaż swoje dzieło - załącz plik z testowymi danymi (jeśli to plik xlsm to umieść go w archiwum zip lub rar) :!:...
Dzięki po raz kolejny. Tym razem pokazał się błąd: Program Microsoft Excel nie może uzyskac dostepu do pliku "C:\Users\was\Desktop\test 13.10.2021.xlsm". Istnieje kilka możliwych przyczyn: -Nazwa pliku lub sciezka nie istnieje -Plik jest uzywany przez inny program -Skoroszyt, ktory probujesz zapisac ma taka sama nazwe jak obecnie (nie ma)
Cześć Mam pewien problem który pewnie nie jest jakoś specjalnie skomplikowany, ale niestety mnie przerasta :( ... Mam plik .xlsm z którego chciałbym exportować jeden arkusz o zawsze tej samej nazwie (np. LW) do pliku .CSV rozdzielanego znakami tabulacji. Plik .CSV chciałbym zapisywać z nazwą pliku głównego, w lokalizacji pliku głównego i datą ze zdefiniowanej...
Załącz przykład w formie pliku excela (.xlsm trzeba spakować do .zip np.). Nie wiadomo jak to wygląda w praktyce :(
No tak. Przecież to plik z obsługą makr! Zmień rozszerzenie na .xlsm Filename:=ActiveCell.Value & ".xlsm"
Każdy plik ma 1 arkusz Ja widzę 2.;)
Witam A gdzie masz [syntax=dos]Workbooks.Open?[/syntax] [syntax=vbscript]Sub WybierzPacjenta() Dim plik As Workbook Dim wybierzPlik As Workbook Dim fDialog As FileDialog, result As Integer Set fDialog = Application.FileDialog(msoFileDialogFile... Set plik = ActiveWorkbook With fDialog .Title = "Wybierz Plik" .InitialFileName = desktop & "\Dietetyk\Pacjenci\"...
Witam. Sytuacja mam następujący problem i brak pomysłu na rozwiązanie. Mam ~1600 plików *.xlsm (ich ilość z miesiąca na miesiąc rośnie), pliki te mają identyczną strukturę, dodatkowo mam jeden plik zbiorczy *.xlsx, który to pobiera dane z wcześniej wymienionych plików xlsm i wykonuje operacje na pobranych danych. Pobieram dane z 3 komórek, korzystam...
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]
Wrzuć plik z tym formularzem (xlsm trzeba spakować zip/rar).
Sorki że się włączę a jeśli nie znamy nazwy pliku i próbujemy go znaleźć, otworzyć oraz skopiować to samo [syntax=vb]Application.GetOpenFilename("... Excela (*.xlsm),*.xlsm", 2)[/syntax] wystarczy?
Ad 3. Mniej więcej taki kod: [syntax=vbnet]Dim fdSaveFile As FileDialog Dim vSaveFolder Set fdSaveFile = Application.FileDialog(msoFileDialogFold... With fdSaveFile .AllowMultiSelect = False .Show vSaveFolder = .SelectedItems(1) End With ActiveWorkbook.SaveAs vSaveFolder & "\" & ActiveSheet.Range("B2").Value & "__" & Format(Now, "dd_mm_yyyy__hh_mm"),...
A gdzie wstawiłeś ten kod? W załączniku widzę jakiś przycisk na formie, ale już samej formy w kodzie nie widzę... Nie prościej zamieścić plik Excela? Po pierwsze primo: żeby makra działały, plik musi być zapisany w formacie .xlsm lub xls Po drugie primo: w opcjach programu Excel -> Centrum zaufania musi być włączona obsługa makr w Excelu, masz ją włączoną?
mogl by mi ktos pomoc Musisz spróbować zrozumieć jak działa makro - utwórz sobie plik xlsm (z którego będziesz uruchamiał makro) i albo nagraj wszystkie czynności, które chcesz żeby automatycznie były wykonane, albo wnikliwie przeanalizuj krok po kroku (wyobraź sobie, że przed klawiaturą siedzi jakiś lammer i Ty musisz mu dokładnie wytłumaczyć co ma...
Witam serdecznie Na początku zaznaczam, że jestem na początku swojej drogi z "zabawą" makrami w Ecxcel'u. Potrzebuje napisać makro, które pobierze mi tekst z komórki np. B3 z pliku 1.xlsm i utworzy nowy plik excel o nazwie komórki B3. Następnie do tego nowego pliku skopiuje dane z arkusza "xyz" pliku 1.xlsm zachowując przy tym formatowanie komórek arkusza...
witam, co zrobić jeśli mam kilka plików z makrami i chciałabym, aby działało na nich kilka osób? Myślałam o dysku google, ale tam nie można edytować plików .xlsm. Może macie jakieś rady? Chyba, że da się zrobić tak, by moje makra działały na arkuszu kalkulacyjnym googla?
& ".xlsm" Zapis nowego pliku w xlsx a nie xlsm.
Hej, no tak. Może będzie prościej i dołącze plik, ale na forum nie mogę wrzucić rozszerzenia xlsm
Witam szanowne grono Potrzebuję przerobić poniższe makro by zapisywało starą nazwę pliku z której został otwarty + dodawało datę jak jestem w stanie sobie z datą poradzić tak nie jestem wstanie zmusić by plik miał starą nazwę Sub Przycisk3_Kliknięcie() ' ' Przycisk3_Kliknięcie Makro ' Range("T4").FormulaR1C... = "=NOW()"...
Przyznam że z twojego załącznika dalej nie wiem co chcesz robić. Jest niepełne i ciężko cie zrozumieć. Zrób katalog umieść w nim parę załączników (wykorzystanych zdjęć) i pełny plik z makrami (z kocówką "xlsm") oraz plik personal.xlsb bo do niego też się odnosi jeden przycisk spakuj wszystko jeszcze raz i załącz.
Próbuję to zmienić jakimiś konwerterami online Nie spotkałem żadnych efektywnych konwerterów online :cry: , ale ostatnie wersje LibreOffice posiadają już pewne możliwości wykorzystywania bezpośrednio kodów VBA :idea: :D Poprzez ustawienie niższego poziomu bezpieczeństwa dla makr, oraz zmianę ustawień opcji - w sekcji właściwości VBA [/b]:idea: można...
W jaki sposób utworzyć taki CSV, w którym będzie prawidłowy pełny numer konta ? Podobny problem z importem wyciągów bankowych do Excela rozwiązałem poprzez drobne makro z funkcją Replace, które w pliku csv do każdego ciągu 26 cyfr dodaje przedrostek PL ;-) [syntax=vbscript]Function rePlaceMethodRegEx(regPattern As String, origString As String) '***************************************...
excel wyświetla mi okno do zapisu makra Zapisz skoroszyt jako plik z obsługą makr (xlsm).
Niestety nie moge zalaczyc pliku w formacie xlsm
Mógłbyś to zapisać jako plik XLS a nie XLSM? Nawet nie wiem, czym to otworzyć.
Kliknij na 'Odpowiedz' lub 'Zmien' Kliknij na dole 'Dodaj załącznik (max. 50MB)' i Pokaż plik (xls). Jeśli xlsm, a następnie przed tym zapakuj go RAR lub zip
Jaki format pliku podstawowego miałeś w WPS. .xls, .xlsx, .xlsm, .xlt, czy inny?
Trochę ruchu kombinowanego, i u mnia to działa. Musiałem zmodyfikować plik comp.mod, zamiast 'Pusty arkusz. xlsx ' poprawiono na 'Pusty arkusz. xlsm ' Przycisk 'Wklej do Excel' należy nacisnąć co najmniej 0,5 s.
Najlepiej wrzuć plik Excel'a jako załącznik (xlsm spakowany) zawierający formularz kalendarza. Ten z eksportu jest niekompletny...
Trzeba uzupełnić pętlę... Rozumiem, że wartość w kolumnie B będzie odpowiadała nazwie arkusza: Sheets(cells(A,2).value) Byłoby łatwiej, gdybyś wrzucił plik z przykładowymi danymi w arkuszu "Buchen". Pytanie dodatkowe: czy w arkuszach docelowych dane mają być dokładane narastająco, czy nadpisywane przy każdym uruchomieniu makra? P.S. Pliki xlsm należy...
Trudno mi się było przebić przez logikę tych Twoich plików, ale mam nadzieję, że jest to co chciałeś. Poprawione makro jest w pliku 19.xlsm w module1 Sub Zapisywanie. Sprawdź, czy działa jak chciałeś i przenieś sobie do pliku ZlecenieCent.
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...
Udało mi się znaleźć i zmodyfikować kod :?: Coś mi się zdaje, że modyfikowałeś ten kod tylko klawiszem delete ? :D Wg Twoich przykładowych plików makro "uruchamiane" ma być ze zwykłego pliku i kopiować z pliku z makrem ??? :please: Proponuje Ci przygotować najpierw właściwy plik typu xlsm i cały transfer danych przećwiczyć pomiędzy 2 arkuszami - w...
Podbijam, Mam też podobny problem. Chciałbym by makro porównywało wartości dla danego produktu z dwóch plików, jeżeli się rożnią to by wstawił obok np. do kolumny C A to nazwa produktu B to ilość W dwóch plikach taki sam układ. W kolumnie A i B mogą być puste wiersze. Poratuje ktoś ? :) Pozdrawiam Paweł Dodano po 1 Cześć, Dziękuję, Ale mam jeszcze jeden...
Pewnie można by za pomocą funkcji i tabel przestawnych, ale tu aż się prosi o użycie jednego zapytania SQL. Usuń kropki z nazw kolumn, sformatuj wszystkie daty jako daty, plik zapisz jako .xlsm i użyj: [syntax=vbscript]Private Sub CommandButton1_Click() On Error GoTo myErr With Sheets("wynik") If .FilterMode Then .ShowAllData .Range("A2:G" & Rows.Count).ClearContents...
Dziękuję. Wszystko działa. Zamykam Dodano po 8 Pojawił się jeszcze jeden problem. Makro nie chce zapisać do pliku xlsm Jest na to jakiś sposób? Dodano po 13 Przebrnąłem przez problem z zapisem do xlsm dodając: FileFormat:=xlOpenXMLWorkbookMacroEnable... Jednak napotkałem na kolejny problem, makro kopiuje arkusz ze wzoru z obsługą makr jednak nie kopiuje...
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.
Chce mieć to makro w drugim pliku do którego będa dane kopiowane i pod przycisk makro przypisane
odznaczenie tych opcji niestety nie pomoże, bo plik będzie wysyłany do wielu osób Bo to są indywidualne ustawienia 'ofisa' Wszyscy muszą ustawić ustawienia tak jak pisałem wcześniej. Np. nie wyśle ci pliku (xls , xlsm nie otworzysz) włączającego makra jeżeli masz je wyłączone (to są zabezpieczenia MS)
excel klikniecie eberspacher silnik trafopowielacz wyprowadzi
Jak przerobić włącznik w nawilżaczu U-Smiler QZ3.5L? Schemat podłączenia przewodów zapłonowych w Linde H16
