我想把 A欄和E欄的儲存格之法條內容
原內容： 第00XX條 或 第0X條
需求： 把X條前的 0 都刪掉
修改後： 第XX條 或 第X條
程式碼 （這是成功一次可以執行的）
Sub Sample3()
Dim find1 As Workshee
Set find1 = Worksheets("工作表4")
With find1
.Range("a:a,e:e").Replace _
What:="第0", replacement:="第", _
LookAt:=xlPart
If Not find1 Is Nothing Then
find1.Range("a:a,e:e").Replace _
What:="第0", replacement:="第", _
LookAt:=xlPart
End If
End With
End Sub

因為第00在執行完第一行之後變成第0了？把兩行前後互調試試看另重複執行就用For loop或Do While吧，但我覺得這個case沒有必要這樣用

n大 我有查過do loop while語法但如果是迴圈要怎麼寫同一個function執行兩次因為不是只能例如 i=1...2...3....4有辦法寫例如 i 執行兩次 或是 i=1...2...3....4>...1...2..3..4 這樣嗎

為什麼不用instr取第到條間的數字，直接*1，再把數字放在第後條前就好？