iT邦幫忙

0

再次請教高手們

多謝各位高手的解答 我已經把程式更改完成了並且執行有成功我要的雛型
另外我想請教高手們 我若想在vba的表單按下一 筆資料 他會顯示下一筆資料內容
我知道access可以 但是目前想把Excel的Vba寫法專精一點
我想請教excel能否像access一樣 搜尋下一筆資料 如何寫
再次多謝指教

1 個回答

0
海綿寶寶
iT邦超人 1 級 ‧ 2019-03-15 14:52:39
最佳解答

試試看

'宣告 Global 變數 savedRowIdx
savedRowIdx = 2

Sub FindTheRecord
   For i = savedRowIdx To Sheets("異動檔").Range("C2").End(xlDown).Row
      'If 找到
      savedRowIdx = i + 1  '下次由找到的下一列開始找
   Next
End Sub
看更多先前的回應...收起先前的回應...
賽門 iT邦超人 1 級 ‧ 2019-03-16 09:29:59 檢舉

軟體問題變多,不見得是好現象,硬體和Infrastructure搞不定,轉到軟體來試看看,現在這些軟體發問,多半是基本問題,自己都不想搞定的問題。
一個字,"懶"。
像這個發問,自己不願多想想有什麼做法,一昧發問只求大神支援。大神花時間來回答,也不回應,似乎把來這裹回答的邦友當義工。
/images/emoticon/emoticon10.gif

資訊業的低進入門檻,已經是多年來的現實

我沒什麼用意啦
只是微薄的小小觀察而已
/images/emoticon/emoticon10.gif

賽門 iT邦超人 1 級 ‧ 2019-03-16 14:40:36 檢舉

https://ithelp.ithome.com.tw/upload/images/20190316/20017649L8FrGxtO2d.png
我看到這則私訊,應該是在回應我的反應,從這私訊就可以瞭解,發問者不想自己找答案,只想從大神回答來測試,這可不是學習程式設計應有的態度。程式設計師應該都是富有實驗精神的軟體人員,反正寫程式也不會把電腦搞壞,頂多重新開機。
多點實驗精神,自行編寫程式實驗,自己Google找答案,工作職場上,是沒有公司能一直養個學生的。

了解了
不必在意年輕人...

savedRowIdx = i + 1  '下次由找到的**下一列**開始找

改成

savedRowIdx = i   '下次由找到的**該列**開始找

我要發表回答

立即登入回答