VBAでFindStringの出力を使用する - excel、vba、excel-vba

またお願いしたいのですが。 入力ボックスを開き、ワークシートXで特定の値を見つけて、行全体をワークシートYにカットするVBAのビットで作業します。これで、に示すInputbox / FindString-partが完成しました。 .

私の質問はとても簡単です。どのように使用しますかInputbox / Findstringによって検出された値？この値を使用して、行全体を切り取り、残りのスペースを削除するコードを作成することを目的としています。

回答：

If Not Rng Is Nothing Then
Rng.Copy
Worksheet("Y").Range("A1").Paste
Rng.EntireRow.Delete
Else
MsgBox("Nothing found")
End If

あなたはすでに範囲変数を持っているので Rng、私はこのようなことをします：

Rng.Cut
DestinationSheet.Range("destinationRange").select.Paste