[算表] VBA帶入相同參數的多個值

看板Office作者 (阿哲)時間4年前 (2019/08/05 22:36), 編輯推噓0(009)
留言9則, 2人參與, 4年前最新討論串1/1
軟體: Excel 版本: 2010 請問以下表為例 要如何把相同程式的機台帶入左邊程式(依續帶入,下表:F07 可run機台 F07 , F01, F08 ; F10可run 機台 F03, F15 以此類推)(用vba 寫…) http://i.imgur.com/vc2BPeE.jpg
----- Sent from JPTT on my Sony G3426. -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 101.13.2.184 (臺灣) ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1565015782.A.ADE.html

08/05 23:10, 4年前 , 1F
迴圈於b3:bn(最後有值儲存格或列號可以range.end、range.
08/05 23:10, 1F

08/05 23:10, 4年前 , 2F
find,列號range.row,或以工作表函數counta),以搜尋h欄
08/05 23:10, 2F

08/05 23:10, 4年前 , 3F
range.find,計數工作表函數countif,以搜尋到的儲存格
08/05 23:10, 3F

08/05 23:10, 4年前 , 4F
range.offset到i欄,或以搜尋到的儲存格列號從i欄offset,
08/05 23:10, 4F

08/05 23:10, 4年前 , 5F
range.resize就以計數的值來調整大小;最後range.copy,
08/05 23:10, 5F

08/05 23:10, 4年前 , 6F
range.pastespecial transpose為真true。
08/05 23:10, 6F

08/05 23:10, 4年前 , 7F
或range = worksheetfunction.transpose(range)的方式
08/05 23:10, 7F

08/05 23:16, 4年前 , 8F
soyoso大大,小弟不材 可否寫成範例,謝謝
08/05 23:16, 8F

08/05 23:19, 4年前 , 9F
先動手寫,有問題提出
08/05 23:19, 9F
文章代碼(AID): #1TI3xchU (Office)