作者yimean (温柔杀手)
看板Office
标题[算表] 如何使用VBA在资料栏中添加""符号
时间Wed Aug 25 13:58:08 2021
软体: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.
烦请高手指导,感恩。
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 125.230.78.196 (台湾)
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1629871090.A.78F.html
2F:→ yimean: @x大,感恩指导。 08/25 16:23
3F:→ yimean: 是说,可否请教原理? 08/25 16:23
4F:→ yimean: 我对於四个引号这个原理不太懂,其他的都没问题。 08/25 19:30
5F:推 waiter337: 这里我也不懂 3个不行就用4个 4个不行就用3个 08/25 21:24
6F:→ waiter337: 我是这样用的 08/25 21:24
7F:→ max01060926: 要显示一个双引号 就用两个"" 要两个就用四个"""" 08/25 22:17
8F:→ yimean: 收到,赶下两位大大分享。 08/26 09:43