返回列表 上一主題 發帖

指定欄位取代字元

Sub LoopSheets()
Dim ws As Worksheet
For Each ws In Sheets
  ws.[J:J].Replace "111", "你好", Lookat:=xlWhole
Next
End Sub

TOP

        靜思自在 : 信心、毅力、勇氣三者具備,則天下沒有做不成的事。
返回列表 上一主題