返回列表 上一主題 發帖

FIND 的用法 ??

Sub Macro2()
Dim b As Range
With Range("v6:v84")
     .NumberFormatLocal = "||;||;0"
     Set b = .Find(What:="||", LookIn:=xlValues, SearchDirection:=xlPrevious, LookAt:=xlWhole)
     .NumberFormatLocal = "G/通用格式"
     If Not b Is Nothing Then MsgBox b.Address
End With
End Sub

TOP

        靜思自在 : 難行能行,難捨能捨,難為能為,才能昇華自我的人格。
返回列表 上一主題