求去掉单引号的宏语句
如题
[解决办法]
如果单元格第一个字符为单引号( '),则该单元格格式为文本型,但是,通过取值的方法是得不到那个单引号的,为了去掉其中的单引号,可以用下面的方法:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim w1 As String
Application.EnableEvents = False
w1 = Target
Target = w1
Application.EnableEvents = True
End Sub