July 7
Se si lavora con Microsoft Office Excel spesso è bene sapere come utilizzare la proprietà "ActiveCell" per aggiungere, ottenere, e anche cambiare il formato dei dati in un foglio di lavoro. Visual Basic, Applications Edition (VBA) è un linguaggio di programmazione utilizzato per automatizzare le attività di routine. In VBA è possibile utilizzare la proprietà "ActiveCell" per apportare modifiche ai dati. Con il VBA è possibile risparmiare tempo automatizzando un processo invece di eseguire la stessa operazione manualmente.
1 Avviare Microsoft Office Excel, fare clic sulla scheda "Sviluppatore", e cliccare su "Visual Basic".
2 Fare clic sul menu "Inserisci" e fare clic su "Modulo" per inserire un nuovo modulo di codice. Digitare il seguente codice per avviare una nuova procedura di sub:
Private Sub usingActiveCell ()
3 Copiare e incollare il seguente per attivare "Sheet1:"
Fogli di lavoro ( "Sheet1"). Attiva
4 Copiare e incollare il seguente per aggiungere un valore a "A1", "A2" e "A3:"
Range ( "A1"). Selezionare
ActiveCell.Value = 3.5
Range ( "A2"). Selezionare
ActiveCell.Value = 10
Range ( "A3"). Selezionare
ActiveCell.Value = 20
5 Copiare e incollare il seguente per evidenziare le celle con i dati:
con ActiveCell
Range(Cells(.Row, .CurrentRegion.Column), Cells(.Row, .CurrentRegion.Columns.Count + .CurrentRegion.Column - 1)).Interior.ColorIndex = 8
Gamma (Cells (.CurrentRegion.Row, .Column), Celle (+ .CurrentRegion.Rows.Count .CurrentRegion.Row - 1, .Column)). Interior.ColorIndex = 8
End With
Application.ScreenUpdating = True
6 Copiare e incollare il seguente per visualizzare i valori aggiunti attraverso la "finestra immediata:"
Range ( "A1"). Selezionare
Debug.Print ActiveCell.Value
Range ( "A2"). Selezionare
Debug.Print ActiveCell.Value
Range ( "A3"). Selezionare
Debug.Print ActiveCell.Value
7 Copiare e incollare il seguente per terminare la procedura sotto:
End Sub
8 Premere il tasto "Ctrl" e "G" per visualizzare la "finestra immediata" e premere "F5" per eseguire la procedura.