TOP

VBA-Lezione 5. Proprietà (Properties)

In questo articolo impareremo come scrivere il codice VBA per controllare il contenuto delle celle, le celle stesse e le lettere.

Una proprietà è un attributo dell'oggetto che definisce una delle caratteristiche dell'oggetto, ad esempio la dimensione, il colore o la posizione sullo schermo, oppure un aspetto del suo comportamento, ad esempio se è abilitato o visibile sullo schermo.

Per modificare le caratteristiche di un oggetto è necessario modificare il valore delle sue proprietà.


1. Scrivi i valori nella cella

Per prima cosa apri l'editor, aggiungi un modulo, copia lì questa macro:

Sub Properties() 'moonexcel.com.ua
   Range ("A1")
End Sub

Ci siamo rivolti alla cella A1. Ora proviamo a controllare questa cella. Per vedere cosa possiamo fare, aggiungiamo un punto dopo Range ("A1").

Seleziona Value e premi Tab. Otterremo il seguente codice:

Sub Properties() 'moonexcel.com.ua
        Range ("A1").Value
End Sub

Il valore Value visualizza il contenuto della cella.

Ora scriviamo il valore 35 nella cella A1:

Sub properties() 'moonexcel.com.ua
   Range("A1").Value = 35
   'Il valore della cella A1 è 35
End Sub

Ora proviamo a scrivere il testo nella cella (quando si assegna un valore di testo, deve essere racchiuso tra virgolette doppie ""):

Sub properties() 'moonexcel.com.ua
   Range("A1").Value = "C'è del testo qui"
End Sub

Tieni presente che la macro mostrerà i valori nel foglio che hai aperto l'ultima volta. Pertanto, per poter controllare il contenuto di una cella su qualsiasi foglio del libro, dovremo scrivere il percorso completo della cella, ovvero aggiungere il nome del foglio all'inizio del codice, ad esempio:

Opzione 1. Applichiamo con il nome della lettera - Sheets("Foglio2").

Sub properties() 'moonexcel.com.ua
   Sheets("Sheet2").Range("A1").Value = "C'è del testo qui"
   'Significa: apri il foglio 2, seleziona la cella A1 e scrivi il testo nel suo valore
End Sub

Opzione 2. Applichiamo non con il nome della lettera, ma con il suo numero di serie - Sheets(2).

Sub properties() 'moonexcel.com.ua
   Sheets(2).Range("A1").Value = "C'è del testo qui"
End Sub

Allo stesso modo, se vogliamo fare riferimento ad una cella di un'altra cartella di lavoro, dobbiamo scrivere il nome della cartella di lavoro all'inizio del codice:

Sub properties() 'moonexcel.com.ua
   Workbooks("Book2.xlsx").Sheets("Sheet2").Range("A1").Value = "C'è del testo qui"
End Sub

Anche se nei nostri esempi specifichiamo il parametro Value, in realtà può essere omesso poiché è quello predefinito. Cioè, queste due righe di codice saranno equivalenti:

Sub properties() 'moonexcel.com.ua
   Range("A1").Value = 35
   Range("A1") = 35
End Sub

2. Cancellazione di valori

Cancelliamo dalla cella A1 il valore 35, che abbiamo registrato all'inizio della lezione:

Sub properties() 'moonexcel.com.ua
   Range("A1").Clear
   'Significa: seleziona la cella A1 e cancellala
End Sub

3. Formattazione dei valori

Se selezioni Font, verrà visualizzato un elenco di proprietà che puoi applicare alla cella:

Formattazione: modifica della dimensione del testo

Impostiamo la cella su 35 e riduciamo la dimensione del carattere a 8:

Sub properties() 'moonexcel.com.ua
   Range("A1") = 35
   Range("A1").Font.Size = 8
End Sub

Formattazione: rendi il testo in grassetto

Sub properties() 'moonexcel.com.ua
   Range("A1").Font.Bold = True
End Sub

Rimuovere le secrezioni oleose:

Sub properties() 'moonexcel.com.ua
   Range("A1").Font.Bold = False
End Sub

Formattazione: rendi il testo in corsivo

Sub properties() 'moonexcel.com.ua
   Range("A1").Font.Italic = True
End Sub

Formattazione: sottolinea il testo

Sub properties() 'moonexcel.com.ua
   Range("A1").Font.Underline = True
End Sub

Formattazione: imposta il tipo di carattere

Sub properties() 'moonexcel.com.ua
   Range("A1").Font.Name = "Arial"
End Sub

Formattazione: colora la cella

Sub properties() 'moonexcel.com.ua
   Range("A1").Interior.ColorIndex = 6
End Sub