Как очистить только данные из нескольких таблиц Excel после копирования с использованием VBA

Question

Я новичок в VBA, и у меня есть некоторый код для переноса данных из нескольких электронных таблиц в одну главную таблицу. Это работает нормально, но в конце мне нужно очистить данные о днях в каждой из электронных таблиц, чтобы данные могли быть перенесены снова на следующий день без дублирования. Есть ли что-то простое, что я могу добавить в конец моего скрипта, чтобы очистить все данные, которые я только что передал? Любая помощь будет принята с благодарностью

Вот мой сценарий до сих пор:

Sub LoopThroughDirectory()

Dim MyFile As String
Dim erow
Dim Filepath As String

Filepath = "C:\Users\Guy\Desktop\nichola\"
MyFile = Dir(Filepath)
Do While Len(MyFile) > 0
    If MyFile = "ZMASTER.xlsm" Then
    Exit Sub
    End If

    Workbooks.Open (Filepath & MyFile)
    Range("A2:E25").Copy
    ActiveWorkbook.Close

    erow = Sheet1.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Row
    ActiveSheet.Paste Destination:=Worksheets("Sheet1").Range(Cells(erow, 1), Cells(erow, 5))

    MyFile = Dir
Loop
End Sub