MsAccess - VBA - Automatically Apply Macro to all Excel Files in a Directory

I have the following Code that IS working:
Function fncBatchImport(strFolder As String) As Boolean

' function to import multiple .xls files into one table
' just make sure all fields are in the target table !
'
' to use type in immediate window:
' call fncbatchimport("C:\Temp")
' and press [enter]


Dim strFile As String


strFile = Dir(strFolder & "\*.xls")

Do While strFile <> ""    ' Start the loop.
    ' Ignore the current directory and the encompassing directory.
    If strFile <> "." And strFile <> ".." Then
        ' Use bitwise comparison to make sure MyName is no directory.
        If (GetAttr(strFolder & "\" & strFile) And vbDirectory) <> vbDirectory Then
       
            ' here we have the filename and just to make sure that the taget table has the correct name
        XXXXX - Here Macro Code
                     
            DoCmd.TransferSpreadsheet acImport, , "TABLE", strFolder & "\" & strFile, False
           
           
        End If        ' it represents a directory.
    End If
    strFile = Dir    ' Get next entry.
   
Loop

End Function

It imports all the content from all spreadsheets in the Directory.  But I need to apply Macrocode BEFORE it gets imported to Access.  I need to align my information first.  I have tried several ways to apply Formattings before the Docmd.Transferspreadsheet command, but useless.  I have read through other examples mentioned here at EE, but most of them will fail.....

Formatting Macro Code should go where I have the XXXXStart Free Trial