excel vba 中如何判断两个单元格格式是否相同

If Selection.NumberFormatLocal = Selection.Offset(1, 0).NumberFormatLocal Then Stop追问

不行，不管用

追答

怎么不行，什么提示
sub aa（）
if [a1].NumberFormatLocal =[b1].NumberFormatLocal then
msgbox "格式相同"
end if
end sub

追问

不管格式相不相同，都显示“格式相同”

追答

我只是判断A1和B1，你确定A1和B1的格式不一样吗