jeżeli praca trwa w bez dostępu do sieci W makrze otwarcie sieciowego skoroszytu musi nastąpić dopiero po upewnieniu się, że praca jest w trybie "bez dostępu do sieci". W jaki sposób to zrobisz to już Twoja inwencja, bo nie napisałeś ani jak jest zrealizowane makro ani jaka to lokalizacja sieciowa (plik dostępny z internetu czy z sieci lokalnej itd).
Jeśli plik jest otwarty to makro pomija wykonanie otwarcia arkusza "baza". a jak jest otwarty to wykonuje dalsze instrukcje: kopiowanie potrzebnych wierszy. Pomija cała instrukcje czyli nic nie robi. czemu przed for each muszę dać otwarty=false a potem odnosić się do otwarty jako true Generalnie nie musisz dać na początku 'otwarty=false' bo zmienna...
Arkusze Excell jako "baza danych" to kiepskie. Z wielu powodów, w tym przez sytuacje wielodostepu
Oto projekt. Początkowo Pan otworzyć i odczytać z makrami.(na otwarcie i zamknięcie książki) i poprawi stałych (bo nie mogę odgadnąć nazwy plików). Następnie skopiuj makra do prawdziwych plików Interesuje mnie jak długo potrwa pracy makro, ponieważ kopiowanie w komórki z formatowaniem (kolor, czcionki) zajmuje znacznie więcej czasu niż w komórki niesformatowany....
Cześć Proszę pomóżcie. Jak napisać makro, które stwierdzi czy plik Excel na sharepoint jest otwarty przez innego użytkownika. Jeśli tak to makro ma wyświetlić msgboxa i zakończyć działanie. Mam napisane makro które dodaje dane do pliku excelowego na sharepoint ale jeżeli jakiś użytkownik ma otwartego Excela to makro się crashuje.
[syntax=vbscript]Sub Kopiuj() Set a = ActiveWorkbook i = Application.FileDialog(msoFileDialogOpen... s = Application.FileDialog(msoFileDialogOpen... Set b = Workbooks.Open(s) a.Sheets(1).Range("K20:M23").Copy b.Sheets(1).Range("K20") b.Close True End Sub [/syntax]
[syntax=vb] Dim otwarty As Boolean For Each b In Workbooks If b.Name = "zrodlo.xlsx" Then otwarty = True: Exit For Next If Not otwarty Then Workbooks.Open ThisWorkbook.Path & "\zrodlo.xlsx" [/syntax]
Potrzebuję makro które wymusza otwarcie arkusza z włączonymi makrami , jeżeli gość będzie chciał wyłączyć makra to nie popracuje na danym arkuszu.
Pliki znajdują się w różnych lokalizacjach - plik źródłowy jest wrzucony na serwerze i korzysta z niego kilka osób, dlatego aby go wzajemnie nie blokować pomysł z makrem przenoszącym do niego dane, zapisaniem w nim zmian i automatycznym zamknięciem. Dawno powinieneś mieć to oparte o bazę danych, np SQL Express
A "zwykłe" makro będzie szybsze, otwarcie pliku w tle, wyszukanie, zwrócenie wyników, itd. ? Chyba tylko takie z ado/querytables z sql'em ...
Witam Zrobiłem troszeczkę inaczej. Myślę że lepiej ale jeżeli nie będzie ci pasowało - nie ma sprawy - poprawie dokładnie tak jak chcesz. Po wciśnięciu OK w okienku pojawia się komunikat czy chcesz wprowadzić kolejny dokument. Jeżeli tak data i numer pozostaną, jeżeli nie zamknie się całe okienko i jego ponowne otwarcie (z "głównego" przycisku) otworzy...
(at)prl (at)kinggustav Działam na otwartych workbookach, żeby makro zadziało trzeba otworzyć odpowiednie dwa workbooki a później tylko je aktywuję nazwą wpisaną na sztywno, a z racji tego że nazwa zmienia się częściowo co miesiąc to musiałbym co miesiąc edytować makro i chciałbym tego uniknąć. Czy w takim przypadku jest jakieś prostsze rozwiązanie czy...
Po naciśnieniu makra i po wybraniu pliku zaś wyskakuje mi okno do wybrania pliku i wybieram ten sam. Następnie wyskakuje błąd "Permission denied" :/ Jak chcesz przenieś otwarty plik(w którym to jeszcze wykonuje się makro?
Jest progres :D tylko że makro otwiera nowy plik excela do którego ładuje zeszyt2.xlsx. jak napisać makro które aktywuje już otwarty zeszyt2.xlsx? [syntax=vb]Public exc2 As Excel.Application Sub monit2() Set exc2 = New Excel.Application ' New zamienić na zeszyt2.xlsx? exc2.Visible = True exc2.Sheets(1).Range("a1") = "2 monit" End Sub [/syntax]
Formatowanie warunkowe - formula =DZIŚ()<wygaśnięcia (zielony) komunikat - makro do zdarzenia na otwarcie skoroszytu
Cześć, bardzo proszę was o pomoc w makrze. Potrzebuję napisać makro które będzie uruchamiane z otwrtego pliku i tu nazwać go jako plik1, następnie otworzyć inny plik który nazwie np plik2 tak by w dalszej części makra nie przywoływać ścieżki pliku (gdyż będzie ona się zmieniała) a przywoływać je jako plik1 i plik2. Z góry bardzo dziękuję za pomoc.
Tak, oczywiście jest możliwe. Najprościej używając funkcji Dir w pętli Do Until , jednocześnie zmieniając nazwy kopiowanym arkuszom wg. aktualnie otwartego, pliku źródłowego.
Mam makro, które otwiera plik o nazwie "Stary". Problem w tym, że plik ten może mieć dwa różne hasła ("1" lub "2"). Czy można zrobić tak makro jeżeli nie może otworzyć pliku hasłem "1" (tak jak w poniższym makrze), to otworzyło plik hasłem "2" [syntax=vbscript]For Each b In Workbooks If b.Name = "Stary.xls" Then otwarty = True: Exit For Next If Not...
Witam Czy jest możliwość, aby makro otworzyło nowy plik z określoną nazwą. Chodzi o to, że komenda Workbooks.Add otwiera nowy plik z nazwą Zeszyt1 lub Zeszyt2 itd. Czy jest możliwość, aby ten plik miał określoną nazwę. Nie chodzi mi o to, aby był on zapisany na dysku pod określoną przeze mnie nazwą, ale pozostawał otwarty i niezapisany z określoną w...
Tak, w momencie przekształcania plik źródłowy jest otwarty. Po uruchomieniu makro widać, że przechodzi do arkuszy lecz nie zmienia formuły na wartość (kiedy wstawiłem do kodu {ENTER} o którym wspomniałeś to komórki przeskakiwały w dół tylko na tym jednym arkuszu gdzie znajdował się przycisk do makro)
jest mozliwe działanie funkcji wyszukaj.pionowo tak jak bym chciała? Jeżeli chcesz to "składać" z komórek to musisz użyć 'adr.pośr' . ale tu pojawi problem bo plik musi być otwarty, więc zostaje makro.
Zablokowany plik do edycji , to może inny użytkownik ma otwarty i Twoje zamiany skasuje przy zapisie.
Temat umarł? Nie umarł, tylko w dalszym ciągu mam problem z tym, że gdy makro próbuje otworzyć plik Worda (oczywiście zamknięty, nie używany przez nikogo), to pojawia się komunikat, że plik jest już otwarty przez innego użytkownika. Ten sam efekt na dwóch różnych komputerach, lokalizacja plików na C:
Na obrazku skoroszyt jest otwarty na Twoim kompie Na obrazku widać, że Excel jest otwarty na komputerze zdalnym (AnyDesk). Na filmie uruchamiam makro, które importuje z Arkusz1 (z zasobu sieciowego \\serwer\bekap\a.xlsx) do tabeli Excel, co działa. Chyba o pobranie danych Ci chodzi, a nie o kopiowanie pliku, prawda? [syntax=vbscript]Kill Ustawienia.Ścieżka...
Polecenie Name powinno działać poprawnie. Nie wiem jaką ma Pan strukturę plików. Możliwe przyczyny błędu: 1. Plik docelowy już istnieje 2. Folder docelowy nie istnieje 3. Plik źródłowy jest otwarty 4. Nazwa pliku zawiera znaki wieloznaczne "*" lub "?"
Ok, niestety pliku żródłowego nie mam aktualnie przy sobie jednak postaram się to dobrze wytłumaczyć. Mamy tabele gdzie mamy kolumny : firma, projekt (job), status projektu (otwarty, zamknięty). Potrzebuję makra które przeniesie mi tylko te wiersze i te projekty które mają pozycje otwartą lub pozycje otwartą i zamknięta naraz. Projekty, które mają pozycje...
Makro ma za zadanie otwarcie pliku "matki" do którego kopiuje pewne dane, następnie zapisuje go pod odpowiednia nazwą w odpowiedniej lokalizacji. Czy nie lepiej zapisać nowy plik bez wielokrotnego otwierania pliku matki?
... Ale zrobiłem w makro, otwórz plik, skopiuj dane i wklej wartosci (chyba lepsze...) ... No to jak już wykorzystujesz makro do otwierania pliku to po co kopiować dane jeżeli adr.pośr() dział na otwartych plikach? ...A czy istnieje możliwośc użycia funkcji wyszukaj pionowo, ale w lewo? Nie wiem czy o to ci chodzi ale jest jeszcze wyszukaj.poziomo().
Ostrzeżenie pojawia się tylko raz. Klikam "włącz zawartość" a mimo to makro się nie wykonuje. Natomiast skoroszyt otwarty na innym użytkowniku działa prawidłowo.
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.
Przetestuj poniższe makro mając otwarty arkusz z tabelą wejściową [syntax=vb]Sub Sum_By_Account() Dim shSrc As Worksheet 'arkusz źródłowy Dim shDest As Worksheet 'arkusz docelowy Dim lOstRw As Long 'ostatnia zajęta komórka tabeli źródłowej Dim lOstRw2 As Long 'ostatnia zajęta komórka tabeli z wyfiltrowanymi unikatami numerów kont With Application .ScreenUpdating...
Ten kod działa w taki sposób że muszę mieć otwarty plik o takiej nazwie "dokumenty 2024" żeby makro zaczęło działać I działa tak, jak oczekujesz?
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...
Jak wykombinować automatyczne wysyłanie wiadomości po otwarciu (Workbook_Open) przez menadżera oraz zamknięciu po wykonaniu w taki sposób żeby plik przy normalnym uruchomieniu nie wykonywał wysyłania itd Możesz zatrzymać wykonywanie makra przez otwarcie pliku z wciśniętym sziftem (lub "czarowanie" ze skryptami wtedy bez workbook open) ps Albo dodaj...
Ustawiasz sobie wejście, opisujesz co to i tyle, masz podgląd z klawiatury czy jest naruszone. Czyli takie ominięcie ale dalej nie będzie to co powinno. Nie wysteruje wtedy tylko zamknięciem ani otwarciem a jedynie impulsem. Do tego dam radę w aplikacji dodać makro że będzie pokazywać otwarcie/zamkniecie,? Może ktoś już rozwiązał to inaczej przez ten...
Mimo wszystko rozważ to o czym Ci pisałem, zrób testy i sprawdź czy Ci to pasuje. To makro nie przegląda wszystkich plików w katalogu, a jedynie otwarte przez Ciebie w Excelu. Jeżeli masz otwarty plik ala.xls to i tak nie otworzysz innego pliku o tej samej nazwie, choćby z innej ścieżki. Musisz więc: - albo otworzyć (utworzyć) plik o innej nazwie, np....
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.
Problemem jest to, że nie widać całego makra (tego przed CopyText...). Pokaż całe makro.
Witajcie mam problem, Mam plik z makrem. Napisałem makro: Proszę pamiętać o używaniu znaczników syntax . Opcja Listing kodu . - arnoldziq
Sądzisz, że przy pomocy makra otworzysz plik zabezpieczony hasłem :please:
To, co jest przed Find określa, gdzie metoda ma szukać. Może tam być zakres z aktywnego arkusza, jak jest teraz, albo zakres z innego arkusza (z kwalifikatorem Worksheets(nazwa_lub_numer)), albo nawet z innego (otwartego) skoroszytu.
W przyszłości nie trzeba pisać skoroszyt zamiast arkusz(z określonymi numerami) Skoroszyt to jest plik(w każdym razie tak to było do tej pory). Ponieważ nie wiadomo, czy te same struktury arkuszy, liczbę wierszy i kolumn, kopiowanie, możesz zrobić tak: [syntax=vb] Sub kopie() 'makro w pliku(skoroszycie) A, plik B jest otwarty 'kolejne 3 linie dopasuj...
Witam bo plik w użyciu W użyciu z tego samego komputera i ten sam użytkownik, że makro?
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 :)
Harmonogram zadań>zaplanuj uruchomienie pliku>makro w Thisworkbook.Open W przypadku Application.OnTime plik musi być otwarty 4 lutego 2014 przed godziną 14:00 (kto ci o tym przypomni?).
Chcemy wstawić w nowo otwarty skoroszyt, w arkusz aero :)
Zeszyt rozumiany jako inny plik? Tu już trzeba wyjaśnic dodatkową nieścisłość. Czy makro ma wcześniej otworzyć ten zeszyt czy jest już (i będzie zawsze przy próbie uruchomienia makra) otawrty? Na marginesie Proponuje ci pouczyć się samamu. excel ma coś takiego jak nagrywanie makr. Włącz nagrywanie Zrób to co chcesz zrobić z plikiem, arkuszem itd wyłącz...
Oczywiście, że funkcji takiej nie ma, bo jest to makro. Musisz otworzyć edytor makr w excelu (Visual Basic) i tam w moim przykładzie znajdziesz funkcję. Ogólnie możesz w edytorze Visual Basic dodać do Twojego arkusza nowy moduł i wkleić w nim definicję funkcji: [syntax=vb]Function NDay(exclude As Range, prev As Date) As Date Dim flag As Boolean Dim...
Witam Potrzebuję do swojego makra dopisać na końcu kod, który będzie powodował przejście do następnego arkusza będącego pierwszym kolejnym po aktualnie otwartym.
Spróbuj tak [syntax=vbscript] Dim fd As FileDialog Dim wkb1 As Workbook, wkb2 As Workbook Const fileName As String = "A.xlsx" ' nazwa pliku do otwarcia Application.ScreenUpdating = False Set wkb1 = ThisWorkbook Set fd = Application.FileDialog(msoFileDialogFile... With fd .InitialFileName = ThisWorkbook.Path .Filters.Clear .Filters.Add "Pliki Excel",...
W załączniku dodaję plik z urywkiem tego co mam w docelowym pliku. Po otwarciu menadżera dzieje się dokładnie to co opisałem, jedynie kliknięciem na prawy przycisk mysz i wybór odpowiedniej opcji umożliwi otwarcie danego pliku
Jest tam makro. Otwórz pusty arkusz i uruchom makro DwaDzieścia :)
Dobrze rozpisane, dziękuję!!! :-) To mam jeszcze coś z czujką zmierzchu. Cel: Drzwi od komórki posiadają kontaktron, który wskazuje stan ON/OFF. Chciałbym stworzyć makro, które w przypadku, gdy drzwi są otwarte i zapada zmierzch, aplikacja Integra w smartfonie wygeneruje powiadomienie o tym, że drzwi są otwarte, ale oczywiście bez akcji alarmowej. Prośba...
Tak, próbowałem i wszystko byłoby ok, tylko że w nim jest wskazana nazwa otwartego przez makro pliku, a teoretycznie jej nie znam.
Po prostu nagraj makro, które będzie robiło to co chcesz. Wrzuć je tutaj, a dopisze się kawałek kodu sprawdzający otwarcie arkusza. Przy czym makro będzie wymagało otwarcia zeszytu (nawet w tle) do skopiowania danych. Jeżeli chcesz bez otwierania zeszytów, to przecież można zrobić odwołania do arkuszy jako formuły (tzw łącza): ='C:\Users\jj\Documents\[html.xlsm]Arkus...
Skoro wyłączenie makr umożliwia otwarcie pliku, to problem musi tkwić tam. Zrobiłeś tak jak pisałem (zapisałeś plik kiedy był otwarty na wysokich zabezpieczeniach makr?). Sprawdź czy nie masz jakiś pętli uruchamianych przy otwarciu które się "zapętlają", może masz tam jakieś linki do lokalizacji sieciowych które są niedostępne, bardzo dużo "kosztownych"...
Będzie działać tak długo, dopóki jest otwarty skoroszyt i w arkuszu Makro, w A1 jest 1. Ale dlaczego chcesz zapisywać o 23, a nie o 24, to nie wiem. P.S. Do testów zmień godzinę i minutę i patrz, jak działa.
Śledź makro krok po kroku(F8) i upewnić się, że wartości zmiennych DOSTAWCA i NUMEREK odpowiadają do prawidłowego Dodano po 2 Na początku makra, Dodaj otwarcie formularza, gdzie powinny być wstawiony Zdjęcia
Bardzo dzięki i to i to mi pomogło. Mam pytanie do adamas_nt: a jak by zrobić aby lista się nie zamykała była cały czas otwarta?
Hej, Dziś bez żadnego kodu, bo pytanie otwarte. Mam makro które tworzy mi tabelkę w przyszłości więcej niż jedną i chciałbym żeby makro kopiowało daną tabele do Otuloka. Jak można to zrobić ? Aktualnie już samo makro mi robi gotowego (at) do wysyłki jednak jest on pusty i tabelkę trzeba sobie przykleić.
Tak dwa lub więcej plików w tym samym katalogu co pik z makrem, tylko katalog może zmieniać położenie. PRL - nie o to mi chodziło, ja nie chcę wyświetlać okna dialog w celu wybrania, który plik ma być otwarty, tylko w kodzie zawrę dokładną nazwę pliku do otwarcie, a makro automatycznie otworzy ten plik, pobierze odpowiednie dane a następnie zamknie...
To było mówić że makro ma być w innym pliku. Kłopotem było to że makro pobierało nazwę pliku z pliku w którym nastąpiło wywołanie procedury. Poniżej poprawka. [syntax=vb]Sub OrderBuilder() ' ' OrderBuilder Makro ' Order building ' ' Klawisz skrótu: Ctrl+q ' Dim i As Long, ostWrs As Long 'otwarcie plików Workbooks.Open Filename:="D:\Desktop\NotWMS\Działa\expo...
Czy ktoś mi powie jak dodać makro sterujące drzwiami podpiętymi do klawiatury z czytnikiem kart INT-SCR-BL ? Mogę przez telefon wywołać otwarcie drzwi z wirtualnego manipulatora >Otwórz drzwi > INT-SCR(00h) ale przez makra nie mam pojęcia jak to zrobić
Cześć, sorry że po takim czasie ale parę niespodziewanych komplikacji było po drodze. Wracając do tematu, to makro i zapytania do odświeżenia są w tym samym arkuszu. Makro ma otworzyć pliki źródłowe chronione hasłem i odświeżyć połączenia w tym arkuszu.
Podaj więcej szczegółów: Czy działasz na otwartym już pliku, czy makro ma je najpierw otworzyć? Ile plików znajduje się w lokalizacji? Co kryje się za: "plik formatka będzie zmieniał zawartość"? Czy będzie zmieniał się również układ danych w arkuszu, nazwa arkusza, ilość i kolejność arkuszy w pliku źródłowym?
Nie kumam tego podłączenia Toż to proste jak świński ogon :D Zaznaczasz swego Checkboxa (w trybie projektowania), klikasz we wstążce właściwości i w otwartej tabelce we wierszu LinkedCell wpisujesz adres bezwzględny komórki, gdzie będziesz miał wskazania stanu tego Checkboxa (PRAWDA|FAŁSZ) :please:
Witam, Mam kolejny mały problem chciałem połączyć dwa pliki excela za pomocą makra w taki sposób aby wartość konkretnej komórki z pliku który jeszcze nie istnieje była importowana do pliku"rejestr" w momencie gdy plik powstanie i oczywiście uzytkownik uzupełni tą konkretną komórkę w nowo powstałym pliku. Nie było by z tym żadnego problemu gdyby nie...
Kupiłem znajomemu panasonic tx 32ps12p za kwotę 1560 zł , a dodatkowo otrzymałem bon na 140 zł :D . - Otwarcie nowej Hali makro Olsztyn. Bony tylko dzisiaj, ale upust 20 % jeszcze jutro. np 32 pm11 za 1860 o ile dobrze pamiętam Obraz tego 32ps12p jest naturalny - bardziej niż w niektórych droższych odbiornikach pozdrawiam.
Czesc Poszukiwałem w internecie rozwiazania, ale kazde dotyczylo plikow excel i nie mogelem znalesc rozwiazania. Mam makro, które otwiera wskazany plik PDF. Po wykonaniu określonych zadań chciałbym aby po kliknięciu przycisku marko zamykało wskazany PDF (jeśli ten jest otwarty). Pomożecie?
Oczywiście. Z tym, że to jest, na oko, dość... proste. No i brakuje najważniejszej informacji. Na podstawie jakiego zdarzenia obrazki mają znaleźć się w arkuszu? Coś się musi wydarzyć, żeby zadziałało makro. Np zmiana w D6, naciśniecie przycisku, otwarcie pliku, aktywowanie arkusza (niepotrzebne skreślić)
Jeśli będziesz miała otwarte oba pliki (tylko :!: ) to w świeżym pliku możesz wykorzystać makro typu :spoko: : [syntax=vbscript]Option Explicit Sub duplikatclear() Dim ws As Worksheet Dim ww As Worksheet Dim i, lrs, lrw As Integer Dim db As Range Set ws = ThisWorkbook.Sheets(1) Set ww = Workbooks(2).Sheets(1) lrs = ws.Cells(Rows.Count, 6).End(xlUp).Row...
W ustawieniach zabezpieczeń Excela ustaw wszystkie opcje na wysokim poziomie (m.in. zablokuj możliwość wykonywania makr). Otwórz plik, zapisz co trzeba i przywróć ustawienia zabezpieczeń na normalny poziom.
Otwórz plik 'zeszyt1'. Włącz nagrywanie makra. Otwórz plik H:\DANE\Dane.xlsm, wybierz arkusz 'BBB, zaznacz zakres 'A2:F2000'. Naciśnij 'kopiuj'. Otwórz okno pliku 'Zeszyt1'. Kliknij na arkusz 'AAA'. Kliknij w komórkę A2'. Kliknij 'wklej' i zapisz makro, które potem będziesz wykorzystywał.
Witam, potrzebuje makro, w ktorym moglabym zastosowac funkcje WYSZUKAJ.PIONOWO ale dzialajaca w innym zamknietym pliku. Czyli potrzebuje makro ktore dla danych z otwartego pliku A bedzie wyszukiwalo mi wartosci przypisane do nich w zamknietym pliku B. I czy jest mozliwosc aby makro wyszukiwalo mi plik B czy musi byc podana lokalizacja pliku. Z gory...
I po uruchomieniu Excel jako administrator?
Cześć wszystkim Potrzebuję zrobić automatyzację dla istniejącego pliku ze ścieżkami xls. Chodzi o szybkie otwarcie i zrobienie wydruku. W pliku jest baza kilkudziesięciu tys. ścieżek z polem wyszukiwania (standard z wyszukaj pionowo) i właśnie chciałbym wykorzystać to pole do zrobienia makra. Po wpisaniu dostaję ścieżkę do pliku i hiperłącze. To co...
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...
Coś mi jednak pokazuje błąd Przy tak prostej linijce to pewnie masz otwarte w dwóch różnych instancjach.
Mam sp3 i przez zaplanowane zadania czasami się włączany program wiesza i na dodatek żeby w ogóle działało musi być hasło na koncie użytkownika. A i o co chodzi z tymi makrami? Zminimalizowanie odpada. Makro pisze się w excelu. Excel z makrem musi być cały czas otwarty (zminimalizowany) bo działa on wówczas jak program zarządzający otwieraniem różnych...
Tu do formatowania bym się nie czepiał. Jest powiedzmy ok (choć można było prościej) Ewentualnie zmienił bym warunek pojawiania się napisu "Blokada otwarta"/"Blokada zamknięta" co by z jednej strony "ustawiało" kolorki ale ... niestety nie zmieniała by się literka w kolumnie G I tu by mógł powstać kolejny wyjątek bo rozumiem że np. nagle znów byś chciał...
Witam, mam problem z napisaniem makra w VBA. Mam plik o nazwie "program" w którym znajduje się tabelka (zał.3.). Mam początek kodu (zał.4.), ale nie umiem ruszyć dalej. Makro ma pozwolić na otwarcie dowolnej ilości plików Excela. Te pliki mają różne nazwy i nie da się określić jednej ścieżki do nich. Następnie w otwartych plikach we wszystkich arkuszach...
Cześć, może ktoś z Was kojarzy taki temat albo ma gotowe makro. Powiedzmy, że mam folder "A" w którym mam 50 plików PDF/xls/xlsm o różnych nazwach. Chciałbym wskazać jaką ilość plików z wybranego folderu ma mi otworzyć makro, a następnie ma otworzyć losowo wybraną ilość plików. Cel: makro ma byc pomocne w wybieraniu próbki plików do kontroli, w sposób...
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()"...
Nie wiem, czy to aż takie trudne: reguła outlooka otwiera przychodzącego maila, a później uruchamia makro. Natomiast makro kopiuje tekst z otwartego maila, zamyka go, wkleja do edytora kopię i kończy działanie. Każdy następny mail powoduje to samo...
Niestety nie mogę zobaczyć pliku, nie mogę go nawet pobrać z internetu - admin zablokował. No to teoretycznie: Tak sobie myślę skąd makro ma wiedzieć z którego pliku pobrać dane? Sprawdź czy jest to jawnie określone w RowSource. Nazwany Range też może nie mieć właściwego (pełnego) adresu i próbuje brać z ThisWorkbook. Wyświetl sobie co tam dokładnie...
Do wyboru: 1. Włącz ochronę makr, zrób porządek i wyłącz ponownie. 2. Otwórz plik z okna Excela'a, trzymając klawisz 'Schift'. 3. Otwórz za pomocą Calc'a (Open Office)
Witam Wszystkich; Mam plik "x.xls" w którym za pomocą procedury zdarzeniowej "Workbook_Open" uruchamiam makro z Addin.xlam Zadaniem modułu jest otwarcie pliku "y.xls" a następnie nadpisanie nim pliku "x.xls". I tutaj zaczyna się problem, ponieważ po zamknięciu pliku "x.xls" celem go nadpisania, procedura zostaje zatrzymana. Będę wdzięczny za pomoc.
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...
Plik, który zmienia nazwę to plik z którego kopiujemy dane - Zlecenie prac na formie wtryskowej. To w takim razie kod powyższy wystarczy skopiować do pliku na drugi miesiąc (bez względu na zastosowaną nazwę :D ) - obiekt ThisWorkbook oznaczać będzie zawsze ten aktualnie otwarty plik z obsługą makr. :spoko:
FileDialog ma wiele właściwości. Np: . InitialFileName = Environ("HOMEPATH") & "\Desktop\" Dzięki za pomoc Czy ktoś może mi jeszcze pomóc jaką należy podać procedurę w powyższym makrze , aby po skopiowaniu kolumn plik z którego zostały skopiowane kolumny został zamknięty, a pozostał otwarty plik do którego zostały wklejone kolumny?
Nie wiem jaki program otwiera filmy .mkv, ale można dostosować plik Otwórz przepisać dokładnie, aby otworzyć bat-em. I .bat przez %1 będzie działać DisplayChanger i następnie prawidłowe programu otwarcie .mkv Coś takiego set film=%1 if %film:~-8,3%==080 "C:\Program Files (x86)\12noon Display Changer\dc.exe" -width=1920 -height=1080...
VBA zgłasza błędy Jakie błędy, jakiego typu błędy ? Np. w pętli brak warunku definującego zachowanie kodu w przypadku natrafienia na otwarty plik, z którego uruchamiane jest to makro (w katalogu z "plikami", jeśli by tam był on umieszczony), plik próbuje otworzyć samego siebie i jest błąd. Tak więc ... jakieś szczegóły ?
Widzę, że dopracowałeś trochę arkusz. Dopisałem funkcje która zmienia kolor wypełnienia komórki w przypadku "przeterminowania" zadania. Sprawdzane pod kątem niedotrzymania terminu są tylko zadania niewykonane (oznaczone czerwoną czcionką). W arkuszu jest skoroszyt z kodami kolorów, jak otworzysz makro są tam komentarze i jest napisane którą liczbę trzeba...
Niestety nic z tego dzięki za chęć pomocy. ipconfig /renew działa tylko wtedy gdy mój komputer nie łączy sie z brama domyślną w tym wypadku 10.0.0.2 dlatego muszę korzystać z telnetu by resetować połączenie na kompie 10.0.0.2. Co do linku to nie chodzi mi o samą obsługę telnetu ale jego automatyzację (makro plecenia odpadają) temat zostawiam otwarty...
Wyszło mi coś takiego[syntax=vb]Sub Pobierz() Dim nazwa As String Dim ark As Worksheet Dim wrs As Long, j As Integer, i As Long nazwa = "Arkusz2" 'nazwa arkusza docelowego 'tutaj 2 dla porównania z 1 ThisWorkbook.Activate 'gdyby nie był Sheets(nazwa).Range("A2:H65536").ClearCo... 'czyścimy wrs = 2 '1-szy wiersz docelowy j = 3 '1-sza kolumna źródłowa...
Dostęp do pliku tekstowego z Excela jest prosty z poziomu VBA. Warunek to otwarcie pliku za pomoca instrukcji Open i zamknięcie za pomoca instrukcji Close oraz odczytywanie danych za pomocą odpowiedniej instrukcji Input. Najprosciej, bez zbednego wnikania w zawilosci, mozna czytac dane wg. ponizszego kodu: Sub importData() 'miejsce położenia pliku tekstowego...
Nacisnij Alt+F11 wpisz kod: [syntax=vb]Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean) If Item.Subject Like "*nie*" Then Cancel = True End If End Sub [/syntax] zamiast "nie" wpisz słowo które blokuje wysłanie. (gwiazdki zostają) Działa to tak, że przy naciśnięciu Wyślij, jeśli w temacie jest słowo kluczowe to wysłanie jest...
Witam, jako początkujący w VBA zaciąłem się nad zagadnieniem jak skopiować dane z kilku zakresów w jednym arkuszu do drugiego arkusza w momencie wyboru i wskazania konkretnej komórki. Mam arkusz formularza, z którego chcę uruchamiając makro, otworzyć arkusz rejestru i bez przeszukiwania pierwszego wolnego wiersza wskazać dowolną zaznaczoną przez siebie...
Mam makro, które otwiera plik o nazwie "Stary". Co należy zrobić, aby makro na początku sprawdziło czy w folderze jest plik o nazwie "Stary" i jeżeli nie to pojawiło się okno np z informacją błąd, a jeżeli jest plik w folderze to go otwierało [syntax=vbscript]For Each b In Workbooks If b.Name = "Stary.xls" Then otwarty = True: Exit For Next If Not otwarty...
Gotowe makro napisane pod Excel 2003: [syntax=vb] Sub Makro1() ' ' Makro1 Makro ' Makro zarejestrowane 2011-09-22, autor sidsysunia ' ' Klawisz skrótu: Ctrl+q ' Sheets("zestawienie").Select p = Range("c1") 'tu sprawdza ile masz pozycji Range("a2:b" & p).Select ' tu zaznacza wszystkie pozycje bez nagłówka Range("a2:b" & p).Copy 'kopiowanie Sheets("przeliczanie").Select...
makro otwarcie pliku flatron otwarcie otwarcie furtka
automapa memory domofonu kolory kabli dekoder odblokowanie
citroen xsara immobilizer citroen xsara immobilizer
Czy pralka Haier HWS50-10F2S ma rozbieralny bęben? Szarpanie i gaśnięcie Skoda Octavia II 1.6 MPI LPG BRC 2004