有没有excel强人能指点一下怎么用Macro自动fill这种format？
竹樱小桃 • • 62583 次浏览就是alternate row的hour是一样的，但是日期是serial的。。。
A1: 9/24/2014 8:00
A2: 9/24/2014 18:00
A3: 9/25/2014 8:00
A4: 9/25/2014 18:00
...
...
...
如果用autofill的话，日期是对的但是hours都是错的，如果用marco的话，要怎么做？
-
#1
我太有空了Private Sub test()
date1 = DateValue("16/09/2014")
date1 = date1 + 1 / 3
For i = 1 To 10
Cells(i, 1) = date1
date1 = date1 + 0.5
Next i
End SubPrivate Sub test()
date1 = DateValue("16/09/2014")
date1 = date1 + 1 / 3
For i = 1 To 10
Cells(i, 1) = date1
date1 = date1 + 0.5
Next i
End Sub -
竹樱小桃 楼主#2
试了可以work，太牛了！！谢谢！
-
#3
我太有空了～ 其实不用Macro ~ 貌似来晚了
在A1, A2 分别输入
9/24/2014 8:00
9/24/2014 18:00
这2个数值，然后选定A列 Format cell 使用custom 设定为 m/d/yyyy h:mm
设定A3单元格函数 =A1+1
从A3右下角鼠标开始往下拖拖拖拖拖拖拖拖拖
就妥了
在A1, A2 分别输入
9/24/2014 8:00
9/24/2014 18:00
这2个数值，然后选定A列 Format cell 使用custom 设定为 m/d/yyyy h:mm
设定A3单元格函数 =A1+1
从A3右下角鼠标开始往下拖拖拖拖拖拖拖拖拖
就妥了
-
竹樱小桃 楼主#4
大叔，你这个方法局限于每个cell的时间相差是12小时哦。。。
-
#5
没人知道你到底要什么啊那个Script目的不是给你照抄，是提供一些思路。你可以改成什么花样都可以啊。
如果你看不懂那个Script，不明白为什么会出这样的结果，那你离写Script的距离还很远。。。那个Script目的不是给你照抄，是提供一些思路。你可以改成什么花样都可以啊。
如果你看不懂那个Script，不明白为什么会出这样的结果，那你离写Script的距离还很远。。。 -
竹樱小桃 楼主#6
谢谢，用这个方法了。。。原来不知道autofill也可以用于对cell的format
-
#7
我想和大叔学VBA了。。。Scripting 还是很有意思的。
-
#8
一有麻烦就找百度的飘过小弥留之际小弥留之际
-
#9
狮城帮藏龙卧虎~~~~~~~~~~