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...
... Jak naciśniemy w arkuszu Kosztorys pole B7 czyli to białe puste szybko dwa razy to otwiera się Listbox z wyborem danej pracy ... Wszystko działa ok ... No niezupełnie ... ' ListBox1_Click ' usuwa z komórki ' AB7 ' wartość liczbową i po zamknięciu okna nie można go już ponownie otworzyć bez wstawienia tam liczby. ... Potrzebne są tylko trzy zmiany....
Witam Część mojego makra w pętli otwiera pliki, kopiuje z nich kolumny, wkleja i wkleja do arkuszy w pliku z makrem [syntax=vbscript] For i = 1 To .SelectedItems.Count Set wkb2 = Workbooks.Open(.SelectedItems(i)) 'TU wytępuje ostatni raz With wkb1.Sheets(tblArkusze(i - 1)) .Visible = True End With With wkb2.Sheets(1) .AutoFilterMode = False .Columns("A:N").Copy...
Cześć, mam problem, którego nie potrafię rozwiązać. Mianowicie potrzebuje narzędzia, które będzie wyszukiwać zakładki w pliku excel po jego nazwie. Powinno być to w formie MsgBox. Np. mamy plik jak w załaczniku i chciałbym, żeby odrazu po uruchomieniu wyskoczył MsgBox, gdzie możemy wpisać interesujacy nas arkusz i otwiera się on po potwierdzeniu komunikatu....
Witam, mam problem z napisaniem makra w VBA. Mianowicie, mam plik o nazwie "program" w którym, znajduje się tabelka (zał.1.). Przycisk ma za zadanie otworzyć wskazane przeze mnie pliki i z otwartych plików skopiować wartość komórki A146 z arkusza o nazwie "ORZ". Nazwy plików, które otwiera makro są różne, a w każdym pliku jest arkusz "ORZ" i wszędzie...
Spróbuj makra jak w załączniku uruchamianego przy otwarciu skoroszytu. Ale jeśli masz bardzo dużo zależności, to wyświetlenie wszystkich może być nieczytelne.
Działa w takim zestawieniu Masz źle zrobioną instrukcje 'If Not otwarty Then' a co jeżeli plik masz otwarty? "nie pytaj ponownie", po którego aktywacji kolejne załączenie makra, do zamknięcia arkusza masz makro do zamknięcia arkusza? odnośnie pierwszego pytania: Jeśli plik jest otwarty to makro pomija wykonanie otwarcia arkusza "baza". Jeśli nie jest...
Witam Mamy pytanie odnoście usuwania makra przez inne makro. Od początku. Mam poniższy kod który oczywiście działa popranie i robi dokładnie to co ma robić, czyli: kod na początku filtruje i tworzy pewną ankietę w arkuszu. Następnie arkusz z ankietą zostaje skopiowany i wklejona do nowego pliku Excel, następnie zapisany pod konkretną nazwą we wskazanym...
Bardzo ładny kod. Wiem że trochę długa linia :), ale bez "nakierowania" na dany arkusz funkcji Cells() funkcja Copy(Destination) zgłaszała błąd. A z samym Range() zamiast Cells'ów nie mogłem sobie jakoś tu poradzić. :) Plus jest taki, że w tym wypadku makro nie otwiera danego arkusza (nie "skacze" do niego) i nie zaznacza kopiowanego obszaru, co wg...
Witam , jestem nową osobą na forum potrzebuję pomocy w sprawie VBA ,jestem dość początkującą osoba Mianowicie mam za zadanie wczytać dane z plików , każdy plik(.html) w osobny arkusz z których do następnego arkusza kopiowane będą zakresy danych (po dwie kolumny - takie same zakresy w każdym arkuszu) i wprowadzane obok siebie z odstępem jednej kolumny....
Kolego PRL proszę Cię nie złość się ale nie działa Twoje makro po prostu jak coś wpisze np. A4 i A5 arkusz 1 i A4, A5 arkusz 2 to w arkuszu podsumowanie nic nie ma a przycisk w 2 załączniku gdy go nacisnę to otwiera mi nowy arkusz np. Arkusz5. Natomiast kolega JRV fajnie kopiuje ale tylko od D:H i nie wiem jak poprawić do np.D:W. A i jeszcze jedna sprawa...
Witam Potrzebuję zrobić niby proste makro, ale utknąłem na kodzie do niektórych elementów. W skrócie wygląda to tak: mam arkusz z przyciskiem, do którego jest przypisane makro. Po uruchomieniu makra otwiera się panel z jednym textboxem i trzynastoma przyciskami Commandbotton. Przyciskami od 0 do 9 wprowadzam liczby do textboxa, a pozostałe przyciski...
No tak. Mój błąd, bo powinno być w innej kolejności. Sorry, ale dzisiaj sobota ;) Coś tam (w załączniku) kopiuje. Przeanalizuj, dostosuj do własnych potrzeb.
Dziękuję z góry wszystkim za chęć pomocy. Potrzebuje pomocy w edycji prostego makra, ktore dziala w Excelu - niestety, jestem laikiem jeśli chodzi o programowanie... Moze ktos znajdzie chwile i pomoze? Moj problem wyglada tak. Mam plik excela w którym w kolejnych arkuszach są dane dla kolejnych dni miesiaca. Każdy dzień ma ten sam układ danych, czyli...
Wiem i ja to rozumiem, jest to mój błąd, makro przeszukuje tablicę od pierwszego jej elementu do ostatniego, 15 wpisałem celowo, by zaznaczyć, że jest to numer kolumny, kolumnę O można równie dobrze zapisać jako kolumnę z numerem 15. Kiedy zacząłem stosować oznaczenia x,y jeśli chodzi o arkusz Excel, to makro dopiero wtedy zaczęło widzieć ten zakres...
Raz jeszcze dzieki :) i powalcze troche z ta proba importu danych Dodano po 32 Utworzylem sobie arkusz excela (nazwijmy go "a") i w nim zrobilem przycisk, ktory otwiera sobie formularz "Private Sub CommandButton1_Click() Workbooks.Open ("C:\Documents and Settings\xyz\Desktop\team\tr2.xls") End Sub " Teraz mam pytanie drazac ten temat i poprzednie watki....
Dziękuję bardzo w końcu po wielu próbach zadziałało :-). W ramach nauki VBA chciałbym trochę udoskonalić powyższe makra. Obecnie w pliku 1 mam dwa przyciski cmdSave i CommandButton1, które działają w następujący sposób: cmdSave -tworzy mi plik o nazwie komórki B3 pliku 1 i zapisuje na dysku we wskazanej lokalizacji (jest aktywny przy otwarciu pliku...
Problem opiszę w krokach, co myślę, że pozwoli nam łatwiej się komunikować i go rozwiązać. Wstęp Będzie to plik składający się z listy tematów spotkania (nazwy spotkania), daty ich utworzenia, oraz paru innych kolumn. Plik będą obsługiwać użytkownicy totalnie bojący się cokolwiek robić, którzy prócz wpisania danych w wiersze nie potrafią nic. Opiszę...
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...
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...
Witam, Mam taki kawałek makra, który exportuje mi konkretny format plików do excela... Mam cztery pytania do tego, ponieważ nie bardzo ogarniam vbs'a na tyle by wpiąć w to kawałek kodu, który zadziała :/ (acz pracuję nad tym) Generalnie to co robi, to pobiera plik txt, formatuje go odpowiednio po spacjach jako separator, usuwa zbędne kolumny a następnie...
FileDialog ma wiele właściwości. Np: . InitialFileName = Environ("HOMEPATH") & "\Desktop\"
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...
Nie ma uniwersalnego rozwiązania w takim przypadku. Można oczywiście zapisać plik z makrem jako dodatek i aktywować go w oknie "dodatki", ALE: jeśli ktoś zmieni nazwy, kolejność indeksów arkuszy (jeśli nie nazwy) to kicha. Spróbuj może w ten sposób: 1. Dostajesz plik z logami (gdzieś trzeba by go zapisać). Tutaj arkusz z danymi musi być rozpoznawalny....
Niestety dalej zapisuje tylko z 01.YY do 43_01. Następnie otwiera 43_02 i koniec Dodano po 2 W plikach 43_02, 43_03... itd makro tylko je otwiera. makro musisz mieć umieszczone w każdym z plików 01.YY , 02.YY itp
Dopisałem definicję formatowania warunkowego w VBA. Formatowanie odtwarza się automatycznie przy otwieraniu skoroszytu. Szerokość zakresu formatowania jest określona przez zawartość trzeciego wiersza w każdym arkuszu. Wiersze zakresu formatowania są ustalone na stałe. Skoroszyt nie może zawierać innych formatowań warunkowych. Gdyby zawierał, trzeba...
Dziękuje. Domyślam że tylko w taki sposób można rozwiązać mój problem. Wolałbym aby każdy arkusz który ma być ukryty i zabezpieczony hasłem, był ukryty i zabezpieczony hasłem. Natomiast makro nie otwierało arkusza ale "wykonało pracę" i nie musiało ukrywać z powrotem arkusza. Zasada działania jak funkcji excela. Czy jest to możliwe?
coś poszło nie tak Jak widać na zrzutach :please: ja załączyłem i opisuje plik ProtUpBase.xls , a koleżanka otwiera jakiś plik (po nazwie sądzę, że też mój :D ) ProtTablica.xlsx , który żadnego makra rzeczywiście nie zawiera :cry:
Może jakoś tak: [syntax=vbnet] sub Test() dim Fn as string, Wb as object Fn=Dir("C:\twój katalog\*.xlsx") do while (Fn <> "") set Wb=Open(Fn) Sheets(2).Select Fn=Dir loop end sub [/syntax] Tylko otwiera plik i wchodzi do 2 zakładki, nic więcej nie robi.
Propozycja rozwiązania w oparciu o makro. W module uniwersalnym wpisałem takie makro: [syntax=vbscript]Sub NowaData() On Error Resume Next Dim ark As String With ActiveSheet ark = .Range("BA22").Value .Range("BI21:BI25").FormulaLocal = "=SUMA.ILOCZYNÓW('[Wyniki tygodniowe.xlsx]T" & ark & "'!$H$2:$H$23;--('[Wyniki tygodniowe.xlsx]T" & ark & "'!$G$2:$G$23=$BH21))"...
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...
otwiera się Arkusz 2 zaznaczając pustą komórkę kolumny B (ewentualnie dodaje nowy pusty wiersz) Patrząc na załączony plik nie mogę zrozumieć w jakim celu chcesz zrobić to makro :?: :cry: Jeśli chcesz szybko weryfikować odniesienia do arkusza 2 to najprościej proponuję makro w arkuszu 1 :spoko: : [syntax=vbscript]Private Sub Worksheet_BeforeDoubleClick(ByVal...
Czy takie makro da się zrobić? Tak :D , ale chyba lepiej dwa oddzielne :spoko: Po drobnych zmianach w pliku tygodnie.xlsm 901448 umieszczony w Module1 kod sprawdza "stan arkuszy" i ewentualnie przygotowuje arkusz na nowy tydzień :!: Zmodyfikowano również plik suma pól.xlsm 901451 i wyposażono w makro do kopiowania potrzebnych Ci wartości z aktualnego...
Jakaś podpowiedź co dodać żebym mógł wybierać kilka plików :?: i zostały otwarte w osobnych arkuszach :?: ? Celowo wspomniałem Ci o nagrywaniu makra bo wtedy musisz całą procedurę przeprowadzić "manualnie" i przemyśleć dokładnie co chcesz zrobić i jaki efekt chcesz osiągnąć :?: Otwieranie pojedyńczych plików i otwieranie kilku plików wymaga odmiennego...
Makro ma pozwolić na przeliczenie danych z np. 20-30 osobnych plików, które mają dane zawsze w zakresie A1:U100. W pliku TESTY wklejamy do zakładki DATA dane skopiowane z otwartego pliku, następnie w zakładce REPORT w komórkach AE4:AE15, mam wybrane dane po przeliczeniach, które kopiuję do kolejnej zakładki ZBIORECZE WYNIKI. Kolejne pliki są przeliczne...
Tworzysz obiekt FileSystemObject Dim fs as object Set fs = CreateObject("Scripting.FileSystemObject... Z powyższego pobierasz obiekt folder Dim f as object Set f = fs.GetFolder(folderspec) Z powyższego pobierasz kolekcję plików Dim files as object set files = f.Files Z kolekcji pobierasz ilość pozycji (czyli plikow) num = files.count funkcją Rnd losujesz...
A co z nagłówkami, powtarzanymi wielokrotnie ? Ma być tylko jeden, czy ileś tam za każdym razem nowy i w wyniku nagłówkowy przekładaniec ? Edycja: Nie przyjrzałem się ... kopiujesz bez nagłówka ... Ale może przy pierwszym kopiowaniu powinien on być przenoszony jednorazowo ? Ręczie go wklepujesz/kopiujesz ? Edycja: Sprawdź: [syntax=vba] Option Explicit...
sprawdzone , załączam plik z danym. makro otwiera się bez problemu w wersji Microsoft® Excel® 2016 MSO (wersja 2202 kompilacji 16.0.14931.20118) 32-bitowa ( wcześniej błędnie podałem , zę to wersja 2003) problem jest w wersji 14.0.7015.1000 excel 2010 32- bitowa przypisane są dwa makra , makro 1 - utworzone przez zarejestrowanie excel 2010...
Kurcze, szukałem na prawde długo i nic nie mogę znaleźć. Jest dużo o imporcie .txt i .csv, ale o .xls i .xlsx nie mogę znaleźć :( Być moźe dlatego, że niepoprawnie zadaje pytanie do szukania. Będę wdzięczny za każdą wskazówkę Pozwól sobie pomóc i napisz jak ten import ma wyglądać? Gdzie znajdują się pliki do importu, jak się nazywają, jak mają się...
Napisanie takiego makra nie jest czymś szczególnie trudnym, tylko ono będzie się dość długo wykonywać. Moja propozycja zmierzała do przyspieszenia tego. [syntax=vbnet]Sub kopiowanie2() ' ' kopiowanie Makro ' Dim r As Range Dim wkcalc As Worksheet Application.ScreenUpdating = False ' Workbooks.Open Filename:= _ "U:\Nowy folder\Arkusz B.xlsx" Set wkcalc...
Po wpisaniu dostaję ścieżkę do pliku Gdzie to wpisujesz? W komórkę w arkuszu. Obok mam formułę wyszukaj pionowo, po wpisaniu numeru dostaje ścieżkę do pliku.
Na szybko przychodzą mi dwa sposoby: 1. Tworzysz sobie wzór - workbook, zawierający dwa arkusze, otwierasz go makrem i tam zapisujesz rezultaty 2. Tworzysz dwa arkusze w pliku z makrem, zapisujesz do nich rezultaty zapytań a potem kopiujesz te dwa arkusze do oddzielnego pliku. Oba sposoby są przećwiczone i działają bez problemów.
otwierał nowego Excela nowe wystąpienie programu Excel, lub nowy skoroszyt? Myslim ze skoroszyt:[syntax=vb]Sub kopie20() Dim nw As Worksheet Dim my As Range Set my = Workbooks("Truck.xls").Sheets("Aero") s = 0: k = 1 For n = 1 To my.Cells(65536, "P").End(xlUp).Row s = s + my.Cells(n, "p") If s + my.Cells(n + 1, "p") > 20 Or my.Cells(n + 1, "p") = ""...
Zależy w jaki sposób je wskazujesz (w ListBox, w arkuszu, ...). Jednak w każdym przypadku trzeba będzie posortować.
Można uzyskiwać również dostęp do danych w plikach zamkniętych Przecież wyszukaj.pionowo działa na zamkniętych skoroszytach i nie trzeba cudować z makroexcel4. Jak pominąć to otwierające się okno, aby makro samo otwierało plik i pobierało wartość? Masz źle zrobione odwołanie do skoroszytu (baza), oprócz samego pliku musisz jeszcze dodać z którego arkusza...
To nie jest proste zadanie. Ustawienie filtra nie generuje żadnego zdarzenia, które można byłoby przechwycić, żeby zapamiętać jego ustawienie. Szczęśliwie masz w arkuszu formuły z funkcją SUMY.CZĘŚCIOWE, które przeliczają się po zmianie ustawień filtra, a przeliczanie generuje zdarzenie Calculate, które można tu wykorzystać. Makro, które proponuję zapamiętuje...
Witam, Proszę o pomoc - jak powinno wyglądać makro czytające (otwierające) kolejne pliki wg listy (tekstowej lub excela - to obojętne). Wiem tylko tyle, że wyrażenie Windows("plik1.xls").Activate trzeba zastapić wyrażeniem Windows(s+".xls").Activate gdzie s to zmienna typu string do której podstawiamy dowolny tekst z dowolnego źródła (tabeli, arkusza,...
Pytanie 1. - (nie zalecane) obniżyć poziom zabezpieczeń makr. - (lepsze) ustawić poziom zabezpieczeń na najwyższy i podpisać makra. Pytanie 2. Jeżeli za userform uważasz arkusz "__MENU__" to najprościej: w ThisWorkbook: Private Sub Workbook_Open() Sheets("__MENU__").Act... End Sub Zamiast arkusza możesz otwierać każdy inny...
[syntax=vbnet]arg = "'" & ActiveWorkbook.Path & "\" & "[" & "1.xls" & "]" & "Arkusz1" & "'!" & Range("A3").Range("A1").Address(, , xlR1C1) a = ExecuteExcel4Macro(arg) [/syntax]
w pliku są danę osobowe pracowników, więc najpierw musiałbym go "wyczyścić". Przy starcie jest makro, które ukrywa arkusze i włącza ochronę. Arkusz1 ma własne menu podręczne.
Opisz dokładnie co i jak ma się odbywać. Nie jest jasne jaki arkusz z otwieranego pliku ma być źródłem. Nie wiadomo, co z danymi źródłowymi robić. Te dodawane arkusze, to w źródłowym, czy docelowym? I tak dalej.
nagrywasz swoje czynności rejestratorem. 1. Włączasz rejestrator. Przypisujesz klawisz skrótu np "f". Makro uruchomi się ctrl+f 2. Zaznaczasz odpowiednie komórki kursorem, zmniejszasz je do właściwej wielkości i dajesz wypełnienie. 3. Zatrzymujesz rejestrowanie. 4. Otwierasz nowy arkusz. 5. Uruchamiasz makro ctrl+ klawisz skrótu.
Ten post akurat widziałem, ale mi nie o to chodzi. To jest instrukcja jak szybko stworzyć przycisk w danym arkuszu. A mi chodzi o to, aby przycisk z konkretnym makrem przypisać do paska narzędzi tak abym widział go przy otwieraniu każdego arkusza
Jeśli plik, który jest otwierany, zawsze w tym samym folderze, np. C:\..\..\DaneCodzienne należy: w pliku makr osobistych w kodzie skoroszytu [syntax=vb] Private WithEvents App As Application Private Sub Workbook_Open() Set App = Application End Sub Private Sub App_WorkbookOpen(ByVal Wb As Workbook) If Wb.Path Like "*\DaneCodzienne" Then Wb.Sheets(1).Name...
Dzieki za podpowiedź z : Set xlApp = CreateObject("Excel.Application") xlApp.visible = true Faktycznie teraz odpalenie skryptu VBS uruchamia plik a.xlsm, jednak od razu po odpaleniu wykonuje się makro bez odświeżenia kwerendy, zapisuje po prostu plik w nowym miejscu pod nową nazwą ale z starymi danymi. Oczywiście 0 w VBS jest zamienione na 3. Odpalenie...
Moim zdaniem wychodzisz z błędnego założenia. Sugeruję kolejność: 1. Kliknięcie przycisku w arkuszu otwiera formularz (i nic więcej). 2. Wypełnienie formularza przez użytkownika. Koniecznie zablokuj kontynuowanie bez wypełnienia kluczowych pól. Po wypełnieniu formularza można pobrać wartości potrzebne do przede wszystkim nadania nazwy wstawianego, nowego...
Uściślij: 1. Czy pliki zostały już otwarte z danego katalogu i przebywają sobie w tle programu, co sugerowałoby to co napisałeś (" pobiera z otwartego pliku ") ? 2. Czy też pliki trzeba dopiero otworzyć z danego katalogu ? 3. Jeśli trzeba, to czy jest to katalog tylko "jednopoziomowy", czy też znajdują się w nim podkatalogi, z których też należy otwierać...
Kłopot polega na tym że nadal nie do końca wiem co chcesz. Jeżeli to w pełni zautomatyzujemy i ty będziesz to obsługiwał bezpośrednio na pliku excela to praca kolegi z tym związana nie będzie już potrzebna. (zanudzi się na śmierć :) ) Jeżeli dopuszczasz makra w swoim docelowym pliku "magazynie" to widzę to tak: otwierasz plik wciskasz przycisk np. nowa...
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...
Sprawdź: [syntax=vba]Option Explicit Sub najmlodszy_plik() Dim plik As String, test1 As String, test2 As String, plik_do_otwarcia As String Const katalog As String = "c:\temp\" '"C:\DPD Polska\DPD Polska - Moduł Wysyłkowy\Raporty\" Const arkusz As String = "Arkusz1" '"DPD_OPOLE" Worksheets(arkusz).Activate plik = Dir(katalog & "*.csv", vbNormal) test1...
W tym, że nie ma kopiować całego arkusza. Jak znajdzie w kolumnie O i wierszu 10 wartość większą niż 70, to ma kopiować i wklejać do innego pliku tylko wskazane wartości z kolumn i wiersza 10.
Wystarczy umieścić takie makro w procedurze arkusza 'Worksheet_Change'. Nie lepiej przenieś makro do zdarzenia beforeclose? Pewnie to wordowskie makro otwiera ten D402 ładuje dane i go zamyka.
Cześć! Mam pewien problem z którym borykam się od dłuższego czasu. Na VBA się nie znam... potrafię jedynie nieco dostosowywać kody, do swoich potrzeb, ewentualnie łączyć kilka w jeden. Ale z tym tematem sobie nie radze. Może mi pomożecie... Mam pliki o różnych nazwach. W każdym z plików są 3 arkusze- zawsze tak samo nazwane. każdy arkusz zawiera różny...
makro trzeba uruchomić po otworzeniu excela, poza tym makro chyba może działać tylko "na arkuszach", nie mają dostępu do plików, także chyba nici z tego, ale Excel zawsze pyta się czy zapisać przed zamknięciem pliki w których były dokonane zmiany, a po uruchomieniu z menu Plik można wybrać ostatnio otwierane dokumenty :)
W 'Workbook_BeforeClose' kopiujesz zakres, otwierasz 'główny', określasz pierwszy pusty wiersz 'Cells(Rows.Count, "A").End(xlUp).Row + 1', wklejasz, 'Me.Save'.
Macie jakiś pomysł, aby po kliknieciu w przycisk otwierało nowe okno do kontretnego katalogu i mógłbym wybrać odpowiedni plik, z którego skopiowałoby odpowiednie komórki do mojego arkusza ? Przykład W arkuszu Arkusz1 przycisk POBIERZ powinien pobierać dane z pliku z lokalizacji np. H:\CCC\ccc\ (jest w nim kilkanaście plików excel wiernej kopii arkusza...
chciałbym żeby można je było zaznaczyć zbiorczo (ctrl+a?) Makro w post #4. Wybor jednego tylko dla prejscia do wymaganego folderzu. Nastepnie Dir po koleji otwiera wszystkie, co jest w foldere. Jutro pomysle, dlaczego błąd
Zapewni to zakładki w programu Excel - office-tabs.com/download.htm by po kliknięciu jednego pliku otwierały się inne zakładki z arkuszami - To na pewno makro od głównego arkusza
po wprowadzeniu uprzednio zarejestrowanych loginów i haseł otwierają się tylko arkusze dedykowane dla logującego się użytkownika :D Cześć, Twój plik to super-plik i jest w sam raz na moje potrzeby, ale gdzie się definiuje te loginy i hasła? Mam kilkanaście arkuszy do ukrycia przed niepowołanymi oczami i chciałbym wdrożyć Twoje rozwiązanie, ale zerkam...
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
Dzięki za podpowiedź A czy jest możliwość użyć tych makr zakładając, że mam dwa podziały na zakładki dotyczące dokumentacji archiwalnej i dokumentacji bieżącej. Zakładam również, że będę miał osobne przyciski do odkrywania i ukrywania dla dokumentacji archiwalnej jak i bieżącej. A może coś w tym rodzaju: po naciśnięciu przycisku np. "ukryj" otwiera...
Czy można zmodyfikować poniższe makro Pewnie można ... jak się komuś będzie "chciało chcieć" ... : ) ... ale wpierw parę uwag dla przyszłych twoich "modyfikacji": 1. xlOpenXMLWorkbook - podawałbym kody liczbowe (w tym przypadku jest to 51) zamiast nazwy stałych, będzie bezpieczniej jeśli plik będzie otwierany w różnych wersjach excela: Function CopyDataRangeP...
"Zabezpieczenie hasłem to nie jest zabezpieczenie, można to obejść. " nie ma zabezpieczeń których nie da się obejść... wszystko jest kwestją czasu :) czy istnieje możliwość zabezpieczenia takiego arkusza przed dowolnym przegrywaniem spakuj RAR`em i zabezpiecz hasłem, łamanie hasła do archiwum jest bardzo czasochłonne :) pozdrawiam,
Wypada zacząć od tego, że Excel nie jest twierdzą szyfrów i wszystkie zabezpieczenia są tu raczej symboliczne, to znaczy mają uświadomić użytkownikowi, że robi coś, czego robić nie powinien. Natomiast jeśli użytkownik jest zdeterminowany, to zawsze może znaleźć obejście, żeby coś niedozwolonego zrobić. W przypadku gdy zabezpieczenie bazuje na VBA, wystarczy...
Nie napisałeś, w której wersji Excela ma to działać. W każdej wersji to jest standardowy przykład do zastosowania konsolidacji. Nagłówki kolumn trzeba sobie wpisać ręcznie albo skopiować. Potem umieszczamy kursor (komórkę aktywną) w miejscu, gdzie ma być początek wyniku (pod wierszem nagłówkowym w lewej kolumnie) i otwieramy dialog Dane/Konsoliduj....
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ść...
Witaj do komórek o zakresie(b4:b4016;M4:4016) Kopiowanie "Robert","Asia","Mirek" na inny arkusz lub jeden? bez otwierania zeszytów Wskazane jest, aby otworzyć, ale... Pokaż układ arkuszy.
Np filedialog: .Filters.Add "Pliki Excel", "*.xls" Można i bez otwierania. Spróbuj coś z makr Excel4 arg = "'" & p & "[" & f & "]" & s & "'!" & Range(r).Range("A1"... , xlR1C1) ExecuteExcel4Macro(arg) Gdzie p to ścieżka do pliku, f nazwa...
Jeśli Mamy raporty dzienne z każdego miesiąca zapisane w ten sposó; 5.MAJ-2011/R.D 5-1 do 5-31 i tak w każdym misiącu w folderze "5.MAJ-2011" są tylko pliki raportów, to bez wnikania w nazwy pobieramy kwoty z kolumny "C" (lub tych kolejnych) na podstawie tekstu z kolumny "A" z wszystkich znajdujących się tam plików. Jeśli standard zapisu nazwy jest...
Mi przy otwieraniu umowy informuje że błąd pliku i mogła nastąpić utrata danych. Ale potem mogę działać. Zaraz spróbuje poprawić. Jak teraz poparzyłem to stwierdzam że miałem podobny kłopot z przyciskami i rozciągniętym wierszem gdy przechodziłem z plikami z 2003 do 2010. W chwili obecnej nie mam 2003 jak wrócę do domu to poprawie na 2003 (myślę że...
1. Otwieramy TC (2 kliknięcia) 2. Zaznaczamy wszystkie pliki (jedna szara *) 3. Ctrl+M (2 klawisze) 4. Wybieramy np wstawianie daty (1 kliknięcie) 5. Start (1 kliknięcie) 6. Zamykamy (1 kliknięcie) 7. Robimy Entery - Ctrl+C, Ctrl+V dla podanego skryptu konsoli, Enter (5 klawiszy) 8. Scalamy (3 kliknięcia) 9. Można otwierać w Excelu ;)
PRL ThisWorkbook.Activate = Windows(Zeszyt).Activate Zrobić pełny link do arkusza. ActiveWorkbook.Sheets(1).Range("A:A").Co... Być może, jak skoroszyt otwiera, jest kopiowany z bieżącego zakresu.
Witam, Mam problem z pobieraniem danych - power query z pliku chronionego haslem. baza danych(excel) - "źródło" chronione hasłem "123" Arkusz "pobierz" - tutaj mają trafić dane z odświeżonych zapytań (kilka) Udało mi się znaleźć makro, który otwiera plik źródło i teoretycznie powinien odświeżyć połączenia ale niestety tak się nie dzieje. Wywala błędy...
Idea byłaby taka: 1) Żeby wymusić włączenie makr na użytkowniku to arkusze byłyby domyślnie ukryte, 2) Po włączeniu makr pokazałyby się arkusze, które można uzupełniać, 3) Przy otwieraniu arkusza automatycznie robiłaby się kopia zawartości do arkuszy ukrytych, widzialnych tylko z poziomu VBA (veryhidden), 4) Żebyś Ty miał dostęp do arkuszy ukrytych...
Tak to jest jak się myli instrukcje z metodami. Do otwierania plików lub zapisu słuzy instrukcja Open ( instrukcja VBA ) jej składnia: Open ścieżka For tryb As # numer_pliku Natomiast: metoda Open obiektu Workbook ( bo to jest obiekt ) nie ma nic wspolnego z otwieraniem pliku. Pozdrowka
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...
Nagraj SaveAs > arkusz wynikowy > pdf i dopisz na końcu makra. Niestety, nie działa. Dodano po 1 tylko jego wynik w komórkach Skopiuj, do nowego arkusza wklej specjalnie ,,tylko wartości'' i wyeksportuj do PDF. Zależy mi na tym aby czynność ta zajęła jak najmniej czasu u pracy nie chcę otwierać kilku arkuszy. Im mniej czynności tym lepiej.
cienki jestem w programowaniu. Przedstawie sytuacje: -otwieram plik *.xls -w nim jest 30 arkuszy o nazwach od arkusz1 do arkusz30 -aktywnym arkuszem jest arkusz1 , -daje Narzędzia > makro> rejestruj nowe makro , daje ok i zaczyna mi "nagrywac" czynności -jako ze chodzi mi o ogólną zasade dzialania , czynnością jaką rejestruje makro jest "wstaw wykres"...
... Kiedy nie miałem filtrowania poprzez przycisk z makrem vba ukrywanie oraz chronienie komórki pomagało, lecz kiedy ma m filtrowanie z przycisku, to VBA wyrzuca błąd iż arkusz jest chroniony A czy w kodzie vba jest gdzieś taka linia (?): True , to po zablokowaniu arkusza dana czynność jest dozwolona. Tam gdzie jest False , jest ona zabroniona. ......
Witam wszystkich Potrzebuje zrobić makro w vba tak by otwierało dowolny plik xlsx. Następnie kopiuje całą zawartość otwartego pliku do tego pliku gdzie jest makro tylko do nowych arkuszy ( no i właśnie w tym miejscu mi się wykrzacza) Poniżej kod [syntax=vb]Sub Makro() Dim pl As Variant Dim plik As Workbook pl = Application.GetOpenFilename() If pl =...
Dzięki wielkie za pomoc wszystko ładnie działa, chciałbym tylko aby ten formularz otwierał się w formie arkusza danych, poczytałem i znalazłem funkcję acFormDS tylko nie wiem jak ją wrzucić do tego kodu.
Witam. Nie otwieram kolejnego tematu, ponieważ mój problem jest trochę zbliżony. A mianowicie: w pliku " przykład " znajduje się 3 arkusze odpowiednio nazwane. I o co mi chodzi. Kiedy uzupełniam dane w pozostałych arkuszach (tzw. "pomocniczych" czyli " wczasy " i " wypoczynek ", interesujące mnie części danych są przenoszone do arkusz "głównego" " pełne...
Dzięki, wszystko fajnie działa, ale jak arkusze mają domyślne nazwy, jak zmieni się nazwę arkusza na jakąś inną to już niestety odpowiedni link się nie otwiera... Da się to jakoś obejść??
A no tak, sorka. Chodzi mi o makro w exelu. Nie mogę skopiować makr w arkuszu które pobierają dane bo te są chronione hasłem. Makro jest jednak przypisane do przycisku. Mam roboczy raport do którego ręcznie przeklejam dane. Istnieje sposób aby napisać takie makro Excel aby w tym moim pliku roboczym otwierało plik który pobiera dane i aby to makro aktywowało...
Stworzyłem coś takiego, ale nie mogę sprawdzić, bo gdzie jest błąd i pokazuje się komunikat Block If without End If, ale nie potrafię znaleźć tego błędu.[syntax=vbscript]Sub wstawianie_IL_z_załącznikami() 'te dane mają być w makrze pobierającym arkusze 'otwieranie pliku źródłowego Dim fd As FileDialog Dim wkb1 As Workbook, wkb2 As Workbook Dim tblArkusze()...
No dobrze, zastanówmy się. Plików masz nieokreśloną ilość. Można te właściwe zaznaczyć w oknie dialogowym (Alow multiselect) lub dialog otwierać w pętli aż do zamknięcia bez wyboru. Arkusze mają różne nazwy. Mniejsza z tym jeśli będziemy kopiować tylko i wyłącznie z pierwszego i drugiego po indeksach (Sheets(1), Sheets(2)), zawsze z tych samych komórek...
dobrze, inne osoby nie działa z arkusza 1? plik Pana powinny być wspólne dla reszty. Jest pożądane, który można otworzyć bez ostrzeżenia "do odczytu" Pytanie 2 jako makro musi znać nazwę pliku "statystycznego", bo to może mieć inne pliki do nagrania na arkuszu po zamknięciu, zamiast otwierać je na statystyki ==akrusze w całości ze wszystkich plików...
Witam. Pracuję nad pewnym trackerem w Excelu do zbierania wybranych danych z arkuszów zewnętrznych. Założenie jest takie, że wchodząc w tracker użytkownik jest w stanie zobaczyć dane od początku zbierania do dnia obecnego. Główny problem tkwi w tym, że rozpisywanie tego funkcją w komórce powoduje, że otwieranie pliku robi się coraz bardziej czasochłonne,...
1. Otwieram wzór arkusza ze zleceniem w którym zapisane jest moje makro. 2. Wypelniam ten wzór w odpowiednie dane. 3. Uruchamiam makro, które tworzy nowy plik zapisuje je pod nazwą pobraną z odpowiedniej komórki po czym tworzy hiperłącze które łączy nowo stworzony plik z plikiem wzorca. 4. Później aby wzór pozostał wzorem, to plik który wypełniałem...
arkusze są zawsze o inne nazwie jak również skoroszyt i tego nie wiem :cry: A makro skąd ma wiedzieć jakie są nazwy arkuszy i skoroszytów, oraz zakresy danych :cunning: :?: Wszystko to można wprawdzie obejść (tj. używanie nazw w kodzie), ale zawsze musi w tych obiektach być zachowana jakaś logika i powtarzalność :idea: Bez przykładowych plików (źródłowych...
otwiera arkusz arkusz makro makro arkusz
ciężka odpalać ciepłym silnik honeywell reduktor stacji pogodowej czujnik
philips mcm302 osuszacz powietrza
Jak obliczyć f/D anteny offsetowej – wzory, pomiary, przykłady Sony KD-55X8500C eMMC Failure: Boot Loop, 8-Blink Error, Replacement Options
