< návrat zpět

MS Excel

Téma: Udalosť pre RefreshAll rss

Zaslal/a icon AL 10.4.2014 10:35

Mám súbor, v ktorom sa nachádzajú kontingenčné tabuľky napojené na externý zdroj dát - query v MS access.
Aktualizácia pivotiek nie je problém, stačí kliknúť na Data - Refresh All (Ctrl+Alt+F5) a je to.
Ja by som ale potreboval, aby aktualizácia bola možná až po tom, čo užívateľ zadá heslo. Ide to nejako vyriešiť? Nenašiel som vhodný event, tak neviem.
Díky za nápady.

Zaslat odpověď >
Palooo(10.4.2014 11:00)#018787
avatar
neviem ci to pomoze skuste tento event:

trebaho zapisat do ThisWorkbook
Private Sub Workbook_SheetPivotTableUpdate(ByVal Sh As Object, ByVal Target As PivotTable)
End Subcitovat
icon AL(10.4.2014 12:13)#018790
avatar
skúšam, zatiaľ to nedokážem rozchodiť, dám vedieť, díkycitovat
lubo(10.4.2014 14:13)#018793
avatar
Zkus zachytit

QueryTable_BeforeRefreshcitovat
icon AL(10.4.2014 15:17)#018794
avatar
Kluci, dík za snahu pomôcť.
Paloo, nerozchodil som to, mohol by si eventuálne, keď si nájdeš čas, dať jednoduchý vzorový súbor s nejakou pivotkou nalinkovanou na externý zdroj a kód ktorým sa dá riadiť jej aktualizácia?

Lubo, mám za to, že QueryTables nemám vytvorené, ale nie som si tým na 100% istý.

Každopádne po cca 4 hodinách pokusov a omylov som našiel naprosto jednoduché riešenie, spočívajúce prakticky v 1 riadku kódu:ActiveWorkbook.Connections("DshBrdSrc").OLEDBConnection.EnableRefresh = FalseDshBrdSrc je názov toho môjho datového pripojenia.
Do workbook open eventu dám parameter false a pod helsom dám kód s parametrom truecitovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje