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

伊莉討論區

搜索
伊莉需要你的贊助和支持儲值後自動升級用戶組你準備好成為出色的版主了嗎?
三上悠亞mega無碼cosplayfc2overlordvradobe
abf 104三國志14隐藏的相stresseわんだふ我的模擬メスつま

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

在店內買個飲料也會出

(4月新番)[繁]格林童

[繁]無職轉生 第二季1

[繁]轉生貴族憑鑑定技

晴天 體驗台灣特色檳

[繁]從Lv2開始開外掛
C & C++ 語言C# 語言Visual Basic 語言PHP 語言JAVA 語言
查看: 3900|回復: 0
打印上一主題下一主題

[求助]Textbox輸入資料後,如何儲存在特定位置?[複製鏈接]

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

帖子
155
積分
1287 點
潛水值
47865 米
樓主
發表於 2018-7-11 04:54 PM|顯示全部樓層
本帖最後由 tryit244178 於 2018-7-11 04:56 PM 編輯

把程式碼改為
  1.     Dim r As Range, i As Range, j As Range
  2.    
  3.     Set r = Range("A2:F31")
  4.    
  5.     For Each i In r.Columns
  6.         For Each j In i.Rows
  7.             If j.value = "" Then
  8.                 j.value = TextBox1.Text
  9.                 Exit Sub
  10.             End If
  11.         Next j
  12.     Next i
複製代碼


...
瀏覽完整內容,請先 註冊登入會員

使用道具檢舉

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

Powered by Discuz!

© Comsenz Inc.

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