彰化一整天的論壇

 找回密碼
 立即註冊
樓主: z22344566

Excel 如何去抓取機台每天自動產生的資料

[複製鏈接]
 樓主| 發表於 2017-4-27 16:42:38 | 顯示全部樓層
  If Cells(j, i).Text = "#N/A" Then
                    Workbooks.Open Filename:=sCheck
                    ActiveWindow.Close

是這個range 為空值
就開啟這檔案
如果不是空值 就不開啟
請問老師這樣解釋正確嗎?
回復 支持 反對

使用道具 舉報

發表於 2017-4-27 16:50:05 | 顯示全部樓層
本帖最後由 imingho 於 2017-4-27 16:51 編輯
z22344566 發表於 2017-4-27 16:42
If Cells(j, i).Text = "#N/A" Then
                    Workbooks.Open Filename:=sCheck
             ...

是range的值如果是顯示#N/A,就代表要開啟檔案,因為前面您已有填入公式,
只會有二種情況,一個正常顯示,一個出現#N/A(找不到)若是空值(或空字串)的寫法是
if cells(j,1).text="" then
   Workbooks.Open Filename:=sCheck
.......
回復 支持 1 反對 0

使用道具 舉報

 樓主| 發表於 2017-4-28 17:47:29 | 顯示全部樓層
本帖最後由 z22344566 於 2017-4-28 17:51 編輯
imingho 發表於 2017-4-27 16:50
是range的值如果是顯示#N/A,就代表要開啟檔案,因為前面您已有填入公式,
只會有二種情況,一個正常顯示, ...

老師好
今天發現機台產生出來的檔案名稱
1704280001
但是他前面有一格空白
所以導致抓不到數據
請問解決方法是再加一對雙引號嗎?
  1. Cells(j, i).Formula = "=vlookup(A2,'" & strPath & "\["& "" & Filename & Format(nSeq, "0000") & ".csv]" & Filename & Format(nSeq, "0000") & "'!$A$2:$E$6,5,FALSE)"
複製代碼

回復 支持 反對

使用道具 舉報

發表於 2017-4-29 18:53:32 | 顯示全部樓層
z22344566 發表於 2017-4-28 17:47
老師好
今天發現機台產生出來的檔案名稱
1704280001

是加" "這樣,""是空字串.
或是把空白加在前一個字串
  1. Cells(j, i).Formula = "=vlookup(A2,'" & strPath & "\[ " & Filename & Format(nSeq, "0000") & ".csv]" & Filename & Format(nSeq, "0000") & "'!$A$2:$E$6,5,FALSE)"
複製代碼
回復 支持 反對

使用道具 舉報

您需要登錄後才可以回帖 登錄 | 立即註冊

本版積分規則

 ㄚ母滴雞湯
 員林香純滴雞精

Archiver|手機版|小黑屋|彰化一整天的論壇(Excel,Office)  |网站地图

GMT+8, 2019-9-17 06:47 , Processed in 0.122489 second(s), 16 queries .

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回復 返回頂部 返回列表