在逗號分隔的活動單元格中打印10次相同的值

-4

我想使用命令按鈕以逗號打印單元格中的特定值10次或更多次。任何人都可以解釋如何爲此編寫宏？在逗號分隔的活動單元格中打印10次相同的值

當我單擊命令按鈕時，該值應在活動單元格中打印所需的時間。數據非常容易批量生產，因此非常難以進入單個單元格並鍵入它。

來源

2013-03-13 Basavaraju B K

@MattTaylor我是很新的宏觀域。我正在尋找專家的意見。 – 2013-03-14 07:51:16

我認爲這是一件很棒的事情，但是有很多專家在互聯網上編寫出色的教程。 SO不僅僅是一個能夠回答任何舊問題的地方，這就是爲什麼重複被刪除的原因。它的目的是作爲一個地方來與更難的問題，你不能自己回答 – 2013-03-14 09:10:42

@MattTaylor馬特，我在StackOF挖了這個查詢，但我找不到。正如我所說我是新的宏，認爲這是學習的最佳場所..！ – 2013-03-14 10:01:06

將這個到您的Commandbutton_Click事件處理程序：

Dim strValueToPrint as String, strOutput as String 
Dim intRepeatCount as Integer, i as Integer 

strValueToPrint = "1" 'Change this to be the value that you want to repeat 
for i = 1 to intRepeatCount 
    strOutput = strOutput & strValueToPrint & "," 
Next 
Activecell.Value = strOutput

來源

2013-03-13 10:19:43 MattCrum

謝謝，伯爵的工作很好，但只有少量額外的東西。其實我有兩個文本框，在第一個框中我要輸入要打印的值，在第二個框中輸入重複值。所以，我把你的代碼，以這樣的：私人小組CommandButton1_Click（） strValueToPrint = TextBox1.Value「值被印刷 intRepeatCount = TextBox2.Value」值：次數被重複對於i = 1至intRepeatCount strOutput = strOutput＆strValueToPrint＆「」接着 ActiveCell.Value = strOutput 結束子 – 2013-03-14 06:32:44

當我試圖此代碼，用於第一個實例恰好打印的值作爲我需要，但是當我更改在兩個文本框中的值它正在採取以前的值和打印。你能幫我解決這個問題嗎？ – 2013-03-14 06:33:49

你的意思是在你改變它們之前保留了文本框中的內容嗎？如果是這樣，則需要使用F8逐步完成代碼並將鼠標懸停在strValueToPrint變量上，以檢查它在每個點處假定的值。我不確定如果在更改TextBox1值後運行「strValueToPrint = TextBox1.Value」代碼，它將如何得到錯誤的值。 – MattCrum 2013-03-14 09:56:16

在逗號分隔的活動單元格中打印10次相同的值

回答

相關問題