如何在另一個工作簿中查找工作簿中的最後一行？

-4

如何在不打開工作簿的情況下將範圍從一個工作簿複製到另一個工作簿？
如何在另一個工作簿中查找工作簿中的最後一行？

來源

2017-03-05 Moshtak Alameri

爲什麼有這麼多的標籤？你想用'vb.net'還是'vba'？還把你還沒有嘗試過。只需在google中搜索，即可找到數以千計的解決方案。堆棧溢出也提供了很多答案。 – harun24hr

今後請閱讀[問]，我會考慮參加[旅遊]。 – Bugs

上面的重複鏈接指向查找工作簿中最後一行的任何內容。所以是不正確的。面對它可以說甚至不回答第一個問題。 – darbid

您的問題相當一般，我會給你一些鏈接到這個論壇的其他問題和答案。如果你把一些代碼放在一起，但它仍然不起作用，那麼發佈你到目前爲止的代碼。

如何將範圍從工作簿複製到其他工作簿未打開該工作簿？

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.

在這裏這兩個環節，並在網站的所有鏈接的概念，這個概念很可能非常相似。您可以使用Range對象和specialcells方法which you can see here from MS Developer您需要使用xlCellTypeLastCell常量。

和一些非常簡單的代碼

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

來源

2017-03-05 11:12:26 darbid

給可能有用的代碼鏈接不是一個真正的答案。您可能希望將其所有內容移至評論中，否則您可能會自行降低評分！ – user3598756

我很佩服你的寬宏大量，但這根本不是答案。我也認爲，回答一個本身沒有任何努力（而不是單一代碼行）的問題只會鼓勵更多的人期待一個免費的代碼寫入服務，這不是這個網站的意圖。 – Ambie

看來你們有些人已經忘記了一些人對編程和提問都很陌生。 – darbid

如何在另一個工作簿中查找工作簿中的最後一行？

回答

相關問題