how to add a "" and space after quotes

[harold_kennedy]

What do I change on this code so it places " " around the letter and also places a space after the quotes

OnSheet.Range("M12").Value = Me.GroupName & ComboBox1.Value & " Summary"

it currently shows GROUP A09-JAN-2013 but I need GROUP "A" 09-JAN-2014

 

[mikerickson]

Try

OnSheet.Range("M12").Value = Me.GroupName & Chr(34) & ComboBox1.Value & Chr(34) & " Summary"

 

[harold_kennedy]

Thanks Mike

That is close..GROUP A"09-JAN-2014" Summary....can it be changed to show this - GROUP "A" 09-JAN-2014 Summary...quotes around he A and a space after the quote.thanks

 

[mikerickson]

What is the GroupName and the ComboBox1.Value?

 

[Teeroy]

Maybe something like:

Dim Temp
Temp = Split(Me.GroupName, " ")
Temp(1) = " " & Chr(34) & Temp(1) & Chr(34) & " "
OnSheet.Range("M12").Value = Temp(0) & Temp(1) & ComboBox1.Value & " Summary"