Excel如何彙整不同Sheet的資料
要如何把不同Sheet的資料彙整在一起(彙整條件為,某欄位有值)
現在我是用excel來區分不同的產品類別!
所以客戶在下單的時候,有可能每一個Sheet都有一些產品,
我希望可以把所有客戶有下單的東西,整理在一個sheet,以方便核對,
我該如何把「數量」這欄是有值的狀況時,就把該筆資料彙整到另一個sheet呢?
例:
Sheet 洗澡用品:
A B C D E
項目 規格 單價 數量 小計
洗髮精 100ML 100 2 200
洗髮精 200ML 150
沐浴乳 100ML 80 1 80
Sheet 保養品:
A B C D E
項目 規格 單價 數量 小計
化妝水 100ML 150 2 300
精華液 100ML 200
保濕 100ML 80 1 80
彙整後
Sheet Total
A B C D E
項目 規格 單價 數量 小計
洗髮精 100ML 100 2 200
沐浴乳 100ML 80 1 80
化妝水 100ML 150 2 300
保濕 100ML 80 1 80
1 Answer
- 小花Lv 51 decade agoFavorite Answer
使用VBA(巨集)方式
先匯入洗澡用品,再匯入保養品
範例檔在http://www.FunP.net/6688843
Sub 按鈕1_Click()
'以下是匯入第一個工作表也就是洗澡用品
Sheets(1).Select
For i = 2 To Sheets(1).[A65536].End(xlUp).Row + 1
If Cells(i, 4) <> "" Then
k = Sheets(3).[A65536].End(xlUp).Row + 1
For j = 1 To 5
Sheets(3).Cells(k, j).Value = Sheets(1).Cells(i, j).Value
Next j
End If
Next i
'以下是匯入第二個工作表也就是保養品
Sheets(2).Select
For i = 2 To Sheets(2).[A65536].End(xlUp).Row + 1
If Cells(i, 4) <> "" Then
k = Sheets(3).[A65536].End(xlUp).Row + 1
For j = 1 To 5
Sheets(3).Cells(k, j).Value = Sheets(2).Cells(i, j).Value
Next j
End If
Next i
Sheets(3).Select
End Sub