[算表] 請問關於excel.vba能誇檔案寫入嗎?

看板Office作者 (派大星粉絲)時間14年前 (2011/10/25 15:14), 編輯推噓1(107)
留言8則, 1人參與, 最新討論串1/1
軟體:Microsoft Office 版本:2003 有兩個檔案,都在同一個資料夾下面,檔案 A.xls 、 B.xls 檔案A.xls的sheet1活頁簿   A B C D 1 1 2 2 3 3 4 5 檔案B.xls的sheet1活頁簿   A B C D 1 3 15 2  3  4 5 我要用檔案B.xls的sheet1 A1的值 來到 檔案A.xls的sheet1 A列尋找, 尋到一樣的,就從檔案B.xls的sheet1 的B1的值 為 15, 寫入檔案A.xls的sheet1找到 B列 目前我找資料能寫入,同一個檔案不同活頁簿。 無法誇檔案,可以麻煩懂得幫我一下嗎?感謝! Private Sub CommandButton1_Click() Dim a As Range Dim b As Integer b = Sheets("sheet1").Range("a1") For Each a In Windows("a.xls").Activate〈----出現錯誤 Sheets("sheet1").Range ("a1:a5") If a.Value = b Then a.Offset(, 1) = Sheets("Sheet2").Range("b1") End If Next End Sub -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 114.46.193.234

01/03 14:19, , 1F
sheet1活頁簿,不正確,sheet1是工作表不是活頁簿
01/03 14:19, 1F

01/03 14:20, , 2F
活頁簿是workbook
01/03 14:20, 2F

01/03 14:20, , 3F
不是"誇"是"跨"
01/03 14:20, 3F

01/03 14:25, , 4F
迴圈,windows.activate寫在迴圈上方
01/03 14:25, 4F

01/03 14:28, , 5F
迴圈於sheets.range儲存格a1:a5,這裡的的a1:a5為a.xls內
01/03 14:28, 5F

01/03 14:28, , 6F
工作表名稱sheet1,儲存格a1:a5的集合,下方判斷要以
01/03 14:28, 6F

01/03 14:28, , 7F
sheets("sheet1").range("b1")是以b.xls的話,就要指定b活
01/03 14:28, 7F

01/03 14:28, , 8F
頁簿workbooks(..)的方式
01/03 14:28, 8F
文章代碼(AID): #1Efc77bL (Office)
文章代碼(AID): #1Efc77bL (Office)