Vba Define Variable As String