更改列中的數據

嘿！
我正在嘗試一次更改多於 1 列的數據。
我正在使用 VBE 宏，如下所示。 當我使用它時，我標記了我想要使用它標記的空間（$D$2:$E$10，但我沒有看到第二個彈出窗口，我在其中寫下了我想要更改的數據。

我首先創建一個“模塊”來放置宏，對嗎？

Sub

MultiFindNReplace()

'Updateby Extendoffice

Dim

Rng 

As

Range

Dim

InputRng 

As

Range, ReplaceRng 

As

Range

xTitleId = 

"KutoolsforExcel"

Set

InputRng = Application.Selection

Set

InputRng = Application.InputBox(

"Original Range "

, xTitleId, InputRng.Address, Type:=8)

Set

ReplaceRng = Application.InputBox(

"Replace Range :"

, xTitleId, Type:=8)

Application.ScreenUpdating = 

False

For

Each

Rng 

In

ReplaceRng.Columns(1).Cells

InputRng.Replace what:=Rng.Value, replacement:=Rng.Offset(0, 1).Value

Next

Application.ScreenUpdating = 

True

End

Sub



I hope you understand what i mean.



Regards

Benny