软件:Excel
版本:Office 365
各位高手下午好。
我有一个应用需要将整个column的资料全部加上""
例如: A
1 Test
2 Good
变成
A
1 "Test"
2 "Good"
目前只有成功加上 '
目前不Work的程式如下
Sub 字串标注()
Dim col As String
col = Cells(2, 11).Value
With ActiveSheet
LR = .UsedRange.Rows.Count
For Each l In Range(col & "2:" & col & LR & "")
l.Value = """ & l.Value & """
Next
End With
End Sub
其中col变量是让使用者填要添加在哪一个Column.
烦请高手指导,感恩。