[VBA ] 自access控制excel表格做自動填滿
請問我希望從Access控制某Excel表格做自動填滿的功能,而我從Excel的錄製巨集中找到
如下的Code:
Selection.AutoFill Destination:=Range("A1:A3"), Type:=xlFillDefault
Range("A1:A3").Select
第2行我想應該是Excel自動填滿後,畫面上顯示的選取範圍,所以無視它;
而第1行的selection應該是用來參考填滿什麼的基準資料格,而後面的Range應該就是要
填滿的範圍吧,於是我把Code改成以下的樣子後填回Access的VBA裡:
Dim Sht1 As Excel.Worksheet
Set Sht1 = Forms![報表]![排程表].Worksheets("sheet" & p)
sht1.Cells(4, 2).AutoFill Destination:=Range(Cells(4, 3), Cells(4, 10)),
Type:=xlFillDefault
但是執行到第3行時,總是會出現以下的錯誤訊息
執行階段錯誤 '1004':
'Cells'方法('_Global'物件)失敗
請問版上有神人知道怎麼解決嗎?我Google了好幾個小時,但找到的都只有從Excel本身
自己建VBA的範例說明
感謝大家>"<
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 60.248.17.41
推
04/02 10:48, , 1F
04/02 10:48, 1F
→
04/02 13:06, , 2F
04/02 13:06, 2F
推
04/02 15:29, , 3F
04/02 15:29, 3F
→
04/02 15:30, , 4F
04/02 15:30, 4F
→
04/02 15:30, , 5F
04/02 15:30, 5F
→
04/02 15:31, , 6F
04/02 15:31, 6F
→
04/02 15:33, , 7F
04/02 15:33, 7F
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章