使用VBA代码来实现excel保留格式,用普通公式合并文本excel不会保留格式
办公教程导读
收集整理了【使用VBA代码来实现excel保留格式,用普通公式合并文本excel不会保留格式】办公软件教程,小编现在分享给大家,供广大互联网技能从业者学习和参考。文章包含620字,纯文字阅读大概需要1分钟。
办公教程内容图文
excel保留格式的最终效果为C1单元格的效果。
实现这个效果,在excel工作表按下ALT+F11,打开VBE编辑器,插入——模块,复制下面的代码,将代码指定给按钮即可。
Sub excel保留格式()
Dim x As Range, n%, i%, m
[c1] = [a1] & [b1]
For Each x In [a1].Resize(1, 3)
If x.Column = 1 Then m = 0 Else m = m + Len(x.Offset(0, -1))
For i = 1 To Len(x)
n = m + i
Debug.Print n
[c1].Characters(n, 1).Font.ColorIndex = x.Characters(i, 1).Font.ColorIndex
[c1].Characters(n, 1).Font.Bold = x.Characters(i, 1).Font.Bold
Next
Next
End Sub
办公教程总结
以上是为您收集整理的【使用VBA代码来实现excel保留格式,用普通公式合并文本excel不会保留格式】办公软件教程的全部内容,希望文章能够帮你了解办公软件教程使用VBA代码来实现excel保留格式,用普通公式合并文本excel不会保留格式。
如果觉得办公软件教程内容还不错,欢迎将网站推荐给好友。