[算表] 迴圈內使用On Error Goto

看板Office作者home0303 (Blue night)時間6年前 (2018/04/11 10:28)推噓0(0推 0噓 2→)

留言2則, 2人參與討論串1/1

軟體:EXCEL 版本:2010 Sub 隱藏欄位() Set MM = ActiveSheet Sheets("欄位清單").Select For i = 2 To Application.CountA([A:A]) On Error GoTo Err 依序 = Cells(i, "A").Value 隱藏註記 = Cells(i, "A").Offset(0, 1).Value MM.Select [1:1].Select Selection.Find(What:=依序, LookAt:=xlWhole).Select Selection.EntireColumn.Hidden = 隱藏註記 Err: Sheets("欄位清單").Select Next MM.Select End Sub MM工作表內有過多資料欄位故我另設一個集合欄位標題的工作表【欄位清單】用以控制MM工作表的顯示欄位當欄位清單的某一項是MM工作表沒有的時候會報錯故在迴圈內設一OnErrorGoto 可是只有第一次可以跳過錯誤第二次還是會出錯請問應該如何改正謝謝 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 59.124.41.19 ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1523413718.A.6FF.html

→

soyoso

04/11 10:45, 6年前 , 1^F

04/11 10:45, 1^F

→

home0303

04/11 10:55, 6年前 , 2^F

04/11 10:55, 2^F

‣ 返回看板[ Office ] 軟體

‣ 更多 home0303 的文章

文章代碼(AID): #1QpNBMR_ (Office)