*20

Dim Name As String * 20

Nameは20文字の文字列を格納できる変数という意味です。
たとえばDim Name As String * 20で宣言すると20文字以上のものを
代入しても無視されます。

Sub namae()
Dim Name As String * 20
Name = "ああああああああああいいいいいいいいいいううううううう"
MsgBox Name
End Sub