[已解决]兩個寫法結果是一樣嗎?

kpkay

Sub bb()
    Dim y&
    For y = 1 To 225 Step 12
        With Range("L11").Offset(y, 1)
            With .Font
                .Name = "Arial Narrow"
                .Size = 14
                .Bold = True
            End With
            .Resize(1, 3).ClearContents
            .Value = "U03-" & Format(y / 12 + 1, "00")    '???
            .HorizontalAlignment = xlCenter
            .Resize(1, 3).Merge    '合并?元格
            Debug.Print .Address(0, 0); ":" & .Value
        End With
    Next y
End Sub

改了之後出現問題{:3712:}

爱疯

什么问题？
最后多输出一个值吗？
那就用aa好了。
为什么一定要用bb，相比下，aa更好些。
是为了兼顾什么？

kpkay

Sub bb()
    Dim y&
    For y = 1 To 225 Step 12
        With Range("L11").Offset(y, 1)
            With .Font
                .Name = "Arial Narrow"
                .Size = 14
                .Bold = True
            End With
            .Resize(1, 3).ClearContents
           .Value = "U03-" & Format(y / 12 + 1, "00")    '???
            .HorizontalAlignment = xlCenter
            .Resize(1, 3).Merge    '合并?元格
            Debug.Print .Address(0, 0); ":" & .Value
        End With
    Next y
End Sub

改好b11合併,但出錯了{:712:}

kpkay

補充一下,L11沒有合併了

爱疯

TEST2b.rar (181.19 KB, 下载次数: 0)

2012-1-18 15:38 上传

点击文件名下载附件 我把aa和bb，都放在里面了。

1）为什么不用aa?
2）现在，bb有什么问题？

kpkay

{:1012:}ok了,謝謝版主了!{:4012:}