Tak jak pisałem przyczyną problemów były odwołania strukturalne do tabel Excela. Po zamianie tych odwołań na tradycyjne odwołania do zakresów, dane powinny być odczytywane z zamkniętych plików. Tam gdzie w kolumnach masz daty (w przeglądarce) w kodzie formatu dopisz sobie na końcu dwa średniki po dacie. To żeby nie wyświetlać zerowych dat. Tam gdzie...
Witam serdecznie. Mam mały problem dotyczący zamykania okien programu Excel 2013. Potrafię otworzyć powiedzmy 5 okien Excela za pomocą pliku wsadowego, ale dwa z nich chciałbym zamknąć również za pomocą polecenia z pliku wsadowego nie zamykając całego Excela. I to jest dla mnie wyzwanie, którego nie potrafię wykonać na dzień dzisiejszy. Proszę o pomoc....
Masz dwa X w prawym górnym rogu? Jeden do zamykania excela. drugi do zamykania aktywnego skoroszytu? Czy tak samo zachowuje się jak zamykasz z menu Plik - Zamknij (nie "Zakończ").
Jaki kod byłby poprawny? Zamiast zamykać Excela (aplikacje :!: ) zamknij ten ukryty skoroszyt :D np.[syntax=vbscript] Workbooks("TenUkryty.xlsm").Close SaveChanges:=False[/syntax]
Zrób jedno makro jak uruchamia się skoroszyt które chowa paski oraz drugie uruchamiane jak zamykasz skoroszyt które będzie odkrywało paski. Powodzenia
Witam. Mam otwarty 1 skoroszyt w EXCELU. Klikając w górny "x" zamykałem skoroszyt i cały Excel (do niedawna). Teraz zamyka się tylko skoroszyt, a EXCEL pozostaje otwarty. DLACZEGO?
Żeby zablokować zamykanie skoroszytu musisz napisać obsługę takiego samego wyjątku dla drugiego skoroszytu a w niej dać Cancel = True. Tylko trzeba będzie pokombinować, żeby to nie zadziałało gdy sam będziesz chciał zamknąć tą procedurką.
Mam jakiś tam plik w Excelu który pracuje na podstawie makro, mam w tym pliku kilka arkuszy. Ponieważ plik będzie uruchamiany na kilku komputerach a zarazem posiada kilka zabezpieczeń wpadłem na pomysł aby podczas zamykania skoroszytu nastąpiło ukrycie wszystkich arkuszy oprócz jednego. Wszystko działa OK, ale i zarazem denerwuje gdyż po ponownym uruchomieniu...
Przy zamykaniu skoroszytu Workbook_BeforeClose(Cancel as Boolean) należy zakończyć automatyczny zapis: Application.OnTime ActionTime, "TimeStart",,False Application.OnTime ActionTime, "Zapis",,False
A teraz widzę ze zamyka stworzony skoroszyt i zapisuje w moich dokumentach. Myślałem ze nie tworzy, ale spojrzałem na kod. Chyba jest ok PS. Jak tylko cos zmienie w kodzie, np. wylacze zamykanie skoroszytu waze i mniej wazne to wszystko sie wykrzacza. Nie rozumiem tego. PS. 2 Może to ustawienia regionalne systemu (mam ENG) ale muszę udać się do IT bo...
Przede wszystkim załącz przykładowy plik i jednoznaczny opis, aby było można zorientować się do czego zmierzasz ? Wstępnie można Ci zaproponować uruchamianie jednego makra, które w zależności od wstawionej opcji (1, 2, 3) w określonej komórce uruchamiać będzie różne działania (kopiowanie danych, drukowanie lub zamykanie skopiowanego skoroszytu) ;-)
W Excel 2007 wykorzystuje w podobnej sytuacji drobne makro, które blokuje hasłem niepuste komórki przy zamykaniu skoroszytu :D [syntax=vbscript]Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim cell As Range ActiveSheet.Unprotect Password:="haslo" For Each cell In ActiveSheet.UsedRange If IsEmpty(cell) Then cell.Locked = False Next cell ActiveSheet.Protect...
A ja tak się napracowałem nad tym przyciskiem, żeby zmieniał się na nim opis. I wszystko na darmo, bo brak załącznika i dokładnego opisu użycia. :cry: Teraz bez przycisku, procedura włącza się przy otwieraniu skoroszytu i wyłącza przy zamykaniu. Działa w arkuszu o nazwie kodowej Arkusz1. W dalszym ciągu nie piszesz jak chcesz wskazać arkusz, w którym...
Witam Wszystkich, Chciałbym aby podczas otwierania/zamykania określonego skoroszytu uruchamiało się makro z dodatku. Próbuję ze zdarzeniem [syntax=vb]Call AddIns.xlam!.Module1.MakroName[/syntax] Jednak to nie to. Proszę o pomoc
3. nowy skoroszyt zamknąć Na sam koniec nowo utworzony skoroszyt zamyka bez zapisywania go Jakie jest więc cel tworzenia nowego skoroszytu?
Dziękuję za pomoc. Zamykam temat :)
Dziękuje. zamykam
Podmieniłem pętle i opisałem co najistotniejsze. Nie sprawdziłem działania.[syntax=vb]Sub testit() dato = Range("B3") ' nazwa folderu z plikami do pobrania danych myvar = ThisWorkbook.Path & "\" & dato 'wywołanie funkcji If TypeName(myvar) <> "Boolean" Then For i = LBound(myvar) To UBound(myvar) ' otwieram 1 odnaleziony skoroszyt (a w...
Dziekuje Panom za wypowiedzi - byc może w przyszłości to rozwiazanie znajdzie zastosowanie - jednakże wobec braku globalnego rozwiązania i tego że sama zmiana powiększenia zajmuje 3-4s po otwarciu pliku, 10s to zdecydowanie za długo. Zamykam.
Dzień dobry, Oba skoroszyty: źródłowy i docelowy powinny być otwarte w tej samej instancji Excela (to znaczy gdy pierwszy skoroszyt jest już otwarty, należy kolejny otworzyć z menu Plik, a nie przez kliknięcie na nazwę pliku spoza Excela). Wtedy wystarczy w skoroszycie docelowym wybrać komórkę, gdzie ma być odwołanie, wpisać tam =, a następnie odszukać...
Dzięki wszystkim za pomoc, temat zamykam.
Jak zmodyfikować kod, by mógł pobierać dane ze skoroszytu, który mam aktualnie otwarty i nie chcę go zamykać, gdyż teraz wyskakuje mi błąd w tej linii: Set wb = GetObject(strQ) Chodzi o to, że mam otwarty skoroszyt x gdyż co chwilę muszę wprowadzać do niego nowe dane, a jednocześnie co jakiś czas dane z tego skoroszytu muszę pobrać powyższym...
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."...
Temat zamykam. Wprowadzono poprawki w systemie.
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...
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...
bez znaczenia gdzie wprowadzę fragment dot. zamknięcia. A jaki kod stosujesz "dot. zamknięcia" :?: :?: :?: I co (np skoroszyt, arkusz, widok, okno, aplikację :D ) chcesz zamykać :?:
Nie wiem z jaka predkoscia dziala to co testujesz, a czy probowales np. otwierac jednak skoroszyt z ktorego pobierasz dane i po pobraniu go zamykać ? najprosciej: Sub Makro1() Workbooks.Open Filename:= "C:\\jakisarkusz.xls" //otwiera arkusz Range("C6").Select //wybiera komorke z ktorej bedzie kopiowac Selection.Copy //kopiuje ActiveWindow.Close //zamyka...
Jeszcze raz dziękuję, przetestowane wiele razy, wszystko działa jak powinno :) Krótkie pytanie na koniec- jak zmienić w powyższym kodzie separator z tabulatora na średnik? Przyda się na przyszłość ;) Pozdrawiam EDIT: OK, wystarczy zmienić w fragment kodzie na: FileFormat:=xlCSV Wszystko jasne, dziękuję i zamykam temat.
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ć??
Witam, Jestem początkujący w VBA i chciałbym stworzyć dynamiczny raport pobierający dane z zamkniętych skoroszytów o zmiennych nazwach. Szczegóły: W jednym katalogu sieciowym codziennie dochodzi jeden skoroszyt o wystandaryzowanej nazwie np. "dane 04.01.2013.xlsx", "dane 05.01.2013.xlsx" itd. Chciałbym móc, bez otwierania poszczególnych plików, pobierać...
Makro nie musi otwierać skoroszytu Szybsze (w działaniu) rozwiązanie tj bez otwierania i zamykania plików może wyglądać tak: [syntax=vbscript]Public Sub wypisz() Set a = ThisWorkbook.Sheets(1) x = a.Cells(Rows.Count, "A").End(xlUp).Row + 1 Set objFSO = CreateObject("Scripting.FileSystemObject... Set objFolder = objFSO.GetFolder("C:\testfolder") 'Tu...
Jak przerobić makro poniżej, by działało przy otwartym skoroszycie źródłowym (nie mogę go zamykać), z którego ma pobierać dane, gdyż obecnie wyskakuje mi taki błąd (dane oczywiście pobiera): http://obrazki.elektroda.pl/7726577100_1... i przenosi do tej linii Set wb = GetObject(strQ) Kod zamyka skoroszyt źródłowy (a chciałbym,...
Z tą odbudową to też doszedłem że czasami pomaga, ale niestety nie da się w tym przypadku tego zrobić. Biznesplany mają hasło na wszystko co możliwe :-). Mają nawet mają taką funkcję żeby w nich nie dłubać za bardzo, więc przy pierwszym uruchamianiu pliku pojawia się informacja do odklinania: co nie wolno w nich robić sporządzającemu. Mają taką funkcję...
Witam. Mam pewien problem z arkuszem, dokładnie chciałem sobie zrobić coś takiego że jest sprawdzane kilka warunków by móc używać danego pliku excela. Z VB jestem niestety zielony, ale dzięki informacjom znalezionym coś tam sobie próbuje skleić. Mianowicie mam już coś takiego: ThisWorkbook: Kod: Option Explicit 'własna obsługa zapisu przy zamykaniu...
Nie wiem dokładnie o co Ci chodzi. Tak jak podałem rozwiązanie wyżej. ActiveWorkbook.Sheets.Copy Sciezka = "C:\Users\...\Dane" ActiveWorkbook.SaveAs Filename:=Sciezka & "\Raport_Dzienny" & "_Magazyn_" & adres1 & "_Tydzień_" & adres2 & "_" & Format(Date, "dd-mm-yy") & ".xlsx" ActiveWorkbook.Close Aby ominąć makra tworzysz kopię skoroszytu otwiera się...
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ść...
Rozwiązanie problemu: należy utworzyć połączenie z skoroszytem w którym interesujący nas arkusz jest widoczny. Po utworzeniu połączenia można ukryć arkusz, odświeżanie danych działa. Temat zamykam.
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...
No z tym trzymaniem w kupie to chyba nie najlepszy pomysł bo otwarty skoroszyt zawiera dużo informacji a tych skoroszytów może byc kilka. Więc lepiej by był otwarty tylko jeden. A teraz o tym zamykaniu i otwieraniu, to próbowałem ale jak pisałem coś działa nie do końca tak jak bym chciał. Całość ma wygladać tak: Otwieram skoroszyt powitalny, ma sie...
nie da się ani jednego bitu odczytać nie otwierając pliku :cunning: :?: Istotne tu jest znaczenie pojęcia " otwierania pliku " :D Ja użyłem sformułowania "wyciąganie danych z zamkniętych plików" w znaczeniu "nie otwierania ich w aplikacji Excel" :!: :ok: tj. bez trwającej ileś milisekund operacji otwierania i zamykania pliku, bez przeliczania formuł...
Witam Proszę o pomoc. Potrzebuje wykorzystać poniższy kod do wyszukania określonego tekstu w skoroszytach zapisanych w katalogu "DANE" i skopiowania całego wiersza do skoroszytu "Zbiorczy" Jednym zdaniem chodzi o wyszukiwanie tekstu w wielu plikach xls i zapisywanie ich do jednego arkusza. Czy jesteście w stanie mi w tym pomóc? kod: Sub OperacjeHurtowe2()...
*Aldrin jezeli dobrze Cie rozumiem to dla kazdej kopiowanej komorki z pliku zleceniexxx mam zastosowac petle, ktora bedzie przenosic/kopiowac wartosci ze zleceniexxx do zestawienie_szef ?? Dodano po 14 wstepnie widze, ze ten skrypt bedzie mi pomocny :) Sub OperacjeHurtowe() Dim wbkSkoroszyt As Workbook Dim i As Long, szukWiersz As Long, wiersz...
Cóż, zamysł jest dobry. Projekt do najłatwiejszych nie należy i z pewnością jest czasochłonny. Uparcie brniesz dalej, gdzie większość woli gotowce i dawno rzuciłaby to w diabły nie narażając szarych komórek na przepracowanie. Tu tylko podziwiać, gratuluję. Szczerze mówiąc zaskoczyłeś mnie tym pytaniem :) Do tej pory szukałem tylko rozwiązań dotyczących...
Problem polega na tym, ze nazwy w kolumnie A czasami sa dłuższe niż 31 znaków i wywala mi bład w tej linijce: temp.name = ark.Cells(i, 1) Wystarczy zrobić: Run _ time erroe '9'. Subscript out of range. A całe makro zatrzymuje się na linijce With Workbooks(cleanName & ".xls") Wydaje mi się, że chcesz osiągnąć inny efekt, niż próbujesz. Chcesz wysyłać...
Witam Mam taki oto problem, że w oknie excela 2007 w jednym konkretnym skoroszycie nie mam ikonek: maksymalizacji, minimalizacji i zamykania. Okna nie da się również powiększyć przez "ciągnięcie" za krawędź, dwuklik na belce tytułu również nie działa, próbowałem także ctrl + F10. Rozmieszczanie okien ukrywa ten jeden skoroszyt pod spodem, a rozmieszcza...
Błąd nie wiem dlaczego ci wyskakuje bo u mnie jak mam tak jak ci podałem to ciała dobrze. A jeśli chodzi o zamknięcie excela to jeśli zamykasz jakimś przyciskiem to musisz dać przy nim : [syntax=vb] ActiveWorkbook.Save 'Jeśli chcesz przed zamknięciem zapisać skoroszyt Windows("szachy1.xlsm").Close [/syntax] A jeśli chodzi ci też o to żeby nikt nie wyszedł...
If haslo = "1234" Then 'sprawdza poprawność hasła Tutaj 'haslo' jest zmienna, ma wartosc "1234", Worksheets("arkusz1").Protect "haslo", userinterfaceonly:=True 'odblokowuje ochrone arkusza tu haslo naprosto ma wartosc "haslo" To moje niedopatrzenie, na potrzeby publikacji kodu na forum ciąg znaków będącym hasłem zmieniłem z właściwego na "hasło". Zmienna...
Witam, mam problem związany ze zobrazowaniem wartości komórek innego arkusza w danym skoroszycie w czasie gdy otwarty jest UserForm. Załączony arkusz jest "okrojony" w celu udokumentowania problemu , który napotkałem. Pytanie brzmi: Czy można tak określić reguły UserForm aby uzyskać taki efekt jaki zamieściłem w na załączonym obrazku ? (jest to sytuacja...
Działa fantastycznie :) - zamykam.
Dzień dobry, Żeby poprawność danych mogła korzystać ze źródła w innym skoroszycie, należy posłużyć się nazwą zakresu. Najłatwiej zrobić to w taki sposób: 1. W skoroszycie źródłowym nadać nazwę zakresowi danych źródłowych. Jeżeli danych będzie przybywać najlepiej, żeby był to zakres dynamiczny np. formuła Nazwiska . Ta formuła odwołuje się do całej kolumny...
już prawie mam rozwiązanie: Dim wb As Workbook, x As String For Each wb In Workbooks If wb.Name <> ThisWorkbook.Name Then x = wb.Name Next wb Workbooks(x).Activate Workbooks(x).Close SaveChanges:=False zamyka kolejny skoroszyt, ale... jak są np. 2 następne to zamyka ostatni :( jak zamknąć "NASTĘPNY" w kolejności skoroszyt nie znając jego nazwy?...
To nie pomoże. Ten kod wstawia jedynie nowy wiersz Bardziej mi chodzi o to żebyś to wstawił w procedure "OtworzOferte" Czyli otwierasz kopiujesz wstawiasz zamykasz w pozycji 'wstawiasz' o której piszesz i tak muszę wpisać ścieżkę tego bazowego skoroszytu, a przecież mogę wkleić zawartość schowka w każdym otwartym dokumencie. Po za tym, jeśli wstawiam...
Ale mnie chodzi o Makro wstawiające do bieżącego Skoroszytu (Zeszytu) Makro we we właściwości: Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) No i w czym problem? Ja podobnie jak adamas_nt nie rozumiem problemu... plik1.xls ok plik2.xls ok plik3.xls ok
Na tak przedstawiony problem - odpowiedź brzmi "Tak, da się". W kodzie skoroszytu z wykorzystaniem zdarzenie BeforeClose: Option Explicit Private Sub Workbook_BeforeClose(Cancel As Boolean) 'Tutaj wpisz warunki i kod End Sub
OK, testowałem oczywiście, co prawda na razie w domu, i jest w porządku, bardzo ci dziękuje za to rozwiązanie. Trochę się zamotałem opisując problem, jasne że nie chcę otwierać drugi raz tego samego pliku. Powinienem wyraźniej zaznaczyć, że chodzi o zatrzymanie procedury gdy plik jest używany przez kogoś innego. Ten raport jest na dysku wspólnym i mają...
nagrane makro nie rozwiązuje sprawy ponieważ, żeby działało skoroszyt docelowy musi być już otwarty potrzebna jest procedura(?), która ten skoroszyt otwiera, zmienia właściwość "tylko do odczytu", zapisuje, i zamyka go.
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ć"...
Tu mam wrażenie że jest coś z synchronizacją pomiędzy zamykaniem pliku i kończeniem makra, tak jakby zamykanie pliku trwa a on już skończył makro i dlatego się widok nie odświeża a przycisk cały czas jest jakby wduszony - nie odciska się, i wtedy czegoś mu brakuje, szukam sposobu by je jakoś zatrzymać może jakiś pasek postępu
Dzień dobry. Mam pewien problem i nie wiem, jak sobie z tym poradzić. Mam arkusz z danymi. W kolumnie (załóżmy B) mam wartość albo SPRAWDZONE albo NIE SPRAWDZONE. Utworzyłem sobie formatowanie warunkowe, gdzie jeśli w komórce znajduje się słowo SPRAWDZONE to zmienia kolor komórki na np. zielony. Jeśli jest NIE SPRAWDZONE to na czerwono. I było ok przez...
Dziękuję wszystkim za pomoc. Problem rozwiązany. Jak to zrobiłem. Może komuś się przyda: 1. Trzeba zmienić wyświetlanie znaków niewidocznych - Opcje - Wyświetlanie - Pokaż wszystkie znaczniki formatowania 2. Z ori pliku trzeba usunąć znaki nowego akapitu przez Ctr-H - Więcej - Specjalne - Znak akapitu (Uwaga: może być dwa razy i generuje różne znaki...
Witam Mam pewien problem, a mianowicie na FTP sieciowych mam arkusze excelowe wzbogacone o makra które kopiują i wklejają dane z tabeli do tabeli w innym arkuszu tgz. głównym. Bo zapisie makro zapisuje i zamyka obydwa arkuszę, jednak zdarza się sytuacja że inny użytkownik może przeglądać arkusz główny i mieć go odpalonego w tym czasie przy próbie zapisu...
Plik csv można "klasycznie" otworzyć w Excelu poleceniem 'Workbooks.Open', skopiować potrzebne dane i zamknąć. Jeśli nazwy arkuszy w plikach WZ.xls oraz PZ.xls są pobierane z A2 odpowiednich dokumentów (csv), to można w pętli otwierać je kolejno, sprawdzać czy istnieje arkusz o nazwie=A2 i jeśli nie... Postąpiłbym wg następującej kolejność: 1. Z głównego...
Cześć napisałem makro, które otwiera pliki excel, kopiuje ich zawartość do kalkulatora, następnie przekopiowuje obloczenia do zbiorczej zakładki, i tak dla każdego z wybranych plików. Problemem jest powolność jego działania, od 10 plików makro działa o wiele wolniej. proszę o sugestie w jaki sposób mogę przyśpieszyć makro. Dopisałem również zamykanie...
Witam, Pracuję od dłuższego czasu nad makrem i niestety napotkałem kilka znaczących problemów, których pomimo szukania nie mogę zlikwidować. Makro działa w następujący sposób: 1. Po kliknięciu ikony pojawia się UserForm, który posiada różne opcje do wprowadzenia pewnych wartości do arkusza. 2. Wybieram przycisk "RUN", który odpala makro- makro ma za...
Ok wszystko fajnie tyle że ten kod zamyka mi cały proces excela czyli wszystkie otwarte skoroszyty a ja chcę tylko wybrane. I jeszcze jedno nie mam możliwości eksportu xlsm tylko xlsx Pozdro:)
Pytanie: czy istnieje program do usuwania hasła założonego na plik excel Odpowiedź: Istnieje takie oprogramowanie. dziwię się moderatorowi iż tak spolegliwie "podpowiada" Odpowiedź jest zgodna z prawdą oraz regulaminem forum (są w sprzedaży legalne programy tego typu). Moim zdaniem jest również wyczerpująca. Do autora: Jeśli masz zamiar przerobić ten...
Brakuje wyjścia "z etykiety" [syntax=vbscript]koniec_1: MsgBox ("Witaj! " & pracownik) ark = pracownik Worksheets(ark).Active unload me 'zamykamy uForm[/syntax] Ale o wiele czytelniej byłoby z instrukcją warunkową (o pewnym anachronizmie GoTo nie wspomnę) [syntax=vbscript]Dim pracownik As String, ark As String start: pracownik = InputBox("Imię i...
Witam Masz błąd bo musisz określić którego skoroszytu to dotyczy Dzięki. Rzeczywiście to pomogło. Dodatkowo okazało się, że musi być Dodano po 1 Wszystko jednak ok. To coś komputer wywinął figiel. Dzięki wszystkim. Zamykam temat. Sprawa rozwiązana
Witam serdecznie. Mam kłopot z napisaniem makra VBA, które ma "zmusić" użytkownika do zapisania zmian w arkuszu tylko przez opcję "zapisz jako" (opcja "zapisz" musi być wyłączona). Chodzi o to, aby skoroszyt źródłowy nie został przypadkiem nadpisany - co mogłoby zepsuć jego funkcjonalność. Chodzi o to, żeby użytkownik otrzymał komunikat, że nie można...
Witam ponownie. Jak to zwykle bywa, plany sobie a życie sobie. Narobiłem się jak dziki osioł a pod koniec, gdy doszło do haseł, dowiedziałem się że oprócz naszej (nocnej zmiany) ten skoroszyt jest edytowany jeszcze przez rzeszę ludzi z dniówki. A w związku z tym zakładanie haseł na poszczególne osoby mija się z celem. Jako że dla nas najważniejsze jest...
Witam Nie rozumiem tylko co to jest za skoroszyt Windows("Za+é¦ůcznik nr 2 rachunku umowy zlecenie.xls").Activate? Makro masz w jednym otwierasz drugi i kopiujesz do trzeciego pliku? Przepraszam może to jest mało zrozumiałe, ale ja próbuję metodą prób i błędów. Poniżej częściowy kod mojego makra, które wygląda teraz tak: [syntax=vbscript]Sub Pobieranie_IL()...
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ć...
Nie poddałem się i w końcu zajarzyłem. [syntax=vb]Private Sub CommandButton1_Click() Dim wiersz As Long If Me.OptionButton1 Or Me.OptionButton2 Then wiersz = Val(Me.Label1) kolumn = Range("h" & wiersz) If Me.OptionButton1.Value Then ocena = 1 Else ocena = 0 Sheets("ARK_1").Cells(wiersz, kolumn) = ocena Sheets("ARK_1").Cells(wiersz, kolumn) = 0 - Me.OptionButton1...
Szanowni, są perspektywy na pozytywne zakończenie :) Przejrzałem poszczególne foldery, odzyskałem z nich kilka losowych plików, które poprawnie się otwierają. W tym momencie serdecznie dziękuję wszystkim udzielającym się w tym temacie, dzięki Wam sporo się nauczyłem (jak na mój poziom wiedzy). W szczególności dziękuję forumowiczowi kaleron za fajne...
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...
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...
Tomuś_P tak to jest także makro do scalania, które między innymi też przeglądałem, tylko tyle, że ja potrzebuję dodatkowe funkcje, które wyszczególniłem w pierwszym poście, a których żaden gotowiec nie ma. JRV, jeżeli chodzi o wpisywanie od pierwszego wiersza, to dzięki pomocy kolegów z innego forum, już mam to rozwiązane, co do zakresu danych, to zakres...
Gdybyś wiedział jak rozwiązać problem napisałbyś kilka linijek kodu w kilka minut jak jesteś taki spec i wrzucił jako odpowiedź. Widzę, że kolega nie przeczytał dokładnie regulaminu. Jeżeli chce kolega otrzymać rozwiązanie, bez nawet poświęcenia kilku chwil na przeszukanie forum, to sugeruję koledze zmienić forum na inne. Temat zamykam i pozostawiam...
nagrałem takie makro które otwiera nowy skoroszyt, kopiuje zawartość całego pliku do nowego skoroszytu, usuwa niepotrzebne dane, zapisuje nowy skoroszyt pod nazwą którą sam wpisałem, zamyka nowy plik, wraca do pliku pierwotnego i tworzy w nim hiperłącze do pliku który właśnie zapisałem. I teraz potrzebowałbym aby nazwa pliku zapisywanego była brana...
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...
Było bardzo upalnie, co odczułem już na służbowym parkingu Ubrany służbowo, w garniturze i krawacie, w klimatyzowanym samochodzie czułem się nieźle, ale po opuszczeniu auta, od razu musiałem się schować w cień. Dobrze, że było gdzie. Ściana z basenem była w pełni otwarta. Anna, odziana w kostium kąpielowy zajmowała miejsce na leżaku, przeglądając jakieś...
Skopiowałem arkusz do innej lokalizacji, zmieniłem ścieżkę do plików źródłowych. Widzę, że otwierają się i zamykają kolejne pliki, jednak wynik i tak jest 0
Witam, Cos tam ogarnalem ale z jakiegos powodu makro nie przelacza sie pomiedzy plikami a potrzebuje to bo bede musial skopiowac okolo 10 lokacji a nie chce 10x zamykac i otwierac pliku bo to by bylo bez sensu. Mogl by mi ktos wskazac blad albo nakierowac na poprawke ?? Sub BLUE() Application.ScreenUpdating = False Dim myfile As String myfile = "C:\Goods...
W skrócie. Jestem muzykiem, często występuję jako - gram na gitarach i śpiewam, a za resztę zespołu robią podkłady, a za ewentualne chórki - dedykowane urządzenie typu vocalizer . Podkłady robię sobie sam lub korzystam z darmowych zasobów sieci, ale przerabiam je do swoich potrzeb (EQ, forma, tonacja, poziom głośności, eliminuję gitary i wgrywam własne,...
Podłącz makro pod przycisk i wtedy zawsze będziesz miał swoje makro pod ręką. Wytłumaczę na excelu XP. Zrób na początku "czysty" arkusz i wklej do niego swoje makro. Na pasku z przyciskami "włącz" (prawoklik) "dostosuj...". Z zakładki "Polecenia" wybierz makro i przeciągnij "przycisk niestandardowy" lub "element niestandardowy" na któryś z pasków z...
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...
skoroszyt formatowanie chroń skoroszyt skoroszyt excel
szczotka bosch oryginalny sterujacy samsung zamontowac silownik
kamera cofania alternator rozładowuje akumulator
Lodówka Liebherr, Samsung, Bosch – nie działa, brak chłodzenia, diagnostyka, czujniki, sprężarka Objawy zużytego sprzęgła w skuterze – szarpanie, poślizg paska, Malossi, Polini, Stage6