Stuck. I need some VBA code to insert double-quotes around strings in each cell in an excel range
I'm familiar with VB.NET, but VBA in 开发者_Python百科excel has me stumped. With my best attempt, I get a "Type mismatch" error:
Sub AddQuotes()
For Each x In Range("List").Cells
x.Text = "*" * " & x.text & " & "*"
Next
End Sub
Try using chr(34) for the double-quote character
eg chr(34) & x.text & chr(34)
精彩评论