[英]Excel macro, to copy and paste a cell value based on another cell value?
[英]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.