sprawdź . . .
Czy uruchomiłeś kod w pliku z załącznika, czy w swoim skoroszycie? Jeśli w swoim skoroszycie, to czy dodałeś arkusz o nazwie "Ostatni"? Te komunikaty wskazują, że ze skoroszytu próbuje się usunąć wszystkie arkusze. Wtedy przy usuwaniu ostatniego pojawiają się takie komunikaty.
3. nowy skoroszyt zamknąć Na sam koniec nowo utworzony skoroszyt zamyka bez zapisywania go Jakie jest więc cel tworzenia nowego skoroszytu?
Musisz zmienić warunek. Zamiast 'Kill' coś a'la [syntax=vbscript] Plik = ActiveWorkbook.Path & "\" & Wiazka & ".xlsx" If Dir(Plik) <> "" Then Set n = Workbooks.Open(Plik) n.Sheets.Add Else Set n = Workbooks.Add End If [/syntax] Przy zapisywaniu pewnie podobnie jeśli istnieje "zwykłe" 'Save', jeśli nie 'SaveAs"
Przykład korzystania z okna zapisywania z filtrem ZapiszJako = Application.GetSaveAsFilename(fileFi... Excel (*.xls), *.xls") I jeśli domyślna ścieżka i nazwa z komórki to sciezka = Application.DefaultFilePath & "\" nazwa = Range("A1").Value ZapiszJako = Application.GetSaveAsFilename(Initia...
W Twoim kodzie było: [syntax=vbscript]ActiveWorkbook.Close[/s... tę linijkę po prostu przepisałem. Gdy zapisuje się plik pod nową nazwą przez SaveAs, otwarty skoroszyt przyjmuje nazwę zmienioną pod którą był zapis. Nie wiem, czy można zmienić nazwę otwartego skoroszytu inaczej niż przez zapisanie go. Zatem w tym przypadku proponuję ponowny zapis...
Plik z rozszerzeniem .xls to stara wersja skoroszytu excel w którym można było zapisać również makra. .xlsx to nowa wersja w której nie można zapisać skoroszytu z makrem. Dlatego nie zapisuje w .xlsx musisz zapisywać w pliku z obsługą makr czyli .xlsm
Dlaczego Dir? Dlatego, że Autor nie chce zapisywać aktywnego skoroszytu do pliku, który nie istnieje. [syntax=vbscript] If Dir(Plik) ="" then ActiveWorkBook.SaveAs....[/syntax]
Jeśli to ma działać w kilku czy we wszystkich arkuszach, trzeba ustawić formatowanie warunkowe w każdym z tych arkuszy. Zdarzenie SelectionChange można oprogramować na poziomie skoroszytu. Można to wszystko zapisać w VBA, ale trzeba określić zakresy formatowania i arkusze. W załączonym pliku kod, który we wszystkich arkuszach roboczych formatuje zakres...
Zmiana skoroszytu po nieudanej próbie z lokalizacji sieciowej. Mam skoroszyt, który otwiera inny skoroszyt z lokalizacji sieciowej po ścieżce zdeklarowanej w makrze, zapisuje go w swojej lokalizacji, a następnie aktualizuje się, zamyka skoroszyt, z którego dokonał aktualizacji danych, zapisuje zmiany i zamyka najpierw skoroszyt źródła, a potem siebie...
Hmm. Żeby sprawdzić warunek True/False (przy warunkowym uruchomieniu ze zmienną globalną) procedura musi się uruchomić. Wbudowany autozapis nie spełnia wymogów? [url=http://www.jkp-ads.com/download.asp... znalazłem jakiś dodatek (Autosave.zip), może się nada. W ostateczności można "napisać" procedurę przy otwarciu, a przy zamknięciu usunąć. [url=http://www.cpearson.com/excel/vbe.a...
Witam, No to jeszcze jedno pytanko. W moim pliku "1" dołożyłem drugi przycisk "CommandButton1", który zapisuje mi dane i zamyka skoroszyt. Chciałbym zrobić tak, że gdy "aktywny" jest pierwszy przycisk to ten mój (do zapisywania) jest nieaktywny. I na odwrót. Jak to zrobić??
W skoroszycie, z którego będę kopiował jest 1600 arkuszy o określonych nazwach, które składają się z czterocyfrowej liczby (w przypadku liczb do 999 dodawane jest 0 z przodu) oraz kodu literowego. Liczby nie są kolejne, mogą znajdować się w dodatkowej tabeli, a kodów jest 4 rodzaje: SUMA WDT WNT WŚU Czyli 400 liczb po 4 kody czyli 1600 arkuszy. W nazwie...
Witam, chciałabym usprawnić swoją pracę w excel, ale dopiero zaczynam swoją przygodę vba. Potrzebuję napisać makro dzielące dane w moim skoroszycie po kolumnie E w której mam zawarty typ i tam występuje 7 rodzajów typów. Do tej pory ręcznie filtruję po typie, kopiuję dane wraz z nagłówkiem do nowego skoroszytu i zapisuję jako filtrowany typ. Czy mogę...
If odp = " haslo123 " Then W zaznaczone miejsce wpisz swoje hasło. Jeżeli użytkownik za pośrednictwem InputBox wpisze TEN ciąg, wtedy uruchomi się Twoja procedura. W innym przypadku kod, który umieszczony jest po instrukcji Else Nagrywając makro rejestrator VB NIE zapisuje hasła, które wpiszesz.
Lista niedozwolonych znaków dla nazwy pliku w Windowsie jest krótsza, w dodatku domyślnie nie można niektórych z nich wstawić jako nazwy arkusza, więc finalnie można ją skrócić jeszcze bardziej. Możesz sobie sprawdzić listę i wstawić własne znaki. Pełen przykład poniżej: [syntax=vbscript]Private Sub CommandButton1_Click() ' sendAll Makro ' Makro zarejestrowane...
Witam, mam pytanie dotyczące możliwości tworzenia kopii arkusza nad którym aktualnie pracujemy. Modyfikując i pisząc nowe formuły w VBA nie zawsze można przewidzieć konsekwencje powodujące zawieszanie się komend lub co gorsze wpadnięcie wykonywanych działań w "pętlę" co nieraz kończy się taką deformacją VBA lub samego arkusza, że trzeba wszystko zaczynać...
Też się przyda, ale pójdźmy dalej. Zapisujesz login użytkownika w jakiejś komórce arkusza. Jeżeli zapisanie pliku się udało to masz już otwarty skoroszyt i możesz na nim pracować, jeżeli nie dajesz komunikat z loginem znalezionym w arkuszu. Musisz pokombinować z kolejnością operacji, żeby niepotrzebnie nie męczyć dysku. :)
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)...
Ale nic się nie uczysz. :( i nie czytasz ze zrozumieniem. Jeszcze raz zaznaczę: musisz ustawić zmienną globalną która będzie pamiętana poza działającą procedurą. Zwróć uwagę gdzie jest deklaracja zmiennej "i" w moim kodzie a gdzie w twoim. (gdzie jest deklaracja a gdzie początek procedury) ... aby przy naciśnięciu skrótu Ctrl+Shift+A przenosiło wartość...
Rozumiem, że w pliku jest arkusz roboczy, do którego do określonych komórek wpisuje się dane, które potem w arkuszu "Baza" mają utworzyć dwie kolumny. Zakładam, że arkusz "Baza" istnieje. W przytoczonym makro dostrzegam 2 błędy: 1. W wierszu NewRow = Range("A65536").End(xlUp).Row + 1 powinno być C65536 lub D65536, bo do tych kolumn dopisywane są dane...
Dziękuje za szybka podpowiedź. Jednak chodzi o co innego - pewnie nieprecyzyjnie się wysłowiłem na początku. Otóż nazwa źródłowego pliku (w kodzie KALKULATOR_1) zmienia się automatycznie (niezależnie od operatora) podczas zapisu pliku źródłowego. Przykład operacji: - otwieram skoroszyt KALKULATOR_1 (jest to kalkulacja zamówienia dla Klienta); - wprowadzam...
Witam, używając samochodu służbowego w pracy traci się dużo czasu na wypełnianie różnego rodzaju druków. Postanowiłem uprościć wypełnianie kart drogowych, w tym celu stworzyłem dwa skoroszyty "Master C-34" - gdzie dokonuje się wpisów oraz "Karty C-34" - gdzie poszczególne karty są archiwizowane. Wszystko działa bez zarzutu do momentu kiedy wspomniane...
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...
Ale dlaczego się tam zapisały (w PERSONAL.XLSB)? Do końce jeszcze nie znam wszystkich "zagrań" excela 2007 i wyżej ale już coś podobnego gdzieś miałem. Już wiem (to nie jest kwestia wersji - ale nigdy tego nie używałem więc ta niewiedza) Sprawa dotyczy "zapisywania nagrywanego makra i opcji gdzie ma być przechowywane makro. Zapewne masz zaznaczone...
Witam! Mam prośbę o pomoc przy kolejnym kodzie. Niestety Excel u mnie w firmie napotyka błąd z zapisywaniem skoroszytów, które zawierają obrazy pobrane z innego skoroszytu. Nie są w stanie tego naprawić i muszę ominąć błąd. Mam zamiar zrobić to w ten sposób: *mam do dyspozycji prezentację z opisanymi obiektami na rynku i chciałbym z niej pobrać slajdy...
Teraz jednak chciałbym, aby od czasu do czasu była możliwość zapisania tych dwóch plików jednocześnie Dziwi mnie Twój kod :D w którym najpierw zamykasz (bez pytania) aktywny skoroszyt, a potem chcesz go zachować :?: :cry: Ale w kwestii wyboru sposobu zapisywania - to można wykorzystać kod typu: [syntax=vbscript] Select Case MsgBox("Czy zapisać oba...
U mnie w każdym skoroszycie działa makro blokujące wszystkie formuły na stałe, oraz pozostałe komórki, po wprowadzeniu danych w komórce automatycznie jest ona blokowana, do tego obligują mnie przepisy akredytacyjne które wymagają, że wszystkie dane zapisywane w formie elektronicznej powinny być zabezpieczone przed każdą nieupoważnioną osobą która chciałaby...
Mam 2000 szt skoroszytów stworzonych z szablonu w EXCELU 2002 który miał dodatek (tpwiz) zapisywania w bazie danych i to chodziło OK do czasu zmiany na EXCEL 2010. Przerobiłem to tak aby każdy z nich w przypadku naniesienia jakiejś poprawki dopisywał się do tej bazy (z zdarza się to często). Jak kodem VBA przypisać do bieżącego-otwartego skoroszytu...
tą nazwę wpisuje w komórkę jednego ze skoroszytów ale niestety clubs Twoja propozycja też nie działa Rozumiem że tą nazwę pliku zapisuje do komórki 'Range("W4")' razem z rozszerzeniem? bo jeżeli nie to [syntax=vbscript]Set plik = Workbooks(Sheets("dane").Range("W4").Val... & ".xls")[/syntax]
Witam, Próbuję napisać swoje pierwsze MAKRO w VBA i ugrzązłem w połowie pracy. Dlatego też proszę o pomoc w celu naprowadzenia na rozwiązanie problemu. Celem programu jest przetwarzanie danych z jednego skoroszytu i zapisywanie ich w drugim. Na dane składają się uszeregowane w interwałach miesięcznych dane spółek notowanych na GPW z uwzględnieniem kryterium...
Witam, mam problem z zapisem skoroszytu, jako plik txt, przy włączonej ochronie arkusza (z hasłem). Wszystko działa dobrze, dopóki nie zabezpieczę kodu VBA hasłem - wówczas pojawia się: Run-time error '1004': Method 'SaveAs' of object'_Workbook' failed [syntax=vbscript]ActiveWorkbook.SaveAs Filename:="C:\!\Test1", _ FileFormat:=xlTextPrinter ActiveWorkbook.Close...
Kod działa świetnie na tym podanym przykładzie:-) Niestety po przeniesieniu kodu do innego pliku, krtóry jest zbudowany analogicznie - niestety kod już nie działa. Czy mógłbyś mi jeszcze z tym pomóc na przykładzie poniższego zrzutu? Nie mogę zamieścić całego pliku. I chciałabym zapisywać pliki do jednej lokalizacji na dysku sieciowym, załóżmy w dowolnym...
Witam, potrzebuję plik, w którym zapisywane są pewne dane, a następnie chciałabym aby były one filtrowane i dzielone na nowe skoroszyty. W załączniku mam przykładowy plik, gdzie odbywa się filtrowanie, a nawet rozdzielanie danych, ale na poszczególne arkusze. I teraz pojawiają się problemy: - nie potrafię rozdzielić i zapisać danych w nowych skoroszytach...
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...
Witam, Potrzebuję pomocy. Mam skoroszyt w Excelu, a w nim ok. 40 arkuszy. Każdy arkusz osobno nosi nazwę "Nazwisko Pierwsza litera imienia.". Mam skrypcik, który za pomocą kliknięcia przycisku "Zapisz pliki" zapisuje mi wszystkie arkusze w jeden folder o nazwie takiej jak nazwa pliku skoroszytu oraz w tej samej lokalizacji co skoroszyt. Skonfiguruję...
Dzień dobry. [syntax=vbnet]Sub Wygeneruj() Dim sciezka As String Dim i As Integer Dim FolderPath As String, path As String, count As Integer FolderPath = "C:\BC" path = FolderPath & "\*.xlsm" Filename = Dir(path) Do While Filename <> "" count = count + 1 Filename = Dir() Loop count = count + 1 Sheets("Dane do list").Range("F12").Value = count...
A nie użyłeś Option Explicit? Nie wiem gdzie ta opcja jest. Jak pisałem wyżej wyeksportowałem wszystkie okna i moduły i zaimportowałem do czystego skoroszytu, skopiowałem arkusze i na razie działa. Przy okazji: Jak wymusić zapis (nadpisanie) pliku tak, żeby nie było komunikatu że już taki plik istnieje? Po prostu żeby bez pytania zapisywał. ActiveWorkbook.SaveAs...
Witam, Potrzebuję pomocy przy napisaniu makra do tworzenia kilku plików, na podstawie danych zawartych w konkretnym skoroszycie opartym na tabeli przestawnej - makro miałoby tworzyć pliki, które nazywałyby się dokładnie tak jak nazwy w konkretnej liście - arkusz lista klientów,znajdujacej sie w dokumencie. Listę stworzyłam sobie za pomocą makra z unikalnych...
Witam, Tworzę aplikację na bazie vba excel i danych przechowywanych w accessie, którą mogę obsługiwać ja, powiedzmy „administrator” i „klient” i utknąłem na zasadniczym z mojego punktu widzenia elemencie. Otóż idea jest taka, że bazę danych można modyfikować po stronie administratora i klienta, modyfikację danych realizuje przy...
Mam pytanie odnośnie usuwania danych w komórkach Mam jeden skoroszyt który pełni funkcje wzoru "wzór.xlsm". Po jego wypełnieniu i użyciu makra zapisz , zapisuje się on w określonej lokalizacji jako kolejny numer pobrany z komórki np: "12.test.xlsm" Jak zrobić żeby w momencie otwarcia tylko i wyłączenie wzoru czyścił mi dane z określonych komórek. W...
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...
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...
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ć...
Dziś chciałbym spytać jak sprawdzić czy, używając metody CreateObject("Excel.Application"), mamy już uruchomioną drugą aplikację Excela. Wyjaśnię pokrótce dlaczego chciałbym to sprawdzić. Generalnie w mojej aplikacji nie korzystam z arkuszy, to znaczy nie mam tam żadnych danych ani niczego nie zapisuje. Ale w pewnych sytuacjach potrzebuje wygenerować...
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...
okobaka: w temacie: http://www.elektroda.pl/rtvforum/topic84... - sprawa została oparta o makra, vba, natomiast zapodany przeze mnie gotowiec jest wywoływany funkcyjnie, a uruchamia się każdorazowo gdy włączamy excela. Reasumując - każdy sposób prowadzący do określonego celu jest jak najbardziej dobry Korzystam z twojej funkcji, zauważyłem jednak,...
Dziekuje za odpowiedz z kursu napewno skorzystam i wezme sie za prace... poszedlem troche na latwizne i udalo mi sie przerobic czyjes makro i smiga wysmienicie moze komus tez sie przyda pozdrawiam Sub OperacjeHurtowe() Dim wbkSkoroszyt As Workbook Dim i As Long, szukWiersz As Long, wiersz As Long Dim sciezka As String ' okreslam sciezke szukania...
Można zrobić "czysty" plik z makrem. Kopiować go i potem dodawać dane. Innym sposobem jest export makra do jakiegoś pliku (a własciwie nie makra a całego modułu więc oddzielny moduł dla danego makra jeżeli nie chce się więcej kopiować) a potem jego import. Poniżej kod Workbooks("Zeszyt1.xls"...
Dzień dobry, Proszę spróbować zastosować takie makro: [syntax=vb]Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim s As Long, n As Long, i As Long With ActiveSheet.UsedRange s = .Row n = .Rows.Count For i = 1 To n If .Cells(i, "A") > 0 And .Cells(i, "K") = "" Then .Cells(i, "K").Activate MsgBox ("Komórka K" & i + s - 1 & " nie została wypełniona."...
Witam Wszystkich; Za pomocą komendy Workbooks.Add tworzę nowy plik, chcę skopiować wszystkie arkusze z poprzedniego do nowo utworzonego. Próbuję zrobić to tak: [syntax=vb]Sub PRSONALZapisCustomerFile() ' Zapisuje plik estimate 'deklaracja zmiennych Dim wiersz As Long Dim z1 As Long Dim z2 As Long Dim myName As String Dim myPath As String Dim sh As Worksheet...
No właśnie... a chodzi o to, że te nazwy nie będą raczej jednolite, sprawę komplikuje również to, że na podstawie tych zmiennych tekstowych danych będę musiał robić raport co kilka dni.... Dlatego tak mi zależy na programiku,który by ściągał tekst do excela. Dodano po 23 Ktoś kiedyś na tym forum polecał tą stronę: marcinj12, a czy mógłbym Cię prosić...
Mile widziane inne sugestie :D W excelu są zwyczajowo używane pewne nazwy (np. skoroszyt, arkusz, tabela, formularz, inputbox, msgbox itp), których niewłaściwe używanie jest "zakazane" bo wprowadza w błąd sam program i wszystkich potencjalnych użytkowników :cry: Na podstawie Twoich plików trudno zrozumieć co Ty w zasadzie chcesz realizować w tym projekcie...
Trochę mi się nie zgadza. 1. Uruchamiam makro w folderze gdzie mam wszystkie pliki: 2. Pobiera nr handlowca np. z Sprawozdanie 1, 3. Otwiera Raport i wyszukuje nr handlowca 1, 4. Kopiuje wskazany zakres komórek, 5. Wraca do Sprawozdanie 1, 6. Wkleja we wskazanym miejscu pobrane dane, zapisuje i zamyka plik. 7. Przechodzi do Sprawozdanie 2 i pobiera...
Niestety, z tego co się orientuję ustawienia wskaźnika powiększenia widoku dokumentu zapamiętywane są w samym dokumencie podczas zapisywania dokumentu. Po ponownym otwarciu dokumentu współczynnik powiększenia będzie dokładnie taki sam, jak po jego zapisaniu. Pozdrawiam. UPDATE: Jedyna droga aby pliki otwierały się zawsze w takim samym powiększeniu jest...
Witam, po pierwsze proszę o wyrozumiałość jako, że z vba praktycznie nie miałem wcześniej do czynienia :D Mam poniższy kod który zapisuje pliki excelowe do pdf w wybranej lokalizacji : Sub Archiver() ' Dim sciezka As String polandlate = "C:\Users\Mateusz\Desktop\latte... 'files from Poland Late Workbooks.Open Filename:="C:\Users\Mateusz...
Cześć, Przyda mi sie pomoc przy skrypcie vba. mam excela ktory ma się zapisywac pod nazwą pobieraną z komórek "b1" & " " & "b2" & "" & "b3" Plik pod ta nazwą potrzebuje wysłać jako załacznik. Plik się nie zapisuje i nie wysyła. Proszę o pomoc. Dodano po 1 doszedłem do wniosku że problemem moze być to, że w nazwie pliku nie dodaje rozszerzenia pliku...
Witam. Mam ok 60 plików CSV (pliki tekstowe oddzielone przecinkami) znajdują się w jednym folderze. Pliki mają różne nazwy (przykładowo: 21172001 6.28.18 13.07.05) każdy plik ma tyle samo kolum (po przecinku) wiersz pierwszy: a,b,c,d,e,f,g,h,i, wiersz drugi: 1,1,1,0,0.00,0.00,N-m,0,0 wiersz trzeci: 1,1,1,0,0.00,0.00,N-m,0,0 Potrzebuję makro które: 1....
aby okno przyjmowało konkretną ścieżkę z serwera połączyć okno z daną ścieżka na serwerze pracuje na serwerze jest problem z ścieżką do serwera i tak w kółko 1. Skąd jest plik, który próbujesz zapisać na serwer ? Z tegoż serwera, czy miejscowo, z DT ? 2. Czy mapowania ścieżek do serwera mogą się zmieniać w czasie ? 3. Spytaj admina, czy przypadkiem...
Czesc wszystkim, Czy ktos bedzie w stanie pomoc mi z optymalizacja kodu vba? Sprawić by byl on czytelniejszy. Oprócz tego potrzebna jest mi pomoc w dodaniu do kodu vba 2 rzeczy: - w zależności od wersji offica musza się dodac odpowiednie wersje biblioteki outlooka - plik musi sie zapisywać i szyfrować z hasłem Plik będzie udostępniany w formie szablonu,...
odnoszę wrażenie że przydatność tak dobrze zabezpieczonego i niedziałającego kodu jest wątpliwa. Jako że ciekawił mnie temat zabezpieczeń ms offis stąd ten temat. Generalnie w nowych metodach zabezpieczeń projektu vba nie ma już hasła (czyli nie korzystamy z menu>tools.>..>protection, pomijam też export kodu do dll), jak wiadomo hasło było zapisywane...
A ewentualnie taka opcja? W pliku A(o stałej nazwie) jest Makro, które: Otwiera wskazany(przez userform) plik B ze zeminną nazwą. W pliku B filtrowane są dane i kopiowane do pliku A(o stałej nazwie) do nowo utworzonej zakładki - do tej chwili wszystko mam. Teraz chciałbym aby makro przechodziło do pliku B, który wczesniej był wskazany w Userform i zamykało...
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...
Zużycie ramu przez ten czas wzrosło o ok. 0,5 GB Czy usuwasz kwerendę/y po każdym add, refresh? Jeśli nie, to policz ile ich jest w skoroszycie. Np poleceniem [syntax=vb]Msgbox=ActiveWorkbook.Connect... to jest przyczyną "połykania" RAM'u...
Poprawiłem na xlm, ale dalej pokazuje mi błąd 1004. W opisie jest: Excel nie może uzyskać dostępu do pliku 'C:\users\.........\Desktop". Możliwe przyczyny to: 1. Nazwa pliku lub ścieżka nie istnieje; 2. Plik jest używany przez inny program; 3. skoroszyt, który próbujesz zapisać ma taką samą nazwę jak otwarty.
Chciałem skorzystać z vba ponieważ po pobraniu danych z sql chce je zapisywać w konkretnym skoroszycie na końcu danych z poprzednich miesięcy. Planowałem tak zorganizować dokument by każde makro z zapytaniem (+ informacja gdzie zapisać wynik) było w osobnym module. Korzystałem z zewnętrznych źródeł danych jednak z pomocą tej funkcji mogę pobrać dane...
Zasugeruję znowu rozwiązanie Access'owe. Raport okresowy, generowany na podstawie danych z formularza. Wybór daty od-do lub ostatni tydzień lub od początku miesiąca, tygodnia, itp. Dałbym możliwość wyboru asortymentu. Domyślnie cały, ale gdybyś chciał sprawdzić ile wynosi sprzedaż tylko Np towaru o kodzie P11, powinna być taka możliwość. Nie widzę potrzeby...
Dziękuję za odpowiedzi, ale... chodzi mi o to, żeby tekst (nazwa dnia tygodnia) występujący w komórce A1 "Arkusz1" determinował do jakiego, wcześniej utworzonego w tym samym skoroszycie arkusza, będą zapisywały się dane umieszczone w tabeli, np. B2:F20 "Arkusz1". Dlatego też, wydaje mi się, że bliższą rozwiązania mego problemu jest odpowiedź otrzymana...
Dzień dobry! Borykam się z podobnym problemem. Też od dłuższego czasu nie potrafię sobie z tym poradzić. Co gorsza raz działa, a raz nie! Tzn. U mnie za którymś razem wywołania makra wyskakuje błąd związany z procedurą Paste w Waroksheets. U innych użytkowników błąd jest cały czas i za każdym razem wywołania się pojawia. Co chciałem osiągnąć pisząc...
Właśnie wpadłem na takie rozwiązanie, miałem właśnie prosić o opoinię czy jest to poprawne rozwiązanie: ActiveWorkbook.ChangeFileAccess Mode:=xlReadWrite, Notify:=False If ArkRoboczy.ReadOnly = True Then Set ArkRoboczy = ThisWorkbook ArkRoboczy.Activate End If Dzięki za zainteresowanie, proszę jeszcze tylko o odpowiedz czy konieczne jest : Application.DisplayAlerts...
Witam, Mam pytanie dotyczące excela online 365 . Otóż posiadam 1 plik główny (zbierający dane) z 150 innych plików. Te 150 plików również pobierają dane z pliku głównego. Problem polega na tym, że pliki te nie mają możliwości obsługi łącz do skoroszytów zewnętrznych, przez co nie wyświetlają się aktualne zmiany. Chciałbym aby była możliwość edycji online...
zamykanie skoroszytu zamknięcie skoroszytu zakres skoroszytu
wzmacniacz gitarowy baterie chrysler voyager kontrolka schemat mostka prostowniczego
whirlpool silnik inwerterowy budowa windy towarowej
Schemat podłączenia podciśnień Mitsubishi Pajero 1990 Czeski zespół tyrystorowy: TESLA, EPRONA, ON Semiconductor