請問規則02F - 04F 如果在Data Base 篩選在這個範圍内的相關資料
- 帖子
- 508
- 主題
- 71
- 精華
- 0
- 積分
- 604
- 點名
- 1
- 作業系統
- win7
- 軟體版本
- office 2010
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2012-10-30
- 最後登錄
- 2025-10-30
|
本帖最後由 198188 於 2025-10-30 17:12 編輯
回復 198188
Frame per Dwg 的分佈圖號 是 Layout Dwg 的分佈圖號帶出來的,怎麼可能後者出現,前者不 ...
Andy2483 發表於 2025-10-30 16:36 
可能之前溝通有誤解：
本檔Frame per Dwg 表 的規則正確
根據本檔Layout Dwg 的分佈圖，帶出 本檔 Frame per Dwg表内一樣的分佈圖資料
本檔 Part List 表的 規則是有2條：
1. 根據本檔Layout Dwg 的分佈圖 欄 A，而沒有出現在本檔 Frame per Dwg表内，帶出 Data Base 檔 Part List表内一樣的分佈圖資料
1.1 如果最後一個字是小寫英文，就先去除再對比Data Base檔 Part List表的分佈圖資料
1.2 Qty 計算一樣
2. 根據本檔Frame per Dwg 的 組裝圖 欄B ,
2.1 本檔Frame per Dwg 的組裝圖號 含有 本檔WO No F-K欄的字母
2.2 帶出 Data Base 檔 Part List表内一樣的分佈圖資料
2.3 Qty 計算一樣
原理如下，
分佈圖包含兩種：
1. 單純零件，不需要組裝，這些是給工地使用
1.1 Layout Dwg 表是用來 透過分佈圖號 帶出一些 分佈圖號的零件 (這個是不需要組裝的零件)
2. 用組裝成為成品的零件，這些是給工廠來組裝用
2.1 Frame per Dwg 表是用來 透過組裝圖號 帶出一些 組裝圖號的零件 (這個是用來組裝用的零件） |
|
|
|
|
|
|
|
- 帖子
- 508
- 主題
- 71
- 精華
- 0
- 積分
- 604
- 點名
- 1
- 作業系統
- win7
- 軟體版本
- office 2010
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2012-10-30
- 最後登錄
- 2025-10-30
|
回復 198188
1.工地用的篩選綠色，工廠用的篩黃色，這樣可以在同一表裡區別
2.增加一個工地用的工 ...
Andy2483 發表於 2025-10-30 17:40
1.工地用的篩選綠色，工廠用的篩黃色，這樣可以在同一表裡區別
之前綠色就是工地用，不過沒有完全篩除在Frame per Dwg 存在的分佈圖號
我試過幾個不同的樓層模式，發現下面這個情況：
02F-08F 這個模式好像有篩查出來，
VMU, PMU, LMI&SMI, LMI 這個模式就沒有篩查出來。 |
|
|
|
|
|
|
|
- 帖子
- 508
- 主題
- 71
- 精華
- 0
- 積分
- 604
- 點名
- 1
- 作業系統
- win7
- 軟體版本
- office 2010
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2012-10-30
- 最後登錄
- 2025-10-30
|
Data base裡List表有哪一個欄位區別 工地用或 工廠用嗎？
Andy2483 發表於 2025-10-30 17:59
那些是製表時才需要，備註欄會標注不同符號。
現在part list 是導出所有需要的零件，然後再透過本檔Part list表 備註欄和本檔Rule表來分配，以不同零件大類，分為
工地用/工廠用。 |
|
|
|
|
|
|
|
- 帖子
- 508
- 主題
- 71
- 精華
- 0
- 積分
- 604
- 點名
- 1
- 作業系統
- win7
- 軟體版本
- office 2010
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2012-10-30
- 最後登錄
- 2025-10-30
|
本帖最後由 198188 於 2025-10-30 20:24 編輯
回復 198188
用99樓的程式碼修改一下
T = Brr(i, 8) ：T1 = Brr(i, 7)
If (Z(T) > 0 Or Z(Q) > ...
Andy2483 發表於 2025-10-30 20:04
這個修改是否已經解決下面的問題
本檔 Part List 表的 規則是有2條：
1. 根據本檔Layout Dwg 的分佈圖 欄 A，而沒有出現在本檔 Frame per Dwg表内，帶出 Data Base 檔 Part List表内一樣的分佈圖資料
1.1 如果最後一個字是小寫英文，就先去除再對比Data Base檔 Part List表的分佈圖資料
1.2 Qty 計算一樣
2. 根據本檔Frame per Dwg 的 組裝圖 欄B ,
2.1 本檔Frame per Dwg 的組裝圖號 含有 本檔WO No F-K欄的字母
2.2 帶出 Data Base 檔 Part List表内一樣的分佈圖資料
2.3 Qty 計算一樣 |
|
|
|
|
|
|
|
- 帖子
- 508
- 主題
- 71
- 精華
- 0
- 積分
- 604
- 點名
- 1
- 作業系統
- win7
- 軟體版本
- office 2010
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2012-10-30
- 最後登錄
- 2025-10-30
|
本帖最後由 198188 於 2025-10-30 21:09 編輯
回復 198188
加改這段
Brr = Range(Brr, Brr.Offset(, 1))
For i = 2 To UBound(Brr)
If Z(Brr ...
Andy2483 發表於 2025-10-30 20:40
這段修改是針對FRAME PER DWG表導出的內容嗎？ 之前 FRAME PER DWG 表導出內容沒問題的。
應該是針對PART LIST表需要導出的內容。是Part list 表的資料不正確。
應該在下面的程式加一句紅色的過濾規則
For i = UBound(Brr) To 2 Step -1
T = Brr(i, 8)
如果本檔Layout Dwg分佈圖號沒在本檔Frame per Dwg表出現，then
If T Like "*[a-z]" Then
'↑1.若T變數尾部是英文小寫
Q = Left(T, Len(T) - 1)
'↑就令Q變數是 T變數去掉尾部小寫英文後的字串
Else
'Q = "||"
'↑否則就令Q變數是 "||",
'如果沒有這行 Q = "||" !!,下一筆會殘留 尾部是英文小寫的數量
End If
If Z(T) > 0 Or Z(Q) > 0 Then
If Z(T) <> 0 And Z(Q) > 0 Then
MsgBox "Z(Q)有殘留!"
End If
N = N + 1
For j = 1 To 13: Arr(N, j) = Brr(i, j): Next
Arr(N, 14) = Arr(N, 3) & " x " & (Z(T) + Z(Q))
Arr(N, 3) = Arr(N, 3) * (Z(T) + Z(Q))
End If |
|
|
|
|
|
|
|
發表於 
