請問規則02F - 04F 如果在Data Base 篩選在這個範圍内的相關資料
- 帖子
- 1567
- 主題
- 40
- 精華
- 0
- 積分
- 1591
- 點名
- 0
- 作業系統
- Windows 7
- 軟體版本
- Excel 2010 & 2016
- 閱讀權限
- 100
- 性別
- 男
- 來自
- 台灣
- 註冊時間
- 2020-7-15
- 最後登錄
- 2026-2-2
|
回復 111# 198188
1.工地用的篩選綠色，工廠用的篩黃色，這樣可以在同一表裡區別
2.增加一個工地用的工作表，改一下程式讓兩種不同資料分開放
3.其它
請選擇1,2或3 |
|
|
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流
|
|
|
|
|
- 帖子
- 582
- 主題
- 75
- 精華
- 0
- 積分
- 682
- 點名
- 0
- 作業系統
- win7
- 軟體版本
- office 2010
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2012-10-30
- 最後登錄
- 2026-4-13
|
111#
發表於 2025-10-30 17:05
| 只看該作者
本帖最後由 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 表是用來 透過組裝圖號 帶出一些 組裝圖號的零件 (這個是用來組裝用的零件） |
|
|
|
|
|
|
|
- 帖子
- 1567
- 主題
- 40
- 精華
- 0
- 積分
- 1591
- 點名
- 0
- 作業系統
- Windows 7
- 軟體版本
- Excel 2010 & 2016
- 閱讀權限
- 100
- 性別
- 男
- 來自
- 台灣
- 註冊時間
- 2020-7-15
- 最後登錄
- 2026-2-2
|
110#
發表於 2025-10-30 16:36
| 只看該作者
回復 107# 198188
Frame per Dwg 的分佈圖號 是 Layout Dwg 的分佈圖號帶出來的,怎麼可能後者出現,前者不能出現? |
|
|
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流
|
|
|
|
|
- 帖子
- 582
- 主題
- 75
- 精華
- 0
- 積分
- 682
- 點名
- 0
- 作業系統
- win7
- 軟體版本
- office 2010
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2012-10-30
- 最後登錄
- 2026-4-13
|
109#
發表於 2025-10-30 16:33
| 只看該作者
前輩我敘述的規則是:
本檔Part List 表資料顯示規則如下：
1.本檔的Layout Dwg表 的A欄 分佈圖號 ...
Andy2483 發表於 2025-10-30 16:13
color=Blue]前輩不好意思，漏了一個點
本檔Part List 表資料顯示規則如下：
1. 本檔Layout Dwg 表 的A欄 分佈圖號 要沒有在本檔Frame per Dwg 出現過的 分佈圖號
如果本檔Frame per Dwg 已經存在的分佈圖號，不出現
1.1 本檔的Layout Dwg表 的A欄 分佈圖號(其C欄數量要加總,以下稱:LD合計數量) 要比對 Data Base 裡Part List表的H欄 對應組裝號/加工件號
1.2.若吻合時整列帶出來到本檔的Part List,其中C欄的數量要*LD合計數量
1.3.若Data Base 裡Part List表H欄字串尾部多了個小寫英文字母去除後也吻合 本檔的Layout Dwg表 的A欄 分佈圖號 時,也整列帶出來到本檔的Part List,其中C欄的數量要*LD合計數量 |
|
|
|
|
|
|
|
- 帖子
- 1567
- 主題
- 40
- 精華
- 0
- 積分
- 1591
- 點名
- 0
- 作業系統
- Windows 7
- 軟體版本
- Excel 2010 & 2016
- 閱讀權限
- 100
- 性別
- 男
- 來自
- 台灣
- 註冊時間
- 2020-7-15
- 最後登錄
- 2026-2-2
|
108#
發表於 2025-10-30 16:13
| 只看該作者
本檔 WO No 表資料顯示規則如下：與之前不變
1. 根據本檔 Read 表 A – C 欄資料 (批次次序, 樓層, 生 ...
198188 發表於 2025-10-28 18:01
前輩我敘述的規則是:
本檔Part List 表資料顯示規則如下：
1.本檔的Layout Dwg表 的A欄 分佈圖號(其C欄數量要加總,以下稱:LD合計數量) 要比對 Data Base 裡Part List表的H欄 對應組裝號/加工件號
1.1.若吻合時整列帶出來到本檔的Part List,其中C欄的數量要*LD合計數量
1.1.若Data Base 裡Part List表H欄字串尾部多了個小寫英文字母去除後也吻合 本檔的Layout Dwg表 的A欄 分佈圖號 時,也整列帶出來到本檔的Part List,其中C欄的數量要*LD合計數量
以上正確 |
|
|
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流
|
|
|
|
|
- 帖子
- 582
- 主題
- 75
- 精華
- 0
- 積分
- 682
- 點名
- 0
- 作業系統
- win7
- 軟體版本
- office 2010
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2012-10-30
- 最後登錄
- 2026-4-13
|
107#
發表於 2025-10-30 15:51
| 只看該作者
|
|
|
|
|
|
|
- 帖子
- 1567
- 主題
- 40
- 精華
- 0
- 積分
- 1591
- 點名
- 0
- 作業系統
- Windows 7
- 軟體版本
- Excel 2010 & 2016
- 閱讀權限
- 100
- 性別
- 男
- 來自
- 台灣
- 註冊時間
- 2020-7-15
- 最後登錄
- 2026-2-2
|
106#
發表於 2025-10-30 15:33
| 只看該作者
回復 105# 198188
1.前輩提供範例檔名是 Data Base1.xlsx,邏輯上應該用該檔案測試
2.程式裡以下這段代碼已經包含各種樓層代號:
請再詳細測試看看
If T1 Like "##F-*##F" Then
For i = Val(T1) To Val(StrReverse(Mid(StrReverse(T1), 2, 2)))
Z(Format(i, "00F")) = ""
Next
Else
Q = Split(T1 & "&" & T1, "&")
For i = 0 To UBound(Q)
Z(Q(i)) = 0
Next
End If |
|
|
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流
|
|
|
|
|
- 帖子
- 582
- 主題
- 75
- 精華
- 0
- 積分
- 682
- 點名
- 0
- 作業系統
- win7
- 軟體版本
- office 2010
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2012-10-30
- 最後登錄
- 2026-4-13
|
105#
發表於 2025-10-30 14:37
| 只看該作者
此範例後學執行沒問題,
1.請前輩將本檔與DATA BASE檔獨立出來
2.將 RunForm Module刪除再試試看 ...
Andy2483 發表於 2025-10-30 12:53
已經找到原因，是Data Base workbook 不是 Data Base1 workbook, 剛剛核對後。資料正確。
不過之前說漏了一個 規則，就是樓層方面，
本檔 Layout Dwg 方面的規則有誤：
1. 如果有 “-”，以“-”分離前後兩部分樓層，用數字樓層來辨別 現在是只有這個規則
舉例 03F-07F
03F, 04F, 05F, 06F, 07F
2. 當初有說 "&" ，以“&”，直接用前後英文字母來辨別 (這個最早之前有，這次漏了）
舉例 LMI&SMI
LMI, SMI,
舉例 PMU&SMI&LMI
PMU, SMI, LMI
3. 如果沒有“-” / “&”，則直接以該儲存格的字來分辨樓層 (這個最早之前有，這次漏了）
舉例 PMU
PMU
舉例 05F
05F
樓層
VMU
PMU
LMI&SMI
LMI
05F
03F-41F
03F-07F
02F-08F
09F-12F |
|
|
|
|
|
|
|
- 帖子
- 1567
- 主題
- 40
- 精華
- 0
- 積分
- 1591
- 點名
- 0
- 作業系統
- Windows 7
- 軟體版本
- Excel 2010 & 2016
- 閱讀權限
- 100
- 性別
- 男
- 來自
- 台灣
- 註冊時間
- 2020-7-15
- 最後登錄
- 2026-2-2
|
104#
發表於 2025-10-30 12:53
| 只看該作者
|
|
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流
|
|
|
|
|
- 帖子
- 1567
- 主題
- 40
- 精華
- 0
- 積分
- 1591
- 點名
- 0
- 作業系統
- Windows 7
- 軟體版本
- Excel 2010 & 2016
- 閱讀權限
- 100
- 性別
- 男
- 來自
- 台灣
- 註冊時間
- 2020-7-15
- 最後登錄
- 2026-2-2
|
103#
發表於 2025-10-30 12:29
| 只看該作者
本帖最後由 Andy2483 於 2025-10-30 12:31 編輯
回復 101# 198188
For i = UBound(Brr) To 2 Step -1
T = Brr(i, 8)
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 |
|
|
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流
|
|
|
|
|
