excel vba复制格式字体颜色的格式

发布网友 发布时间:2022-04-23 00:38

我来回答

3个回答

热心网友 时间:2023-09-06 04:26

Sub s()
    n = [e8:ae8].Count
    For i = 1 To n
    If [e8:ae8].Item(i) <> "" Then
        m = Len([e8:ae8].Item(i))
        For j = 1 To m
            [e9:ae9].Item(i).Characters(j, 1).Font.Color = [e8:ae8].Item(i).Characters(j, 1).Font.Color
        Next
    End If
    Next
End Sub

热心网友 时间:2023-09-06 04:27

选择性粘贴,选格式

热心网友 时间:2023-09-06 04:27

好追问http://pan.baidu.com/s/1qWCGeHe详细见文件

追答先

声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com