精華區beta Office 關於我們 聯絡資訊
除非程式就是要依使用者選取的物件來做動作,否則 Select 和 Selection 都是多餘的. ◎ 標準的物件控制語法:  物件.方法 (例如 Range("A1").Copy)  物件.屬性 = 值 (例如 Range("A1").ColorIndex = 15) Sheet1.A1 的值到 Sheet2.B1 -- [法一] Sheets(2).Range("B1") = Sheets(1).Range("A1") [法二] 內容與格式都要複製 Sheets(1).Range("A1").Copy Sheets(2).Range("B1") [法三] With ThisWorkbook.Sheets(1) Set wbNew = Workbooks.Add .Range("1:1," & lLoop & ":" & lLoop).EntireRow.Copy _ Destination:=wbNew.Sheets(1).Range("A1") End With 來源.Copy Destination:=目的 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: [一~二] leonchou @ http://gb.twbts.com/index.php/topic,768.0.html [三] #19xSnqw-