A VBA Immediate Window egy nagyon hasznos eszköz, beépítve a VBA Editor-ba, aminek segítségével könnyedén válaszolhatunk meg kérdéseket, kaphatunk azonnal választ bizonyos beállított tulajdonságokra, futtathatunk kódrészleteket vagy segítségünkre lehet, ha hibát keresünk a már megírt kódunkban.
Arról, hogy mi is az EXCEL VBA, ebben a bejegyzésünkben olvashatsz bővebben!
A leírásban használt fájlt innen letöltheted: Excel VBA – Immediate Window feladat
Az Immediate Window eléréséhez be kell lépned a VBA Editor-ba, amit a leggyorsabban az ALT+F11 billentyűkombinációval tehetsz meg, vagy Fejlesztőeszközök menüpont, Visual Basic gombjára kattintva. Ha már a VBA Editorban vagy, akkor használd a CTRL+G billentyűkombinációt, és már a rendelkezésedre is áll az Immediate Window. Egyébként a View menüpont alatt találod még az Immediate Window-t.
Ez a kis ablak nagyon sokszor válhat segítségedre, de most nézzünk meg csak pár példát, hogy mire is tudod használni.
Excel VBA ImmediateWindow – Információk szerzése
Fel tudsz tenni kérdéseket az munkafüzettel, cellákkal, minden objektummal kapcsolatban.
Például írd be a következő parancsot (ha kérdést írsz, akkor kérdőjellel kell kezdeni), és nyomd le az Entert.
?Activeworkbook.Worksheets.Count
Rögtön meg is kapod a választ, hogy két munkalapja van az adott munkafüzetnek.
A C9-es cellában feltettem a kérdést, hogy mi a cella értéke:
Vagy a fejlécben (C8), hogy mi a színkódja a kitöltésnek.
Itt is ugyanúgy működik, mint a rendes felületen, hogy amikor írod a kódot, akkor a pont után felajánl az ahhoz az objektumhoz illő lehetőségeket. Így nagyon gyorsan és könnyen tudod írni a kódot, amire szükséged van.
Excel VBA ImmediateWindow – Rövid kódok futtatása
Rövid és egyszerű kódokat is tudsz az Immediate Window-n keresztül futtatni, ami sokat tud segíteni, amikor egy hosszabb kódot írsz, és csak részleteit kell kipróbálnod.
Például a számokat a C oszlopban meg lehet így is gyorsan formázni:
Range(“C9:C23”).Font.Bold=true
Vagy a Pivot tábla frissítése:
ActiveSheet.PivotTables(“Kimutatás1”).PivotCache.Refresh
A táblát is sorba tudod rendezni a Phase szerinti növekvő sorrendbe.
Range(“A8:C23″).Sort Key1:=”Phase”,Order1:=xlAscending,Header:=xlYes
Ezek mellett természetesen még sok mindenre tudod használni ezt az eszközt, és kifejezetten a makrókban található hibák megoldásáról a következő blogposztban (Debug.Print) lesz szó.
Ha tetszett, kérlek, oszd meg másokkal is a bejegyzést!
