標題: [發問] 請教各位大大，如果想用VBA完成群組功能該如何下手 [打印本頁]

---

作者: fangshen    時間: 2019-5-30 09:57     標題: 請教各位大大，如果想用VBA完成群組功能該如何下手

想請教各位大大, 我有一個物料BOM表. 長下面這個樣子.

[attach]30718[/attach]
希望能用VBA群組化後長這個樣子. ...

[attach]30722[/attach]



因為物料太多種. 想用VBA來完成這樣的動作.
每一品號, 的階次順序, 都是由上而下固定的. 不知各位大大能否協助? 感恩..

---

作者: fangshen    時間: 2019-6-4 07:47

感謝google大神, 目前已完成大部份程式.

有點小問題, 目前的程式會有一段要求使用者輸入啟始欄位. 固定是B2, 不知這部份能不能寫死, 不要每次問使用者.

Set StartCell = Application.InputBox("請在下欄輸入啟始欄位 B2", Type:=8)
StartRow = StartCell.Row
LevelCol = StartCell.Column
LastRow = ActiveSheet.UsedRange.Rows.Count

另一個問題, 有語法可以取得該活頁簿資料的最後一列的列號嗎?

謝謝各位大神

---

作者: fangshen    時間: 2019-6-4 09:14

以上均已解決, 謝謝大家

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)