close

標題:

excel巨集指令高手請進

發問:

自動變成我要的數量 例如(第一工作頁) 315*4 222*3 444*4 自動轉換成(自動變到第二工作頁) 315 315 315 315 222 222 222 444 444 444 444 的巨集指令要怎麼打哇

 

此文章來自奇摩知識+如有不便請留言告知

最佳解答:

圖片參考:http://tw.yimg.com/i/tw/ugc/rte/smiley_4.gif 看來好像是全型字,請參閱以下程式碼 Sub 按鈕_Click() For i = 1 To Sheets("Sheet1").[A65536].End(xlUp).Row x = Split(Cells(i, 1), "*") y = InStr(Cells(i, 1), "*") y = Right(Cells(i, 1), Len(Cells(i, 1)) - y) z = Sheets("Sheet2").[A65536].End(xlUp).Row If Sheets("Sheet2").Cells(1, 1) = "" Then z = 1 Else z = z + 1 End If For j = z To z + y Sheets("Sheet2").Cells(j, 1) = x Next j Next i End Sub 圖片參考:http://tw.yimg.com/i/tw/ugc/rte/smiley_4.gif 或請下載附件參考~ http://www.FunP.net/5448608 2008-05-02 14:13:12 補充: 抱歉附錯檔案 http://www.FunP.net/3678589

其他解答:8410E5B82AE3BBEE

arrow
arrow
    創作者介紹
    創作者 wszspj2 的頭像
    wszspj2

    wszspj2的部落格

    wszspj2 發表在 痞客邦 留言(0) 人氣()