別のブックで作業しているときにブックの最後の行を検索する方法

Question

1. ブックを開くことなく範囲を1つのブックから別のブックにコピーする方法はありますか。
2. 別のブックで作業しているときにブックの最後の行を検索する方法はありますか。

Answer 1

あなたの質問はかなり一般的です。ここでは、このフォーラムで他の質問と回答へのリンクを提供します。いくつかのコードをまとめても、まだ動作しない場合は、これまでのコードを投稿してください。

ワークブックの範囲を他のブックにコピーする方法ブックを開くにはどうすればよいですか？

Stackoverflow - Copy from one workbook to another. Stackoverflow - Open workbook and copy content. 場合のコードの純粋なコピーリンクは、もはや動作します。私は別のワークブックで作業するとき、ブックの最後の行を知ってどのように

Sub foo() 
Dim x As Workbook 
Dim y As Workbook 

'## Open both workbooks first: 
Set x = Workbooks.Open(" path to copying book ") 
Set y = Workbooks.Open(" path to destination book ") 

'Now, copy what you want from x: 
x.Sheets("name of copying sheet").Range("A1").Copy 

'Now, paste to y worksheet: 
y.Sheets("sheetname").Range("A1").PasteSpecial 
x.Close 
End Sub 

？ これは、列の最後の行またはすべての列の最後の行を意味すると考える必要があります。

Stackoverflow - Find last row in excel. Stackoverflow - Find last row.

ここではこれら2つのリンク及びウェブ内のすべてのリンクでコンセプトをコンセプトは、おそらく非常によく似ています。 Rangeオブジェクトとspe​​cialcellsメソッドを使用できますwhich you can see here from MS Developer xlCellTypeLastCell定数を使用する必要があります。

といくつかの非常に簡単なコード

Worksheets("Sheet1").Activate 
ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Activate