簡體   English   中英

Excel 宏根據單元格值乘以行

[英]Excel Macro To Multiply Lines Based on Cell Value

我需要以下幫助:

我在 A 列中有一個獨特產品列表(產品 1、產品 2 等)。 在每個產品旁邊的 B 列中,我有每個產品的當前庫存(14、6 等)。

有人可以幫我解決一個宏,將這個列表變成一個包含 14 行產品 1 和 6 行產品 2(在 A 列中)的列表嗎?

非常感謝您提前提供的幫助

斯蒂芬

我認為您想要一個在 A 列上生成 x 次“產品 1”和 y 次“產品 2”的宏(在您的情況下為 x=16 和 y=4),我構建了這個

代碼:

Private Sub Execute_btn_Click()
Dim i As Long
Dim j As Long
Dim Last_Row As Long

For i = 1 To TextBox1.Value
    Cells(i, 1).Value = "Product 1"
Next i

Last_Row = Application.ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row

For j = 1 To TextBox2.Value
    Cells(Last_Row + j, 1) = "Product 2"
Next j

Unload Me
End Sub

暫無
暫無

聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.

 
粵ICP備18138465號  © 2020-2024 STACKOOM.COM