VBA在某单元格内的字符串后面添上另一格式的字符串而不改变原字符串的字体或者颜色格式 哪位大侠帮帮忙！
抱歉我没有专业学过VBA，不知道是不是和excel或者VB的版本有关。我试了&运算符和join函数虽然正确连接了字符串，可是一旦连接后，原字符串里一行红色字和一行黑色字就...
抱歉我没有专业学过VBA，不知道是不是和excel或者VB的版本有关。我试了 & 运算符 和 join 函数 虽然正确连接了字符串，可是一旦连接后，原字符串里一行红色字和一行黑色字就全变成了红色成了两行红字。我觉全是红色是因为单元格已经默认为红色字了。可是如何简单连接新旧字符而不需再修复原字符的颜色？能帮忙的够感激不尽啊！
展开
2个回答
展开全部
你只要计算原字符串有几个字符，就可以实现新增的字符串用新的颜色字体了，你可以录制一个宏，原字符串的字符个数替换对应的起始位置和个数即可（可以用变量）
更多追问追答
追问
谢谢。可是我原字符串的字体颜色是有多种的。我用代码连接字符串可是原有的字符串里的字体颜色一律变成了默认格式。这需要计算和记录原字符串中各个颜色的字符长度最后再一步步修复字的颜色，这样太复杂了，且有很多单元格要这样处理。为什么没有一个连接函数能不变原字符而直接在后面添上别的多种颜色的字符？
追答
用VBA自动处理呀
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
想这个添加 怎么可以 不会改变原有的格式的 以前是什么格式的 就是什么格式
Cells(1, 1).Value = Cells(1, 1).Value & "1"
不明白你要的是什么格式的
Cells(1, 1).Value = Cells(1, 1).Value & "1"
不明白你要的是什么格式的
更多追问追答
追问
需要添加别的字符串后原来字符窜的颜色不会变，而且原字符串中有两种颜色。我试过这样添加字符，可是最后原字符的颜色一律变成了默认色。不同颜色和新旧字符串都是用换行符连接的。不过这应该和换行符没什么关系。
追答
首先 我想确认一点：
A是原字符串 单元格的颜色是红色
B是要拼接的字符串 单元格颜色是绿色
想让A+B的字符串 赋值给A
请问 A是要保留原来的颜色还是 要B的颜色？
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
