October 3, 2017 at 10:49 PM #2 [vba]Sub Foo()Dim x As Integerx = 5x = x + 5Debug.Print(x)Const fooBar As String = "FooBar" '// bar the fooEnd Sub[/vba]