excel VBA:连接字符串并保留格式

2wnc66cl  于 2022-12-05  发布在  其他
关注(0)|答案(1)|浏览(261)

我使用下面的代码(循环的一部分)连接字符串。我发现格式没有保留。在一个单元格中,一些字母是红色的。连接后,颜色不再存在。我不能复制单元格,它会保留格式。因为我有大约10个单元格的内容要连接成一个字符串。谷歌搜索这个主题没有找到任何结果。我想我可以写代码,在连接之后,找到字母并改变它们的颜色,但不知道是否有另一种方法。

temp_string = temp_string & IIf(Len(Trim(found.Offset(0, 10))) <> 0, Chr(10) & found.Offset(0, 10), "")
fwzugrvs

fwzugrvs1#

很抱歉最近的点击。:)我也遇到了同样的问题,当我将单元格设置为等于公式的结果时,我想保留源格式,而不是复制/粘贴。我最终所做的只是将操作嵌套在格式的复制/粘贴中。

Range([applicable range]).Copy
[code inserting the result of the formula into the applicable range]
Range([applicable range]).PasteSpecial xlPasteFormats

相关问题