0

私は2つのワークシートを持っていMasterますTemporary.

では、 1Temporary行に 、 、 などのデータLineNrがCustomerName入りOpportunityますSales。この行を使用して、フィールドのデータを変更します。

Masterシートには約 25 行 ( ) のリストがあり、同様のA3:A27データTemporaryが同じレイアウトで表示されます。Masterシートの行からシートにコピー/貼り付けしTemporaryます。

シートのLineNrにTemporary応じて、行 ( ) を自動的にコピーしA3:D3、 で対応する行を見つけてMaster、そこに値を貼り付ける必要があります。

正しい行を選択してMaster貼り付ける方法が見つかりません。

4

1 に答える 1

0

一時シートにボタン (挿入図形) を作成します。それを右クリックし、[マクロの割り当て] を選択して、[新規] をクリックします。次のコードを挿入します。

With Worksheets("Master").Range("A3:A27")
    Set cell = .Find(Worksheets("Temporary").Range("A3").Value, LookIn:=xlValues)
    If Not cell Is Nothing Then
        Worksheets("Master").Range(cell.Address).Offset(0, 1).Value = Worksheets("Temporary").Range("B3").Value
        Worksheets("Master").Range(cell.Address).Offset(0, 2).Value = Worksheets("Temporary").Range("C3").Value
        Worksheets("Master").Range(cell.Address).Offset(0, 3).Value = Worksheets("Temporary").Range("D3").Value
    End If
End With

これは、一意の行番号があることを前提としています...それ以外の場合は、最初に見つかったもののみを更新します。

于 2012-09-13T15:21:52.890 に答える