看板 Office 關於我們 聯絡資訊
軟體: EXCEL 版本: 2007 有查一下前面的文 有點不明白 目前我需要寫一個內容大致上是這樣的需求 跪求解答... 如果此儲存格(if?) 有值則執行下列 (以下是工作內容) 序號 = ActiveCell.Value Dim 序號路徑 As String 序號路徑 = ThisWorkbook.Path & "\management\歷史進銷\" & 序號 & ".xlsx" ActiveCell.Offset(0, 2).Copy Workbooks.Open Filename:=序號路徑 . . . . (完成後 儲存格下移) ActiveCell.Offset(1, 0).Select 然後回到重新檢查此儲存格是否有值/ 接著回到上面判斷 重複直到儲存格沒有值 儲存 然後關閉 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 114.35.236.118
soyoso:do..while,內迴圈用Range.find()來找 11/01 09:48
搞定了 我只寫 Do . . . loop until activecell.value = empty 原來是很單純的東西XD 謝謝 ※ 編輯: shmilorm 來自: 114.35.236.118 (11/01 10:51)