如何使用VBA将Excel标签添加到excel中单元格的开头

时间:2013-04-10 08:22:22

标签: excel excel-vba vba

我正在尝试在excel 2011的列中的一组单元格前面添加以下代码。

<div class="cpt_product_description "><div>

我试过用这个:

Sub Add2Formula()

' Add text

For Each c In Selection

c.Activate

ActiveCell.FormulaR1C1 = "test - " & ActiveCell.Formula

Next c

End Sub

---这起作用并在细胞前添加了“测试 - ” - 产生了这些预期的结果:

test - lknaslkndaslkdn

当我尝试在vba代码中添加div html时 - (其中“test - ”在上面的代码示例中),它给出了像“unexpected:exception”这样的错误,并且它将文本高亮显示为就像格式化一样在vba编辑器中的问题....我错过了允许像&lt;这样的字符的东西。和空间和“等等?

非常感谢任何帮助。

最终结果应如下所示:

<div class="cpt_product_description "><div>lknaslkndaslkdn

1 个答案:

答案 0 :(得分:1)

将您的文字用作"<div class=""cpt_product_description ""><div>"

例如

ActiveCell.FormulaR1C1 = "<div class=""cpt_product_description ""><div>" & ActiveCell.Formula

添加了解释

“在vba中记录字符串的开头或结尾。如果你在字符串中需要一个”vba允许你这样做的唯一方法是使用2例如“。”。