我有一个包含一些/的数字范围,我试图复制到另一个范围:
...
152/7163
152/7163
153/7163
153/7163
48/7164
332/7138
332/7138
332/7138
371/7166
5/7161
5/7161
5/7161
5/7161
115/7163
116/7163
121/7163
519/7132
154/7163
...但是,当我这样做时,其中一些被格式化为日期(即5/7161变成May-61 )。请注意,在转移到我的importWS中,Excel在其own...then上添加了5/1/7161,将其转化为May-61。如果我将其更改为Number,则单元格将其值完全更改为1921663.00。我怎样才能防止这种情况发生?
我从ws复制并复制到importWS
importWS.range(importWS.cells(2,4),importWS.cells(lastRow,4)).Value = _
ws.Range(ws.cells(2,7),ws.cells(lastRow,7)).Value我试过使用.Value2和.Text,但两者都不起作用。我知道我可以循环遍历范围内的每个单元格,并且喜欢importWS.cells(i,4).Value = "'" & ws.cells(i,7).Value,但我不想这样做,因为我使用上面的range方法对多个列执行此操作。
发布于 2015-09-03 19:59:15
将Range.NumberFormat性质预置为文本,然后从源读取Range.Value2性质。
with importWS
.range(.cells(2, 4), .cells(lastRow, 4)).NumberFormat = "@"
.range(.cells(2, 4), .cells(lastRow, 4)) = _
ws.Range(ws.cells(2, 7), ws.cells(lastRow, 7)).value2
end withhttps://stackoverflow.com/questions/32383969
复制相似问题