2022年1月12日 星期三

VBA_移動檔案_清單方式

           移動檔案用清單的方式,這是我覺得比較方便的方式,試了之後很快,下面可以看到來源夾剩一個檔案,故意留下來看看是不是我要的結果,目標夾全移過去了。

           為了整理凌亂的檔案,這是其中一個步驟。



移動檔案的清單
移動檔案的清單

移動檔案的來源資料夾
移動檔案的來源夾

移動檔案的來源目標夾
移動檔案的目標夾



 Sub 移動檔案_清單方式()

'2022/1/12 22:15

    Application.ScreenUpdating = False

    With ActiveSheet

    For i = 2 To 8

    in_原始 = .Cells(i, 1).Text

    in_新位置 = .Cells(i, 2).Text

        Name in_原始 As in_新位置

    Next

    End With

End Sub

沒有留言:

張貼留言

清洗儲熱桶熱水器

1/4,我自行拆下儲熱桶的電熱棒,清理內部並排除其中的泥沙。上一次清理是在2017/12/31(事隔7年),當時請維修人員檢查熱水器不熱的原因,順便清理了儲熱桶內的泥沙和結晶。當時我觀察工人拆裝的方式,發現操作相當簡單,因此這次決定自己動手處理。拆下後發現泥沙比想像中少,讓我不禁...