Questo tutorial spiegherà il modello a oggetti VBA
Excel è composto da oggetti: l'oggetto cartella di lavoro, l'oggetto foglio di lavoro e l'oggetto intervallo per citarne solo alcuni. Ciascuno di questi oggetti è costituito da Eventi, Proprietà e Metodi che possono essere controllati tramite codice VBA.
La gerarchia degli oggetti di Excel
Puoi pensare alla Gerarchia degli oggetti in Excel, e in effetti in qualsiasi programma all'interno di Microsoft Office, come un po' come un albero genealogico con l'oggetto applicazione (Excel stesso) che è l'unico oggetto genitore nella parte superiore dell'albero.
Il livello più alto: l'applicazione Excel è un singolo oggetto. Tuttavia, ciascuno dei livelli successivi può contenere più oggetti. Ciascuno di questi livelli può contenere una COLLEZIONE di oggetti, quindi Excel stesso può contenere molte cartelle di lavoro, una raccolta di cartelle di lavoro. Ogni cartella di lavoro può quindi contenere a sua volta molti fogli di lavoro e ogni foglio di lavoro può quindi contenere molti intervalli, forme, tabelle pivot o oggetti grafici diversi, ad esempio. Ci sono molti altri oggetti disponibili, ma il grafico sopra ti darà un'idea generale di come funzionano tutti insieme.
Utilizzo di oggetti
Gli oggetti vengono utilizzati nelle procedure secondarie e nelle procedure di funzione per controllare il comportamento di Excel.
La procedura seguente si riferisce a una cartella di lavoro corrente utilizzando il Oggetto cartella di lavoro. Quindi crea un nuovo foglio di lavoro in quella cartella di lavoro usando il Oggetto del foglio di lavoro. Infine, utilizza il Oggetto intervallo per mettere in grassetto e colorare un intervallo di celle nel foglio di lavoro.
| 1234567891011121314 | Sub UsingObjects()Dim wkb come cartella di lavoroSett deboli Come foglio di lavoroDim rngA come intervalloDim rngB come intervallo'imposta gli oggettiImposta wkb = ActiveWorkbookImposta wks = wkb.Sheets.AddImposta rngA = sett.Intervallo("A1:E1")Imposta rngB = sett.Intervallo("A2:E20")'manipola l'oggetto intervallo mettendo in grassetto e cambiando colorerngA.Font.Bold = TruerngB.Font.Color = -16776961Fine sottotitolo |
