Vba Initialize Variable In Dim Statement