[VBA ] Excel的range().select的問題

看板Visual_Basic作者 (超電子頭脳!!)時間5年前 (2019/05/14 11:07), 5年前編輯推噓1(100)
留言1則, 1人參與, 5年前最新討論串1/3 (看更多)
想請問為什麼下列程式碼只有最後一個 Range("D2:D11").Select 才不會出錯。 (Error 1004) 為什麼Range(Cells(2, 4),Cells(11, 4)).Select 也會出錯? 應該怎麼在Select指定 range裡加變數? If Sheets("Sheet1").Cells(1, find_id) = Item_name1 Then Sheets("Sheet1").Select 'Sheets("Sheet1").Range(Cells(2, find_id), Cells(11, find_id)).Select 'Sheets("Sheet1").Range(Cells(2, 4), Cells(11, 4)).Select Sheets("Sheet1").Range("D2:D11").Select Selection.Copy End If --  大泉洋:「いやいや 好かれる訳がない!」 松本人志:「なんでだよ コノヤロー!!」  大泉洋:「好かれる訳がない!」 松本人志:「頑張ってんだよ コノヤロー!!」                2017.12.01 ダウンタウンなう -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 60.251.182.146 ※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1557803221.A.A7B.html

05/14 20:29, 5年前 , 1F
Cells()後面要加上.Address,不然預設屬性是.Value
05/14 20:29, 1F
真的耶! 感謝! 我自己昨天是try & error出, 把Range()裡面的Cells()前面都加 Sheets("Sheet1"). 變成 Sheets("Sheet1").Cells(2, find_id) 後 不知道為什麼就可以了。 但是Cells()後面的Value換成Address感覺觀念上比較正確。 ※ 編輯: HIRUMA (61.220.206.157), 05/15/2019 10:40:05
文章代碼(AID): #1SsZ3Lfx (Visual_Basic)
文章代碼(AID): #1SsZ3Lfx (Visual_Basic)