VBA RunAll Macros вставляет повторяющиеся столбцы

Question

Я пытаюсь объединить два макроса, которые я создал, в один макрос RunALL.То, что я использовал для макроса RunAll, приведено ниже.Что происходит, когда я использую макрос RunAll, он создает два столбца с одинаковым именем.Я попытался приложить фото здесь, чтобы вы могли видеть в качестве примера.

Что я делаю не так?

Sub RunAll()
    Call CopyWorkbook
    Call InsertColumn
End Sub

Макрос CopyWorkbook - это ...

Sub CopyWorkbook()
    Dim sourceSheet As Worksheet
    Dim destSheet As Worksheet

    'copy from the source
    Workbooks.Open Filename:="X:\Safety\Chris A\Employee Safety   Profile\Speeding_Report.xlsm"
    Set sourceSheet = Worksheets("Report")
    sourceSheet.Activate
    sourceSheet.Cells.Select
    Selection.Copy

    'paste to the destination
    Workbooks.Open Filename:="X:\Safety\Chris A\Employee Safety Profile\Employee_Safety_Profile.xlsm"
    Set destSheet = Worksheets("Speeding")
    destSheet.Activate
    destSheet.Cells.Select
    destSheet.Paste
End Sub

Макрос InsertColumn - это ....

Sub InsertColumn()
    Columns("E:E").Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
    Range("E9").Value = "Full Name"

    Columns("F:F").Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
    Range("F9").Value = "UUID"     
End Sub