Introducerea textului într-o celulă

Pentru a introduce text într-o celulă, atribuiți textul proprietății Text a obiectului Range pentru celulă. Următoarele declarații introduc text în primele trei celule din primul rând al selecției curente:

With Selection.Tables(1).Rows(1)
.Cells(1).Range.Text = "Text in prima celula."
.Cells(2).Range.Text = "Text in a doua celula."
.Cells(3).Range.Text = "Text in a treia celula."
End With