Excel VBA宏 - 如何连接数据并以粗体突出显示一部分

时间:2017-08-01 15:00:39

标签: excel vba excel-vba

我有三列;第一列是文字"检查1"到"检查10"。例如,第二列是不同颜色选项的列表,第三列是前两个列的串联,带有几个回车符。如下所示:

Range("C2").FormulaR1C1 = "=RC1& "":""& CHAR(10 ) &RC2 & CHAR(10 )"
Range("C2").AutoFill Destination:=Range("C2:C" & lastRow_d)

(lastRow_d是工作表上最后一次使用的行))

这一切都很好,但我希望A栏中的信息是粗体的...所以当我有我的最后一栏C时,它说:

检查1:

检查2: 红色

.....

我无法理解如何做到这一点......

另外一个问题是,当它全部完成时,我通常只复制粘贴C列中的值来删除公式,所以我这样做:

Range("C2:C" & lastRow_d).Value = Range("C2:C" & lastRow_d).Value

我很欣赏这可以摆脱任何大胆的格式化(如果我设法让它工作)所以我希望有可能替换C列中的值和格式吗?

0 个答案:

没有答案