這個問題我思考了一下，暫時想到的呢是用VBA去解決。

說一下我的思路：

進銷存明細表資料量較為龐大，涉及商品幾百個之多，不能用篩選的笨方法去逐個列印

可能存在每個型號有多行資料的可能

利用VBA將每個型號的資料單獨查詢出來

再將查詢出來的資料附上表頭

然後將帶有表頭的有效資料複製到新的工作簿中

以產品型號為新的工作簿命名並儲存

多次迴圈以達到查詢出所有型號的產品的目的

將所有單個產品型號的工作薄儲存在一個資料夾中

最後列印所有新工作博

我簡單的做了一個進銷存的明細表，包含20個產品，示例如下：

VBA程式碼示例如下（由於程式碼佔用篇幅較大，我放在文末了）：

執行程式碼後，已經建立好的儲存資料夾中：

隨便開啟一個檔案檢視，新檔案查詢生成ok

表頭沒問題，資料查詢沒問題，也不存在空檔案

接下來，鑑於不能一次性列印太多的檔案，只能選中一部分檔案列印，如下：

此VBA程式碼使用說明

由於需要定義要查詢的內容，所以，在執行程式碼前，我們需要將所有的產品型別找出來，相信這是個簡單的過程，大家能會做，如果有重複項，去重即可。

新建一個叫做“陣列”sheet，並將所有的產品型別複製到第一列中，當然了，你也可以根據自己的需要去建立，但是在程式碼中得隨著更改。如下圖：

修改你的進銷存的表頭在表格中的區域區域，如下圖：修改表頭以下，資料內容的起始單元格，如下圖：

然後建立一個新資料夾，並將檔案的地址，更改到程式碼中，如下圖：

需要注意的最後一定要加一個“/”用以表示資料夾層級，在我的示例中，如果不標，就會把查詢後生成的檔案都放到Desktop資料夾下，並且工作簿名會帶上“test”，這樣不行

將sheet切換到你的要查詢的進銷存表格，讓表格處於啟用狀態

最後即可執行VBA程式碼了

如果有報錯，就得自己檢查一下程式碼了

程式碼如下：

Sub test()

Dim myText$, myRow As Long

Dim d As Object, myRng As Range, myRng1 As Range, i%

Application.ScreenUpdating = False "禁止執行時重新整理

Application.DisplayAlerts = False "禁止告警

Set myRng1 = ActiveSheet.[A1:T2] "定義表頭位置

For i = 1 To 20 Step 1

Set d = CreateObject("scripting.dictionary")

myText = Sheets("陣列").Cells(i, 1) "要查詢的內容位置

With ActiveSheet.Cells "查詢的範圍

Set c = .Find(myText, Lookat:=xlPart)

If Not c Is Nothing Then

firstAddress = c.Address

Do

myRow = c.Row

If d.exists(myRow) = False Then

If myRng Is Nothing Then Set myRng = Rows(myRow) Else Set myRng = Union(myRng, Rows(myRow))

d(myRow) = 0

End If

Set c = .FindNext(c)

Loop While Not c Is Nothing And c.Address <> firstAddress

End If

End With

If Not myRng Is Nothing Then

myRng1.Copy Workbooks.Add.Sheets(1).Range("A1") "複製表頭

myRng.Copy ActiveSheet.Range("A3") "複製內容

ActiveWorkbook.SaveAs Filename:="C:\Users\hxyuh\Desktop\test\" & myText & ".xlsx" "新工作簿儲存位置及工作簿名定義

ActiveWindow.Close

End If

Set myRng = Nothing

Next i

Application.ScreenUpdating = True "開啟執行時重新整理

Application.DisplayAlerts = True "開啟告警

End Sub

商品的進銷明細是按時間順序記錄的商品一對多的N條記錄，每個商品都不同。

最簡單的方法就是資料篩選，但是幾百種商品，找也得找半天，還不看的頭暈眼花。

採用VBA吧，涉及到語法，程式設計，一般的使用者又望而生畏，就不是簡單的實現方法了。

我們換個思路，新建一個工作表。如果我們不採用下拉選單選擇商品，而是直接在單元格輸入或者貼上商品名稱。根據輸入商品名稱，透過VLOOKUP函式在總表中查詢此商品，在新表中返回並列出此商品的所有明細。

不知能不能幫到你？

您應該是要打印出當年各個商品的明細，可以使用排序方便列印，開始-排序-自定義排序，主要關鍵字為商品的類別，次要關鍵字為時間，這樣排序得到的表格應該可以方便您列印。

由於不瞭解詳細情況只能給出一個大概的方法，如有需要，題主可以私聊我詳細說明。

庫存商品明細賬分型號進行列印的問題，用資料透視表進行拆分，非常簡單，根本不需要VBA。具體操作方法如下：

1、插入資料透視表2、調整好需要資料的資料內容，並將分拆條件放到“篩選”裡，如圖中的產品類別：3、在資料透視的“分析”選單裡按篩選條件對資料進行分頁，如下圖所示：

透過以上簡單的3步，報表就完全拆分好了，如下圖所示：

這是資料透視裡最經典的報表拆分功能，在很多情況下都可以使用，表格拆分後，再列印全部工作表就可以了。

你列印的目的就是能知道庫存情況、直接用手機開啟微信發現小程式搜尋庫存表、然後在個人中心的網頁端增加好產品、只要用表裡的資料打開復制貼上進去。然後手機與其它部門共享就可以隨時查閱庫存量和金額。打與不打都一樣、要列印只要匯出表直接列印。同時可以掃碼進出庫管理、協同進出庫操作提醒功能。財務報表，客戶明細用料情況。

