Witam serdecznie, Mam problem z odczytem danych metodą ADODB z innego arkusza Excel będącego na udziale sieciowym i który może być otwarty przez inną osobę na swoim komputerze. Korzystam z funkcji napisanej przez Tajana: [url=]Link do ExcelForum - Funkcja GetValue. O ile funkcja ma podstawowe...
Witam Tym razem nie wiem jak to ugryźć. Mam tabelę w excelu (powiedzmy 100 wierszy z liczbami) które drukują sie na np. 4 stronach. Nie mogę "rozwalić" ciągłości tabeli, więc nie mogę wstawiać dodatkowych wierszy (chyba że tylko na moment wydruku). Docelowo arkusz może mieć zmienną liczbę wierszy...
Dzień dobry, Bardzo dziękuje za pomoc. Zapisywanie ze zmienioną nazwą już działa :-) Zmiana wielkości wykresów też działa :-) Jeżeli chodzi o zbudowania dwóch funkcji do uproszczenia makra, to rozumiem zasadę ale nigdy nie budowałem jeszcze funkcji w Exelu. Składnię chyba rozumiem ale nie...
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&...
Dzieki za pomoc :) Kurcze wciaz mam problem. Probowalem przerobic makro pod swoje dane (zasada dzialania taka sama)i mam nastepujacy problem z tym Plik raport sciaga sie z ERP i tam dane ktore mnie interesuja zaczynaja sie w komorce A (od 5 wiersza , 4 wiersze to naglowki wiec powinno byc range...
Witam Od dwóch dni męczę się nad połączeniem dwóch plików excela, konkretnie chodzi o pobieranie danych do komórki (A1) w pliku 'wynik.xls' z: (A1) w pliku 'dane.xls' Przeszukałem wszystko i nigdzie nie znalazłem szczegółowej instrukcji jak to zrobić. Wiem jedynie że trzeba użyć do tego celu...
Sprawa z pobieraniem danych z zamkniętego pliku jest o tyle trudna, że żadna przydatna w takim przypadku funkcja na takowych nie działa (Np ADR.POŚR) Pozostaje VBA. Poszukaj informacji n.t. ExecuteExcel4Macro, Np [url=]Link Można ją zastosować jako procedurę zdarzeniową podstawiając argumenty, albo...
Jeżeli działasz na zamkniętych plikach, to bez VBA nie da rady (ADR.POŚR nie działa z zamkniętymi plikami). Zerknij: [url=]Link1 - Wykorzystanie SQL-a [url=]Link2 - Funkcja GetValue (ExecuteExcel4Macro) Najprościej jednak hurtem podmienić nazwy przez Ctrl+h
Znalazłem w necie ciekawą procedurkę do rejestracji funkcji. Jest z nią jednak drobny problem. Ale od początku. Mam napisaną przykładową funkcję zwracającą indeks koloru wypełnienia komórki: Private Function KolorKom(Komorka As Range) As Double Application.Volatile KolorKom = Komorka.Interior.ColorIndex ...
Punkt dwa był już niejednokrotnie na elektrodzie przerabiany. Np Wydaje mi się, że stworzona tu funkcja może być rozwiązaniem mojego problemu. Ale.. nie działa mi. :-( - błąd argumentu. Nie panuję nad składnią definicji argumentu, tam chyba siedzi jakiś knyf... Function GetValue(path, file,...
Da się. Np można wykorzystać metodę ExecuteExcel4Macro , odpowiednio podstawiając argumenty. Kawałek przydatnego kodu: [url=]Link
Nie baw się w makra, tylko wydziel sobie arkusz i wstaw w nim 50 łączy do plików. W arkuszu "raport" oblicz tylko sumę... Z drugiej strony: jeśli już koniecznie VBA, to bez wstawiania łączy i otwierania plików zrobisz to wygodnie za pomocą ExecuteExcel4Macro z odpowiednimi argumentami.
ale nie mam pojęcia jak ominąć hasła i jaki kod zastosować aby makro skopiowało zakres ze wszystkich plików. 1. Hasła trzeba znać, nie omijać. No, może z nielicznymi wyjątkami. Poszukaj informacji o ExecuteExcel4Macro 2. Jest kilka przykładów na forum. Np Na pewno odwdzięczę się za pomoc. Hmm, czytałem...
Czy można pobrać dane z arkusza który nie jest otwarty? Poszukaj informacji na temat ExecuteExcel4Macro Np [url=]Link
aż tak dobry w excelu to ja nie jestem (niestety). ale będę się zagłębiał w ten temat bo nadal nie rozumiem jak sumować zakresy (tu D82:F139) a nie pojedyncze komórki. Będę jeszcze miał pytania :) edit: wyszło mi coś takiego, ale i tak się nie liczy w UZYWANE. [syntax=vb]Sub Makro2() MyPath...
Mam dość skomplikowany problem. Założyłem konto na tym forum, żeby go rozwiązać. Słusznie, witamy serdecznie. Chciałbym teraz, żeby z zamkniętego pliku "Budynki" skopiowały mi się do skoroszytu "Analizy" arkusze z budynkami, które wymieniam w arkuszu "Podsumowanie". Zdaje się, że przy pomocy metody...
Niestety, ADR.POŚR działa tylko na otwartych plikach, a szkoda. Pozostaje VBA... Możesz: 1) połączyć otwieranie plików przy pomocy makr + ADR.POŚR 2) proste makro otwierania pliku i kopiowania danych 3) trudniejsze w składni, ale dające możliwość kopiowania z zamkniętych plików, makro z wykorzystaniem...
Chodzi o to, że plik główny musi być cały czas włączony właśnie. ='C:\Users\Tomasz\Desktop\ Dodano po 1 Znalazłem rozwiązanie. Podaję kod VBA: Private Function GetValue(path, file, sheet, ref) ' Retrieves a value from a closed workbook Dim arg As String ' Make sure the file exists ...
Witam. Bardzo proszę o pomoc w prześledzeniu poniższego kodu i jeśli jest to możliwe poprawieniu go tak aby działał jak najbardziej sprawnie i poprawnie. Kod ogólnie robi to co chcę ale robi to bardzo długo i w pewnym momencie wywala błąd. Zadaniem kodu ma być aby z pliku o nazwie 'TEST.xlms' z arkusza...
.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"", ""False"")" Przecież wiersz z tą funkcją znajduje się w procedurze którą zamieściłem w moim poście. Napisałem też, że makro ukrywa to co ma ukryć, natomiast szukam rozwiązania problemu powstającego wtedy, kiedy użytkownik podwójnie kliknie na pasek tytułu...
Hej, mam problem z moim makrem. Chciałbym zaimportować pewne komórki z innego pliku poprzez makro. Działa już prawie wszystko ok tylko w tych komórkach są daty. Zasięg importu jest większy niż dane które chce ściagnąć z tego względu że co chwila ktoś dodaje nowe wiersze itd. Tak więc gdy zaciągam dane...
Witam, stworzyłem makro które pobiera dane z zamkniętego pliku i wkleja dane w wyznaczone miejsce w drugim pliku. Z makrami dopiero początki, więc kopiuje gotowe kody i próbuje je odpowiednio dopasować [syntax=vbnet]Option Explicit Private Function GetValue(path, file, sheet, ref) Dim arg As...
Witam , Posiadam wiele takich samych plików które zawierają harmonogramy z wierszami zawierającymi status, operacje i czas. Dane znajdują się w zakresie od H14 do BA312 tak jak w załączonym pliku. Potrzebuje zebrać ze wszystkich plików dane do jednego pliku w Formie Sumy czasu dla danej operacji która...
W sumie potrzebujesz otworzyć plik "wzór.xls", następnie poprzez 'Dir' pobierać nazwy kolejnych plików w pętli i albo je otwierać, albo pobierać zawartość komórki bez otwierania (ExecuteExcel4Macro lub wstawić wartość łącza). [url=]Link [url=]Link
Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim nrPlikuWyj1 On Error Resume Next nrPlikuWyj1 = FreeFile Open "\\xxxxxxxx\log_BU3.1.txt" For Append Shared As #nrPlikuWyj1 Write #nrPlikuWyj1, _ "Plik " & ThisWorkbook.Name & _ ...
Jednak uwielbiam proste rozwiązania :) Wklej w kod arkusza wynikowego takie makro [syntax=vbscript]Option Explicit Option Compare Text Private Sub Worksheet_Change(ByVal Target As Range) Dim myPath As String, myFile As String Dim ark As String, rn As String, arg As String If Target.Address(0,...
Znalazłam na waszej stronie poniższe marko : [syntax=vbscript]Public Sub wypisz() Set a = ThisWorkbook.Sheets("BUD") x = a.Cells(Rows.Count, "A").End(xlUp).Row + 1 Set objFSO = CreateObject("Scripting.FileSystemObject... objFolder = objFSO.GetFolder("Y:\CGEurope\Files\SOC Reports\2020\Bridge...
Witam, Mam makro, które zaciąga dane z 30 różnych exceli z jednej konkretnej zakładki. Chce to zrobić bez otwierania każdego pliku na dysku sieciowym, co sporo czasu zajmuje. Znalazłem w sieci przykładowe makra na podstawie ExecuteExcel4Macro oraz ADO, ale mam problem, gdyż pliki, które chce otworzyć...
Rozwiązaniem będzie: zainteresować się funkcją Dir Tak właśnie jest zrobione w powyższym pliku: Nie bardzo rozumiem co tam jest napisane. Z tego co widzę to podaję ścieżkę w kodzie, a kod jest zbudowany tak że jeszcze muszę wybrać jakiś folder i tego nie rozumiem. Udało mi się przerobić...
"nie otwierania ich w aplikacji Excel" Plik musi być otwarty, żeby z niego odczytać dane i mój przykład to robi. Robi to w tle dla użytkownika i o to chodziło. ExecuteExcel4Macro(Arg)... nie ma nic wspólnego z aplikacją Excela. Może w ogóle nie używać Excela?