关于Numberformat与Numberformatlocal使用

rfffg_2017

Range("A2").Numberformat=Range("A1").Numberformat
Range("A3").Numberformatlocal=Range("A1").Numberformatlocal
这种用法是正确的。但是可不可以如下用法：
Range("A2:B5").Numberformat=Range("E2:F5").Numberformat
Range("A2:B5").Numberformatlocal=Range("E2:F5").Numberformatlocal

如若不可，Numberformat与Numberformatlocal属性不能像value属性那样批量传递吗？
如何批量传递单元格格式？

liulang0808

是不是可以用，楼主自己完全可以测试的
同时也可以查查帮助
关键在于等号右侧部分的值能否有效提取出来。

rfffg_2017

liulang0808 发表于 2019-11-13 08:08
是不是可以用，楼主自己完全可以测试的
同时也可以查查帮助
关键在于等号右侧部分的值能否有效提取出来。

我试过：
Range("A2").Numberformat=Range("A1").Numberformat
Range("A3").Numberformatlocal=Range("A1").Numberformatlocal
可用（就是相当与把一个单元格的单元格格式赋给另一个单元格）。
但是：
Range("A2:B5").Numberformat=Range("E2:F5").Numberformat
Range("A2:B5").Numberformatlocal=Range("E2:F5").Numberformatlocal
不可以（就是相当与把一个单元格区域（包含多个单元格）的单元格格式赋给另一个单元格区域（包含多个单元格））
不知道是我代码写的有问题，还是这种单元格区域（包含多个单元格）的单元格格式赋给另一个单元格区域（包含多个单元格）是不可行的，只能用循环方法每个单一的单元格进行单元格格式赋值。
我在立即窗口和模块的普通过程里里都写过，都试了都是这种情况。

rfffg_2017

liulang0808 发表于 2019-11-13 08:08
是不是可以用，楼主自己完全可以测试的
同时也可以查查帮助
关键在于等号右侧部分的值能否有效提取出来。

f1我也按过，查过微软的相关的单元格的Numberformat属性，
也没找到像value那样直接一个区域的value属性能付过去的实例
所以上网上来问。
问了qq群也么人知道
才来网站上问的。
要不一般都不上网站的

rfffg_2017

liulang0808 发表于 2019-11-13 08:08
是不是可以用，楼主自己完全可以测试的
同时也可以查查帮助
关键在于等号右侧部分的值能否有效提取出来。

像
Range("A2:B5").value=Range("E2:F5").value
Range("A2:B5").value2=Range("E2:F5").value2
肯定可以

那么
Range("A2:B5").Numberformat=Range("E2:F5").Numberformat
Range("A2:B5").Numberformatlocal=Range("E2:F5").Numberformatlocal
这种操作就不行吗

Numberformat与Numberformatlocal就不能像同是单元格属性的value一样整个区域进行传递赋值吗？

liulang0808

rfffg_2017 发表于 2019-11-14 10:20
像
Range("A2:B5").value=Range("E2:F5").value
Range("A2:B5").value2=Range("E2:F5").value2

可以先测试下y=Range("E2:F5").Numberformat看看参数返回是什么，如果反馈的就是null那么赋值效果肯定是没有了e

liulang0808

如果Range("E2:F5")区域格式不一样，但是想让Range("A2:B5")的与Range("E2:F5")的一样，楼主试试拷贝-选择性粘贴-格式吧

rfffg_2017

liulang0808 发表于 2019-11-14 11:59
可以先测试下y=Range("E2:F5").Numberformat看看参数返回是什么，如果反馈的就是null那么赋值效果肯定是 ...

有返回，返回的是格式的代表符号

rfffg_2017

liulang0808 发表于 2019-11-14 12:05
如果Range("E2:F5")区域格式不一样，但是想让Range("A2:B5")的与Range("E2:F5")的一样，楼主试试拷贝-选择 ...

这个可以，我撸个红看看

ning84

    Selection.NumberFormatLocal = "h:mm:ss;@"
    Selection.NumberFormatLocal = "yyyy/m/d"
    Selection.NumberFormatLocal = "G/通用格式"