Getting " marks to show in excel cell

[Boots13]

I am creating a simple userform and have a text box labeled "boxName" and a button labeled btnCreate. What I'm trying to accomplish is when the user types a name into the box and clicks the button, it will insert this: name="boxName.value". For example, if someone were to type Brian into the box and click create, name="Brian" would be inserted into the appropriate cell.

I need it to keep the quotation marks. Here is the code I am using so far:

ActiveSheet.Range("A2") = "name=" & Me.boxName.Value

This works great except I don't know how to make the value that the user inputs show up with quotation marks. Does anyone know how I can do this? If this didn't make sense please let me know and I'll try to clarify.

 

[VoG]

Try

ActiveSheet.Range("A2").Value = "name=" & Chr(34) & Me.boxName.Value & Chr(34)

 

[cb12]

try:

ActiveSheet.Range("A2") = "name= " & """"" & Me.boxName.Value & """""

edit: prefer VoG's method.

 

[Boots13]

Try

ActiveSheet.Range("A2").Value = "name=" & Chr(34) & Me.boxName.Value & Chr(34)

That worked perfectly, thank you very much!