0

手元に問題があります。ワークシートから「シート 1」から「シート 2」に情報をコピーしますが、ここでの問題は、特定のフィールドのみをコピーすることです。

S.no 名前 ID クラス

1 ジョン 12 10


2 ピーター 13 9

2 番目のワークシートでは、sno と id のみをコピーします。これらの位置は固定されておらず、列が中央に挿入される可能性があります。

行全体を選択して、必要な値を選択しようとしましたが、機能していません

誰かがこれで私を助けてくれますか?

4

1 に答える 1

0

正しいヘッダーを検索して、正しい列を見つけることができます。

Sub copyNoAndID()
    Dim noRange As Range, idRange As Range
    Set noRange = Range("A1:Z1").Find("S.no")
    Set idRange = Range("A1:Z1").Find("ID")

    noRange.Resize(1000).Copy Range("AA1")
    idRange.Resize(1000).Copy Range("AB1")
End Sub

列の位置がどうであれ、ルックアップはそれらを識別し、並べてコピーします。

于 2013-06-05T19:58:08.943 に答える