smilie test

Sub Foo()




Const x As String = "Here's a [B]bold[/B] tag that shouldn't be parsed"




    '// Here's a comment about the [I]italic[/I] tag that shouldn't be parsed




Debug.Print x




End Sub

Sub Foo()




Const x As String = "Here's a [B]bold[/B] tag that shouldn't be parsed"




    '// Here's a comment about the [I]italic[/I] tag that shouldn't be parsed




Debug.Print x




End Sub

Sub Foo()


Dim bar As String
Dim foo As String


bar = "foo bar"
foo = "bar"


With Range("A1")
.Value = bar
.Value = foo & bar
End With


End Sub