|
Pomocy, makro do odświeżania pilota danych.
|
|
2010.01.29 o godz. 20:07 temat dodany przez Safilo
|
|
Wysłany z *.cable.smsnet.pl via Mozilla/5.0 (Windows; U; Windows NT 5.1; pl; rv:1.9.1.7) Gecko/20091221 Firefox/3.5.7
|
Witam wszystkich
Mam stworzoną bazę danych na podstawie której w Calc'u przygotowuje raporty.
Całość ma zliczać ilość zamówionych usług z podziałem na ich typy.
Wykonałem odpowiednie kwerendy i za pomocą pilota danych odczytuje interesujące mnie informacje. Jednak mam problem, aby odświeżyć dane muszę na każdą tabelę wchodzić i ją odświeżać ręcznie. Czy jest łatwy sposób (makro) aby za pomocą jednego guzika w danej zakładce odświeżyć wszystkie tabele ("z pilotami danych"). Z góry dziękuje za pomoc.
Próbowałem nagrywać makro ale, niestety to nie działa.
|
|
|
|
|
|
|
| [1] Re: Pomocy, makro do odświeżania pilota danych. |
| 2010.01.30 o godz. 08:33 jkwin odpowiada na Topic |
| Wysłany z *.suwalki.vectranet.pl via Mozilla/5.0 (Windows; U; Windows NT 5.1; pl; rv:1.9.2) Gecko/2010 |
Spróbuj usunąć REM przed linią:
dispatcher.executeDispatch(document, ".uno:RecalcPivotTable", "", 0, Array())
w nagranym makrze. |
|
|
|
|
| [2] Re: Pomocy, makro do odświeżania pilota danych. |
| 2010.01.30 o godz. 13:05 Safilo odpowiada na #1 |
| Wysłany z *.cable.smsnet.pl via Mozilla/5.0 (Windows; U; Windows NT 5.1; pl; rv:1.9.1.7) Gecko/20 |
Witam ponownie
Dzięki, niestety próba nie pomogła. Przy usunięciu REM owszem, nie wyskakują błędy natomiast nic właściwie się nie dzieje. Tabele się nie odświeżają.
Wygenerowany kod wygląda następująco:
REM ***** BASIC *****
sub odswiez
rem ----------------------------------------------------------------------
rem define variables
dim document as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:RecalcPivotTable", "", 0, Array())
rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:RecalcPivotTable", "", 0, Array())
rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:RecalcPivotTable", "", 0, Array())
rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:RecalcPivotTable", "", 0, Array())
end sub |
|
|
|
|
| [3] Re: Pomocy, makro do odświeżania pilota danych. |
| 2010.01.30 o godz. 13:06 Safilo odpowiada na Topic |
| Wysłany z *.cable.smsnet.pl via Mozilla/5.0 (Windows; U; Windows NT 5.1; pl; rv:1.9.1.7) Gecko/20 |
jeszcze raz ja
próbowałem również usunąć wszystkie linie rem -----------------
też nie pomogło.. niestety
|
|
|
|
|
| [4] Re: Pomocy, makro do odświeżania pilota danych. |
| 2010.01.30 o godz. 13:31 jkwin odpowiada na #3 |
| Wysłany z *.suwalki.vectranet.pl via Mozilla/5.0 (Windows; U; Windows NT 5.1; pl; rv:1.9.2) Gecko/2010 |
Makro odświeża tabelę pilota danych na aktywnym arkuszu, podpięte pod przycisk.
sub Main
rem define variables
dim document as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
dispatcher.executeDispatch(document, ".uno:RecalcPivotTable", "", 0, Array())
end sub |
|
|
|
|
| [5] Re: Pomocy, makro do odświeżania pilota danych. |
| 2010.01.30 o godz. 20:37 Safilo odpowiada na #4 |
| Wysłany z *.cable.smsnet.pl via Mozilla/5.0 (Windows; U; Windows NT 5.1; pl; rv:1.9.1.7) Gecko/20 |
witam ponownie,
Nie wiem, może coś źle robię ale nadal nic się nie dzieje.
Zrobiłem tak. Przepisałem makro. Podczas sprawdzania nie ma błędów.
W dokumencie dodałem przycisk (pushbutton) z opcjami:
włączony: tak
kolejność aktywacji: 0
powtórz: Nie
przełącz: nie
uzyskaj fokus: tak
akcja: brak
przycisk domyślny: nie
w wydarzeniach natomiast:
klawisz naciśnięty: (wybrane makro)
później zmieniłem na,
naciśnięto klawisz myszy: wybrane makro
Wychodzę z trybu projektu. Niestety nie działa, może muszę jeszcze coś aktywować? |
|
|
|
|
| [6] Re: Pomocy, makro do odświeżania pilota danych. |
| 2010.01.30 o godz. 20:42 Safilo odpowiada na Topic |
| Wysłany z *.cable.smsnet.pl via Mozilla/5.0 (Windows; U; Windows NT 5.1; pl; rv:1.9.1.7) Gecko/20 |
Witam ponownie..
Doszedłem do czegoś, dzięki 
Natomiast działa częściowo, mianowicie na arkuszu mam 4 tabelki, każda z podłączonym pilotem danych (docelowo będzie więcej).
I teraz jak wejdę na jedną z nich to naciskając przycisk z tym makrem ją odświeża natomiast pozostałych nie, muszę myszą wejść w układzie na obszar wierzy i zaznaczyć. Wtedy zadziała..
|
|
|
|
|
Zaloguj się by dodać posta |
|
|
Pobierz OpenOffice.org
|
| Mirrory FTP udostępniają pliki w ramach zwykłego anonimowego ftp (login 'ftp') |
|
| CI TASK |
FTP WWW |
| ftp.man.poznan.pl |
FTP |
| tpnet.pl |
FTP |
| UX.pl |
WWW |
| softwarepatch.pl |
WWW |
| openoffice.co.pl |
WWW |
| openoffice.org |
WWW |
|
|
Jeśli znasz inne publiczne mirrory OpenOffice.org w Polsce,
bądź zamierzasz taki uruchomić (anonymous, min. 10K/s),
poinformuj nas o tym!
|
|
|
Archiwum plików
|
Można tu pobrać rózne pliki zamieszczone przez użytkowników serwisu Openoffice.pl.
Archiwum plików
Łącznie: 123, nowych: 0
|
|
-->
|
Poprzedni
