To już tak z ciekawości zapytam. Rozumiem, że chodzi o minimalizację kodu makro. Czy zapis jak u Ciebie powoduje szybsze jego działanie? Oczywiście nie chodzi o moje makro bo tutaj nie będzie tego widać, ale tak przy rozbudowanych makrach. Czy takie deklarowanie obiektu, który później jest wielokrot...

Dzięki Jan_J Naprowadziłeś mnie, ale zrobiłem troszkę inaczej i działa. :D sciezka = "C:\Users\....\Desktop\....\" oDoc1 =ThisComponent kom1 = oDoc1.Sheets.getByName("Arkusz1").getCellByPosition(1,2) kom2 = oDoc1.Sheets.getByName("Arkusz1").getCellByPosition(1,4) oDoc1....

Widzę, że temat nie zamknięty więc pociągnę bo walczę z tym samym problemem. Myślałem, że na podstawie przedstawionych tutaj informacji dam radę, ale nie idzie :( Mam dobrze działające makro nie ukrywam, że z tutejszą pomocą), które pobiera dane z formularza wpisuje je do drugiego pliku. Nie ma prob...

Jermor pisze:Wydaje mi się że zapomniałeś o Option VBASupport 1 na początku modułu.

Zadziałało
Dziękuję za pomoc i już ostatecznie zamykam temat.

W nawiązaniu do poprzedniego wpisu. No nie, OOo zupełnie mnie powalił. :o Myślałem, że działania które robiłem mają jakies znaczenie, ale okazuje się, że jeżeli przed uruchomieniem makra wykonam w dowolnym miejscu jakąkolwiek zmianę i powrót do stanu poprzedniego (np wstawię apostrof i go usunę) to ...

Jeszcze na chwilę otworzę temat. Bo pojawiła się sytuacja, że działa w określonej sytuacji, której zupełnie nie rozumiem. W załączeniu przesyłam pliki na których pracuję. Oczywiście trzeba zmienić ścieżkę dostępu, żeby wypróbować. I teraz tak. 1. Przy pierwszym uruchomieniu makra pojawia się komunik...

Dzięki za pomoc. Wszystko już działa.

Ostatecznie tak wygląda działające makro przenoszące dane w obrębie jednego pliku z jednego arkusza do drugiego: Sub Makro1() Dim sngId As Single Dim sngWiersz As Single sngId = 1 + Application.WorksheetFunction.Max(Sheets("arkusz2").Range("a:a")) sngWiersz = 2 + Application.Work...

Dzięki za pomoc. Na razie przerobiłem sobie makro pisane w VBA pod OO, które pobiera dane z jednego arkusza i zapisuje je w drugim. Jeszcze nie przymierzyłem się do docelowego jakim jest przenoszenie do drugiego pliku. Myślę, że to pierwsze udało mi sie maksymalnie skrócić (w pierwotnej wersji było ...

Zaczynam łapać o co chodzi

Sprawdzę wieczorem, bo w tej chwili pracuję na kompie z pewnymi ograniczeniami. Jak wpisuję ścieżkę dostępu to pojawia mi się komunikat, że taki plik nie istnieje. Być może dlatego, że po drodze są miejsca gdzie nie mam uprawnień np. do zapisywania. Ale jeszcze mam parę pytań uściślających. W Twoim ...

Przejrzałem trochę tematów i nie widziałem, żeby ktoś zgłaszał taki wątek. Mam zrobiony formularz, którym chcę przenosić dane do zbiorczej bazy drugiego pliku dopisując kolejne wiersze z nadaniem numeru. Mam już napisane makro, które bez problemu robi to do drugiego arkusza, ale w tym samym pliku. M...