To initialize a string variable, place the string value within double quotes.
Sub AssignValueString() Dim myText As String myText = "VBA is fun" End Sub