lai iegūtu personalizētu skatu.
lai iegūtu personalizētu skatu.
Klienti, veidojot atskaites ar Excel spraudņa palīdzību, ir saskārušies ar vajadzību reizē ar pārlasīšanas darbību veikt vēl kādas Excel darbības, kuru izsaukšanai nepieciešamas lietotāja darbības, piemēram, Rakurstabulas (PivotTable) pārlasīšana.
Šādās situācijās par palīdzēt Macros jeb Excel Visual Basic for Applications iespējas apvienot šīs darbības vienā pogā.
Izmaiņas pieejamas ar Excel spraudņa versiju 550.1.
Excel spraudņa instalāciju iespējams iegūt no Visma FTP servera adresē:
ftp://apvinst:iopyRT5431@ftp.visma.lv/apv/Piegades/HorizonExcelAddIn/.
Excel VBA pieejamas jaunas komandas:
Call Application.COMAddIns.Item("Horizon Excel AddIn").Object.RefreshAll
Call Application.COMAddIns.Item("Horizon Excel AddIn").Object.RefreshList("")
Iekavās lapas apzīmējums - tikai nosaukums ("VG") vai objekts (ActiveWorkbook.Sheets("VG")).
Do While Not Application.COMAddIns.Item("Horizon Excel AddIn").Object.IsCompleted
DoEvents
Loop
Piemēri kā aprakstīt pārlasīšanu:
-------------------------------------------
Sub parlasit_VG()
Call Application.COMAddIns.Item("Horizon Excel AddIn").Object.RefreshList("VG")
Do While Not Application.COMAddIns.Item("Horizon Excel AddIn").Object.IsCompleted
DoEvents
Loop
End Sub
-------------------------------------------
Sub parlasit_visu()
Call Application.COMAddIns.Item("Horizon Excel AddIn").Object.RefreshAll
Do While Not Application.COMAddIns.Item("Horizon Excel AddIn").Object.IsCompleted
DoEvents
Loop
End Sub
-------------------------------------------
Lai pievienotu šeit komentāru, jābūt reģistrētam lietotājam. Ja esi jau reģistrējies, lūdzu, pieraksties. Ja neesi vēl reģistrējies - reģistrējies un pieraksties!
Pieseko šai ziņai klikšķinot uz trim punktiem augšējā labajā šī raksta stūrī un izvēlies Abonēt. Tu vari izvēleties par kādu saturu saņem ziņas e-pastā!
Sīkāk par abonēšanas iespējāmSporta iela 11, Rīga, LV-1013
Visma birojs: +371 67116211
Horizon atbalsts: +371 67116299
E-pasts: visma@visma.lv