返回列表 上一主題 發帖

尋找文字的儲存格位置

Sub yy()
[d:h].Replace "txt", "=1/0"
[d:h].SpecialCells(xlCellTypeFormulas, 16).Select
ad = Selection.Address
Selection = "txt"
MsgBox ad
End Sub

TOP

        靜思自在 : 站在半路,比走到目標更辛苦。
返回列表 上一主題