✅ Looge oma Exceli atribuudid VBA kaudu ja salvestage need seansside vahel

Lang L: none (table-of-contents)

Salvestage teavet, näiteks muutuva sisu või olekuandmed töövihikute seansside vahel, kasutades kasutaja määratud atribuute

Exceli töövihikud sisaldavad atribuute, mida kasutatakse teatud teabe salvestamiseks faili, mis ületab töövihiku sisu. Neid atribuute saate oma makros kasutada töövihiku seansside vahelduva sisu või muu teabe salvestamiseks.

Sõltuvalt sellest, millist Exceli versiooni kasutate, on üksikute atribuutide juurde pääsemise viis erinev.

Excel kuni versioonini 2003: helistage käsule FILE - PROPERTIES.
Excel 2007: aktiveerige käsk PREPARE - FILE PROPERTIES - ADVANCED PROPERTIES.
Excel 2010: kasutage käsku FILE - INFORMATION - OMADUSED - LAIENDATUD OMADUSED.

Kõigis Exceli versioonides kuvatakse dialoogiboks. Klõpsake selles aknas vahekaarti KOHANDAMINE.

Aken näitab kõiki kasutaja määratud atribuute. Sel viisil saate ka atribuute muuta või uusi atribuute määratleda.

See on eriti kasulik makro puhul, kuna see võimaldab teil töövihikusse jäädavalt teavet salvestada ilma lahtrisse või tabelisse. Seetõttu saate kasutada üksikuid atribuute, näiteks muutujaid, mis säilitavad oma sisu Exceli seansi ja Exceli seansi vahel.

Selleks peate makro abil kasutama atribuutide sisu. Oma omaduste lisamiseks atribuutidele saate kasutada järgmist VBA makro.

Sub LayingPropertyAn ()
Vea korral Jätka järgmist
ActiveWorkbook.CustomDocumentProperties.Add _
Nimi: = "ExcelDaily", LinkToContent: = Vale, _
Tüüp: = msoPropertyTypeString, Value: = "Testi sisu"
MsgBox ActiveWorkbook.CustomDocumentProperties ("ExcelDaily"). Väärtus
Viga GoTo 0
End Sub

Makro loob atribuudi nimega "ExcelDaily". See saab sisu "testisisu". Pärast loomist loetakse vara kohe uuesti ette ja kuvatakse sõnumiaknas:

Uue atribuudi leiate ka hiljem dialoogiboksist LAIENDATUD OMADUSED. Järgmine joonis näitab, kuidas aken välja näeb pärast makro lisamist:

Makro sisestamiseks vajutage Excelis klahvikombinatsiooni ALT F11. See avab VBA redaktori. Kasutage tühja moodulilehe sisestamiseks käsku INSERT - MODULE. Makro käivitamiseks vajutage Excelis klahvikombinatsiooni ALT F8.