作者johnny1215 (阿哲)
看板Office
標題[算表]請教VBA選取最右邊欄位的不連續多個儲存格
時間Sun Aug 4 18:21:19 2019
軟體: office excel
版本:
2010
請問要如何寫 選取最右邊多個不連續儲存格
我寫這樣，但卻說 object required (run time error '424')
code 如下:
dim a
a=cells(1,1).end(xltoright).column+1
[a & "1, "& a & "22] = 固定值
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 180.204.73.230 (臺灣)
※ 文章網址: https://webptt.com/m.aspx?n=bbs/Office/M.1564914081.A.05E.html
1F：→ soyoso: a應是要用於欄號的部分吧，那1或22是列號嗎？ 08/04 18:30
2F：→ soyoso: 如果是的話 range(cells(1,a),cells(22,a))=固定值 08/04 18:31
3F：→ soyoso: 或是cells(...).resize =固定值的方式 08/04 18:31
4F：→ johnny1215: 出現 run time error 1004 08/04 19:37
6F：→ soyoso: 回文寫法測試上是可以執行的 08/04 19:46
8F：→ soyoso: 因此需要知道巨集錯誤的該行是如何寫 08/04 19:48
9F：→ soyoso: 如果要填入的資料不在作用工作表時所回傳的錯誤訊息 08/04 19:52
10F：→ soyoso: 就改為sheets(..).range(cells(r,c).address,cells(r,c). 08/04 19:52
11F：→ soyoso: address)=固定值 08/04 19:53
12F：→ soyoso: 或是以range(sheets(..).cells(..),sheets(..).cells(..)) 08/04 19:55
13F：→ soyoso: 方式 08/04 19:55
14F：→ johnny1215: 可以了。但請問如果只要 1跟22=固定值 該如何寫 08/04 20:52
15F：→ soyoso: 1跟22=固定值？這是指什麼，帶入固定值？ 08/04 20:55
16F：→ johnny1215: 只有第一列與第22列才帶入固定值 08/04 20:58
17F：→ johnny1215: 其它列不要帶 08/04 20:59
18F：→ soyoso: 是指原本是範圍，而要改為頭尾的儲存格填入值 08/04 21:00
19F：→ johnny1215: yes 08/04 21:01
20F：→ soyoso: sheets.range(cells.address,cells.address) 08/04 21:02
21F：→ soyoso: ,(逗號)改為 & "," & 08/04 21:02
22F：→ johnny1215: 可以了，謝謝高手！ 08/04 21:05