Excel VBA állítás
A VBA Set egy olyan utasítás, amelyet bármilyen értékkulcs hozzárendeléséhez használnak, amely szerint egy objektum vagy egy változóra való hivatkozás van. Ezt a függvényt használjuk egy bizonyos változó paraméterének meghatározásához, például, ha M = A halmazot írunk, ami most M A referenciának ugyanazok az értékei és attribútumai vannak, mint az A-nak.
A VBA-ban az objektum az Excel magja, mert objektumok nélkül nem tehetünk semmit. Az objektumok a munkafüzet, a munkalap és a tartomány. Amikor egy változót deklarálunk, adattípust kell rendelnünk hozzá, és objektumokat is adhatunk adattípusnak. Ahhoz, hogy értéket rendeljünk a deklarált objektumváltozókhoz, a „SET” szót kell használnunk. A „Set” szó egy új objektumra utal a VBA-ban, például az adott munkalap adott tartományára utal.
Az Excel VBA Set Statement használata
# 1 - Állítson állítást tartomány objektumváltozókkal
Tegyük fel például, hogy elég gyakran szeretné használni az A1 és D5 tartományokat. Ahelyett, hogy a kódot mindig tartományként („A1: D5”) írnánk, deklarálhatjuk a változót tartományként, és a tartomány referenciát tartományként állíthatjuk be („A1: D5”)
1. lépés: Nyújtsa be a változót Range objektumként.
Kód:
Részkészlet_Példa ()
Dim MyRange As Range
End Sub
2. lépés: Abban a pillanatban, amikor az adattípust tartománynak rendeljük, használja a „Beállítás” szót.
Kód:
Sub Set_Példa () Dim MyRange As Range Set MyRange = End Sub
3. lépés: Most említse meg a tartományt.
Kód:
Sub Set_Példa () Dim MyRange As Range Set MyRange = Range ("A1: D5") End Sub
4. lépés: Most a „MyRange” változó megegyezik az A1 – D5 tartományral. Ennek a változónak a segítségével elérhetjük ennek a tartománynak minden tulajdonságát és módszerét.
Másolhatunk, hozzáadhatunk egy megjegyzést az excelben, és sok más dolgot megtehetünk.
Például cél, itt létrehoztam néhány számot.
Most a változó használatával megváltoztatom a betűméretet 12-re.
Kód:
Sub Set_Example () Dim MyRange As Range Set MyRange = Range ("A1: D5") MyRange.Font.Size = 12 End Sub
Ez megváltoztatja a hozzárendelt tartomány betűméretét.
Így sok mindent megtehetünk egy adott tartományban a „Beállítás” szó használatával.
# 2 - Állítás beállítása munkalap objektumváltozókkal
Láttuk, hogyan működik a „set” egy tartomány objektummal a VBA-ban. Pontosan ugyanúgy működik, mint a munkalap objektum.
Tegyük fel, hogy 5 munkalapja van a munkafüzetében, és továbbra is vissza akar térni az adott munkalapra. Beállíthatja a munkalap nevét a megadott objektumváltozóra.
Nézze meg például az alábbi kódot.
Kód:
Sub Set_Worksheet_Példa () Dim Ws mint munkalap készlet Ws = munkalapok ("Summary Sheet") End Sub
A fenti kódban az objektumváltozóként definiált „Ws” változó, és a következő sorban a „Set” szó használatával a változót az „Summary Sheet” nevű munkalapra állítottuk.
Now by using this variable, we can do all the things associated with it. Take a look at the below two sets of code.
#1 - Without “Set” Word
Code:
Sub Set_Worksheet_Example1() 'To select the sheet Worksheets("Summary Sheet").Select 'To Activate the sheet Worksheets("Summary Sheet").Activate 'To hide the sheet Worksheets("Summary Sheet").Visible = xlVeryHidden 'To unhide the sheet Worksheets("Summary Sheet").Visible = xlVisible End Sub
Every time I have used the worksheets object to refer to the sheet “Summary Sheet,” This makes the code so lengthy and requires a lot of time to type.
As part of the huge code, it is frustrating to type the worksheet name like this every time you need to reference the worksheet.
Now take a look at the advantage of using the word Set in Code.
#2 - With “Set” Word
Code:
Sub Set_Worksheet_Example() Dim Ws As Worksheet Set Ws = Worksheets("Summary Sheet") 'To select the sheet Ws.Select 'To Activate the sheet Ws.Activate 'To hide the sheet Ws.Visible = xlVeryHidden 'To unhide the sheet Ws.Visible = xlVisible End Sub
The moment we set the worksheet name, we can see the variable name while entering the code as part of the list.
#3 - Set Statement with Workbook Object Variables
The real advantage of the word “Set” in VBA arises when we need to reference different workbooks.
When we work with different workbooks, it is so hard to type in the full name of the workbook, along with its file extension.
Assume you have two different workbooks named “Sales Summary File 2018.xlsx” and “Sales Summary File 2019.xlsx” we can set the two workbooks like the below code.
Code:
Alkészlet_Munkafüzet_példa1 () Dim Wb1 mint munkafüzet Dim Wb2 As Workbook Set Wb1 = Munkafüzetek ("Értékesítési összefoglaló fájl 2018.xlsx") Készlet Wb2 = Munkafüzetek ("Értékesítési összefoglaló fájl 2019.xlsx") Végső alrész
Most a Wb1 változó megegyezik az „Értékesítési összefoglaló fájl 2018.xlsx” nevű munkafüzettel, a Wb2 változó pedig az „Értékesítési összefoglaló fájl 2019.xlsx” nevű munkafüzettel egyenlő.
Ennek a változónak a használatával valóban hozzáférhetünk a munkafüzettel társított összes tulajdonsághoz és módszerhez.
Az alábbiak szerint rövidíthetjük a kódot.
A Munkakönyv aktiválásához a Kulcsszó beállítása funkció használata:
Munkafüzetek ("Értékesítési összefoglaló fájl 2018.xlsx"). Aktiválja
A kulcsszó beállítása a munkafüzet aktiválásához:
Wb1. Aktiválja
Ez egyszerűbbé teszi a kódrészírást, és amint a munkafüzet neve be van állítva, aggódni kell a munkafüzetnevek elgépelési hibáitól is.
