今天來個輕松的問題。
問題如下：根據A列的數據，轉換成C到D列等不定列數的排列方式。簡單點說，就是把豎向的一列數據，轉換成橫向的多列數據。
如上圖：
圖一：A列轉換成了三列多行數據。
圖二：A列轉換成了八列多行數據。
解決的思路：1：把A列數數據放入數組。
2：用inputbox接收目标的行數
3：把原始的數據，按照行數進行分割。
4：把分割的數據，分别放入新的數組。
5：把新的數組，寫入表格。
運行的過程如下：
Inputbox函數解析
語法 InputBox(prompt[,title][,default][,xpos][,ypos][,helpfile,context]) 參數說明
Prompt - 必需的參數。 在對話框中顯示為消息的字符串。提示的最大長度大約為1024個字符。 如果消息擴展為多行，則可以使用每行之間的回車符(Chr(13))或換行符(Chr(10))來分隔行 。 title - 一個可選參數。顯示在對話框的标題欄中的字符串表達式。如果标題留空，應用程序名稱将被放置在标題欄中
default - 一個可選參數。用戶希望顯示的文本框中的默認文本。
xpos - 一個可選參數。X軸的位置表示水平從屏幕左側的提示距離。 如果留空，則輸入框水平居中。
ypos - 一個可選參數。Y軸的位置表示豎直方向從屏幕左側的提示距離。如果留空，則輸入框垂直居中
helpfile - 一個可選參數。一個字符串表達式，标識用于為對話框提供上下文相關幫助的幫助文件。 context - 一個可選參數。一個數字表達式，用于标識由幫助作者分配給相應幫助主題的幫助上下文編号。如果提供上下文，則還必須提供helpfile。
點擊關注，可以閱讀更多與VBA 相關的文章私信 VBA或 vba 可以獲取文章中含VBA代碼的Excle文件,更多精彩资讯请关注tft每日頭條，我们将持续为您更新最新资讯!
zpostcode 
Recruit 
weather 
mreligion 
Yellowpages 
sport 
constellation 
shopping 
name 
game 
directory 
literature 
Word 
tour 
furnish 
Lottery 
tftnews 
lyrics 
News 
digital 
car 
dir 
Edu 
Finance 
