返回列表 上一主題 發帖

[發問] 多目標Replace怎麼寫最精簡?

[發問] 多目標Replace怎麼寫最精簡?

各位高手

如果我想寫對A1:B10範圍的儲存格做多目標Replace,把 "、" , "。" , "," , "!" , "?"都去掉,類似Replace(array("、" , "。" , "," , "!" , "?") , "")的動作,該怎麼寫會最精簡?

謝謝回覆
真心感謝每一位願意分享所學、指導新手的人!

回復 2# GBKEE

感謝版大回覆~
真心感謝每一位願意分享所學、指導新手的人!

TOP

回復 1# VBALearner
試試看
  1. Option Explicit
  2. Sub Ex()
  3.     Dim AR(), St As String, e As Variant
  4.     AR = Array("、", "。", ",", "!", "?")
  5.     St = "ABCD、。eFg,!Hijk?"
  6.     For Each e In AR
  7.         St = Replace(St, e, "")
  8.     Next
  9.     MsgBox St
  10. End Sub
複製代碼
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

        靜思自在 : 【蒙蔽的自由】人常在什麼都可以自由自在的時候,卻被這種隨心所欲的自由蒙蔽,虛擲時光而毫無覺知。
返回列表 上一主題