軟體: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.
煩請高手指導,感恩。