這肯定要用到VBA程式設計的啦！

但是畢竟懂得運用excel的VBA程式設計還在少數，所以多數人不得不借助一些工具完成進銷存明細。

VBA程式設計就不說了，會用自己可以寫。我就來介紹一下不懂VBA的一般需要用到的一款免費工具吧。

工具叫雲表企業應用平臺，下文就簡稱雲表了，是由金山wps團隊開發的一款免費軟體。使用者可以選擇按需求定做或者是自主開發，雲表操作簡單易懂，無需程式碼程式設計，純中文操作，excel的操作形式。

其實，並不是很推薦去用Excel實現進銷存管理，Excel設計的初衷是單機辦公軟體，進銷存軟體需要的是工作流、審批流、許可權設定、資料共享，恰好這些關鍵功能它都不具備，資料多了還會出現開啟速度緩慢、容易崩潰等問題。這些缺陷使得excel進銷存軟體實在算不上一個完備的進銷存軟體。

雲表則完美地解決了這些問題，不僅如此，雲表的操作就是基於Excel畫表格形式，不用擔心軟體難用；純中文頁面，沒有看不懂的英文單詞；無需VBA程式語言相關知識、無基礎即可上手，簡單實用。作為一款應用領域已經覆蓋各個行業的企業管理系統，所有進銷存需要的功能雲表都擁有，甚至一些獨特的個性化要求也完全可以自己開發新增。雲表連結網路，完全可以為企業解除資訊孤島。

雲表的功能當然還不止於此。畢竟它是由原金山的WPS創業團隊耗時10年開發而成，並經過不斷完善的產品，還有：萬能資料透視分析、統計、大併發、簡訊通知、定時任務，外部資料來源等功能，都能完美執行，且效能穩定可靠，還可以與大多的主流資訊系統無縫對接，做到搭載多個資訊系統，這樣的優勢是既可以保護企業原有的資料資產，又能有效地避免企業同時使用多個系統可能出現的衝突。還可以一鍵生成手機app，實現企業高效快捷移動化辦公。

雲表可不只是提供免費軟體，還提供免費培訓的哦，還有親切的客服會耐心回答您遇到的任何問題，包您輕鬆上手自己製作進銷存軟體。當然，也可以直接提要求定製，價格市面最低，全看您的需要。

雲表現有客戶有，華為、中鐵、中國電信、中冶、中國普天、燕山大學，中國電波傳播研究所等等，所以你也千萬不要錯過，畢竟免費，何不試試？

雲表永久免費軟體和培訓獲取方式在這裡。

只需要簡單的三步，就可以高效快速地列印了。

第一步，建立資料透視表

插入資料透視表，並且將“型號”欄位放到篩選欄位區域。

第二步，按型號拆分工作表

利用資料透視表中的“顯示報表篩選頁”工具，將每一個型號拆分到獨立的工作表。

這是透視表自帶的小工具，以後需要根據某一個欄位拆分工作表的時候也可以用，舉一反三。

第三步，批次列印

按住Shift鍵選中所有需要列印的工作表（成為工作組），Ctrl+P快速列印。

快速，高效，不容易出錯。你說呢？

這就需要用到一個既相容excel功能，但功能要更為強大的工具了。

文末有免費福利，不要錯過噢~

這個工具叫雲表企業應用平臺，它是一款無程式碼開發工具，平時也可以做辦公用。

批次列印

在雲表平臺這裡，是完全支援報表模板自定義列印，以及批次匯入匯出表單的。也就是說，你不僅可以自定義進銷存明細賬，而且幾百個商品訂單資訊，是可以批次一鍵打印出來的。

掃碼出入庫

當然，你還可以用它來設定許可權，進行工作流，流程審批，多人協同，資料透視，資料分析，訊息推送，鬧鐘提醒，小程式，H5，外接資料來源，與用友金蝶，釘釘、企業微信等外部系統進行整合封裝，與PDA，GPS，高拍儀，地磅，電子秤第三方軟硬體進行對接，生成移動端app......

能實現的功能真的太多太多了，你自己稍後慢慢搗鼓。

0基礎，業務人員也能開發個性化的管理軟體，如進銷存系統等

即使你對IT知識一竅不通，不懂VBA是什麼，也不懂如何編寫程式碼。

操作介面

那也沒關係，你只需要懂中文，有自己的業務邏輯和架構思維即可。

產品採購入庫

使用者，只需要在和excel很像的介面，拖拉拽，輸入中文配置資訊，即可搭建出個性化自主可控的管理軟體，比如進銷存、知識管理、專案管理、供應商管理、ERP、OA、WMS、MES、PLM、SRM等。

當然，你再也不用從市場上購買多套功能通用，但實際用處不大的系統回來，有云表平臺一個就夠啦！

它不僅完全支援二次開發，而且還能構成“一個平臺，管理多套軟體”的All in One管理體系。

防串貨入庫

也就是說，用雲表平臺開發出來的系統，各系統之間，資訊互通，主流資訊無縫整合。

像中國電信、華為、中鐵、中冶、南方物流、許繼電氣、雲南小松、恆逸石化、汾西礦業、中山誠威等20萬＋的企業，早已依託雲表平臺，實現數字化轉型。

目前，它提供了一款永久免費使用版本，功能不做任何限制。

高山流水，知音難覓，免費又好用的軟體，你也值得擁有，軟體獲取方式在此奉上：

方法一：

3.資訊填報完畢，即可在“管理控制檯”免費獲取。

方法二：

如果能夠幫助到您，將會是我的榮幸！