作者incessantgas (热力四射)
看板Visual_Basic
标题[VBA ] 一个excel的VBA
时间Mon Apr 24 15:36:13 2006
下面的程式码是一个将储存格填满的excel vba码，
Range("G2").Select
Selection.AutoFill Destination:=Range("G2:G4"), Type:=xlFillDefault
Range("G2:G4").Select
我的问题是若我的 G2 和 G4 是要换掉的，也就是说要重复执行
(G2, G4, G6, G8, G10, ......)，而要替换
的储存格在Sheet2资料页，程式码要如何写？
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 192.192.90.221
1F：推 sueadolph:使用Cells(2, 7).Select 取代range 04/25 23:36
2F：→ sueadolph:在使用Destination:=Range(Cells(2, 7), Cells(5, 7)) 04/25 23:36
3F：→ sueadolph:这样子 使用FOR NEXT就很方便了 04/25 23:37
4F：→ sueadolph:或是用字串变数来取代也可以 04/25 23:38