In most cases, you can leave out `Option Explicit` and skip `Dim`'ing many of your variables. In doing so, this (**95** Chars): Option Explicit Sub Test() Dim S As String Dim S2 As String S = "Test" S2 = S MsgBox S2 End Sub Becomes this (**46** chars): Sub Test() S = "Test" S2 = S MsgBox S2 End Sub