找回密碼 或 安全提問
 註冊
|註冊|登錄

伊莉討論區

搜索
感激所有對伊莉作出奉獻的人尊貴會員無限觀看附件圖片你準備好成為出色的版主了嗎?
人妻波多野結ntr柯南3dgemg
何麥dass 542は~とふ呢喃fc2 ppvjuq 978日南

休閒聊天興趣交流學術文化旅遊交流飲食交流家庭事務PC GAMETV GAME
熱門線上其他線上感情感性寵物交流家族門派動漫交流貼圖分享BL/GL
音樂世界影視娛樂女性頻道潮流資訊BT下載區GB下載區下載分享短片
電腦資訊數碼產品手機交流交易廣場網站事務長篇小說體育運動時事經濟
上班一族博彩娛樂

[簡]成為名留歷史的壞

アニメ『住在下體升級

太色了

[簡]青之箱11-

[繁]精靈幻想記 第二

[繁]精靈幻想記 第二
C & C++ 語言C# 語言Visual Basic 語言PHP 語言JAVA 語言
查看: 3010|回復: 1
打印上一主題下一主題

[求助]vab Split分割欄位無法處理比數不同的狀況[複製鏈接]

Rank: 1

帖子
66
積分
91 點
潛水值
17637 米
跳轉到指定樓層
樓主
發表於 2023-8-12 03:48 PM|只看該作者|倒序瀏覽
回覆中加入附件並不會使你增加積分,請使用主題方式發佈附件。

我有一些資料,中間用","分隔,參考網路的資料,用vba寫了底下這一個來簡化過程,
Sub 分開()
For i = 14 To 26
  ' 取得原始資料
  rawData = Cells(i, 10)

  ' 使用 Split 分割欄位
  fieldArray = Split(rawData, ", ")

  ' 將各個欄位填入對應的儲存格
  For j = 0 To 2
    Cells(i, j + 11).Value = fieldArray(j)
...
瀏覽完整內容,請先 註冊登入會員
分享分享0收藏收藏0支持支持0
如果發覺自己無法使用一些功能或出現問題,請按重新整理一次,並待所有網頁內容完全載入後5秒才進行操作。

使用道具檢舉

Rank: 6Rank: 6Rank: 6Rank: 6Rank: 6Rank: 6

帖子
155
積分
1282 點
潛水值
48025 米
頭香
發表於 2023-9-13 01:58 PM|只看該作者
本帖最後由 tryit244178 於 2023-9-13 02:00 PM 編輯

網路上找來的,可以用這個
  1. Dim colNum As Long
  2. colNum = Cells(1, Columns.Count).End(xlToLeft).Column
複製代碼
取得每列最後行的位置

點評

tryit244178 這裡找到的:https://officeguide.cc/excel-vba-find-row-column-cell-tutorial-examples/  發表於 2023-9-13 02:09 PM
如果你忘記伊莉的密碼,請在登入時按右邊出現的 '找回密碼'。輸入相關資料後送出,系統就會把密碼寄到你的E-Mail。

使用道具檢舉

您需要登錄後才可以回帖 登錄 | 註冊

Powered by Discuz!

© Comsenz Inc.

重要聲明:本討論區是以即時上載留言的方式運作,對所有留言的真實性、完整性及立場等,不負任何法律責任。而一切留言之言論只代表留言者個人意見,並非本網站之立場,用戶不應信賴內容,並應自行判斷內容之真實性。於有關情形下,用戶應尋求專業意見(如涉及醫療、法律或投資等問題)。 由於本討論區受到「即時上載留言」運作方式所規限,故不能完全監察所有留言,若讀者發現有留言出現問題,請聯絡我們。有權刪除任何留言及拒絕任何人士上載留言,同時亦有不刪除留言的權利。切勿上傳和撰寫 侵犯版權(未經授權)、粗言穢語、誹謗、渲染色情暴力或人身攻擊的言論,敬請自律。本網站保留一切法律權利。
回頂部