2016-10-20 5 views
0

2つのワークブックがあります。私はワークブック1の行数(この "行数"と呼んでください)を取得し、次に "行数"の行数をブック2の最初の行にコピーする必要があります。行カウントマクロに基づいてセルをコピーします。

ワークブック2は、細胞内での一連の方程式を持つテンプレートで、ワークブック1

からデータを引き込むこれは間違っている、うまくいけば、アイデアレイアウト:

I=WORKBOOK1.Worksheets("Sheet1").Range("A1",Range("A2").End(xlDown)).Rows.Count 
    WORKBOOK2.Worksheets("Sheet1")Range("C1").Select 
    Range(Selection, ("C1:CI")).Select 

答えて

0

わからないがこれがあなたを助けることができれば。

Sub Macro1() 


    Sheets("Sheet2").Select 
    Range("C3:L3").Select 
    Selection.Copy 
    Sheets("Sheet1").Select 
    Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Select 
    ActiveSheet.Paste 

End Sub 
  1. セレクトシート2
  2. 必要な範囲を選択
  3. 選択をコピーthis answer
  4. から使用(底部から上部に行く)次の使用可能な行に移動し、シート1
  5. を選択
  6. コピーしたもの
0

使用この:

Sub main() 
    With Workbooks("Wb1Name").Worksheets("Sheet1") 
     Workbooks("Wb2Name").Worksheets("Sheet1").Rows(1).Copy Destination:=.Cells(.Rows.Count, 1).End(xlUp).Offset(1) 
    End With 
End Sub 

ちょうど "Wb1Name" と実際の "ワークブック1" 〜 "Wb2Name" と "ワークブック2" のワークブック名​​

を変更