- 帖子
- 51
- 主題
- 19
- 精華
- 0
- 積分
- 84
- 點名
- 0
- 作業系統
- vista
- 軟體版本
- office2010
- 閱讀權限
- 20
- 註冊時間
- 2014-11-26
- 最後登錄
- 2024-1-15
|
3#
發表於 2017-11-20 15:27
| 只看該作者
回復 1# 52ee24
G大版主不好意思~
我再把問題說清楚些
我主要是整合二個檔
一檔名:DailyProcessBrick-yyyy-mm-dd
二檔名:DailyIPQCData-yyyy-mm-dd
把我要二檔欄位值帶入一檔
但因為二個檔案有時間差資料會找不到
需要開啟前幾個月的檔來比對
目前我寫的程式如下
Data1 = "DailyIPQCData-" & Format(Today, "yyyy-mm-dd") & ".xls"
Workbooks.Open Filename:="http://rptap/report/Daily/DailyIPQCData/" & Data1
Data11 = "DailyProcessBrick-" & Format(Today, "yyyy-mm-dd") & ".xls"
Workbooks.Open Filename:="http://rptap/report/Daily/DailyProcessBrick/" & Data11
r11 = Sheets("IPQC 確認入庫").Range("a1").CurrentRegion.Rows.Count
c11 = Sheets("IPQC 確認入庫").Range("a1").CurrentRegion.Columns.Count
'一次阻
For I = 3 To r11
BTM = Application.VLookup(Sheets("IPQC 確認入庫").Range("c" & I), Workbooks(Data1).Sheets("Brick資料庫_1次IR (月)").Range("i:ae"), 23, False)
If IsError(BTM) Then
Else
Sheets("IPQC 確認入庫").Cells(I, c11 + 1) = BTM
End If
Next I
希望可以改成
依CN欄位裡的月份
去開啟相同月份的檔
再把圖二的CC欄位
vlookup進來
|
|
