您现在的位置是:主页 > VBA >

使用VBA代码来实现excel保留格式,用普通公式合并文本excel不会保留格式

发布时间:2023-10-15 20:29:46所属栏目:VBA 已帮助编辑作者:Excel自学教程

单元格连接内容的同时如何做到excel保留格式。

  具体的excel保留格式效果如下:A1单元格里面的“你”是加粗的,“们”未加粗;B1单元格里面的“好”为加粗。

excel保留格式

  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

     以上就是excel自学教程为您提供使用VBA代码来实现excel保留格式,用普通公式合并文本excel不会保留格式的解读,本文章链接: http://www.5enet.cn/Excel_VBA/78817.html 欢迎分享转载,更多相关资讯请前往VBA

站长名片

姓名:曾工

职业:IT运维

现居:深圳罗湖宝能大厦

电话:15768114603

扫码关注

  • 专注IT行业,10年IT行业经验
  • 微信