Scrittura di una tabella utilizzando Visual Basic, Applications Edition in Microsoft Excel non è così complicato come si potrebbe pensare. VBA è un linguaggio di programmazione utilizzato in applicazioni di Microsoft Office per automatizzare operazioni di routine. In VBA, è possibile utilizzare il metodo "ListObjects" per creare una nuova tabella nel foglio di lavoro. Utilizzare il metodo "Range" per aggiungere i valori alla tabella utilizzando i valori di riga e di colonna del foglio di lavoro.
Istruzioni
1
Avviare Microsoft Excel. Scegliere la scheda "Sviluppo" e selezionare "Visual Basic". Fare clic sul menu "Inserisci" e scegliere "Modulo" per inserire un nuovo modulo di codice VBA.
2
Aggiungere il codice seguente per creare una nuova routine sub:
Sub createAndPopulateTable()
3
Creare due variabili che si utilizzerà per scrivere i dati nella tabella:
Dim oSh As Worksheet
Set oSh = ActiveSheet
4
Creare la tabella con cinque righe, utilizzando le colonne B, C e d:
ActiveSheet.ListObjects.Add(xlSrcRange, Range("$B$1:$D$5"), , xlYes).Name = _
"myTable"
ActiveSheet.ListObjects("myTable").TableStyle = "TableStyleLight2"
5
Copiare e incollare il seguente codice VBA per scrivere i dati al vostro tavolo:
oSh.Range("B2").Value = 1
oSh.Range("C2").Value = 1
oSh.Range("D2").Value = 1
oSh.Range("B3").Value = 2
oSh.Range("C3").Value = 2
oSh.Range("D3").Value = 2
oSh.Range("B4").Value = 3
oSh.Range("C4").Value = 3
oSh.Range("D4").Value = 3
oSh.Range("B5").Value = "row 4 value"
oSh.Range("C5").Value = "row 4 value"
oSh.Range("D5").Value = "row 4 value"
oSh.Range("B6").Value = 5
oSh.Range("C6").Value = 5
oSh.Range("D6").Value = 5
6
Termina la procedura digitando "End Sub" come la riga finale del codice nel modulo. Premere "F5" per eseguire la procedura.