macro coller donnée dans une feuille précise

bonjour a toutes et tous,

voila une bétise, j'ai une VBA que voici ci dessous qui fonctionne tres bien, néanmoins je ne comprend pas comment je peux modifier le collage de l'importation dans une feuille précise exemple j'aimerais qu'il colle les données dans la feuille 'base' et ensuite revenir al a feuille d'origine en plus j'ai deja fait ceci dans le passé et impossible de revenir la dessus RRRRRR ?


Sub importcahh()
Dim a As Variant, Nom As String

Nom = ActiveWorkbook.Name
ChDrive "C:" ' Choix du lecteur
ChDir "C:\" 'Choix du répertoire
a = Application.GetOpenFilename("fichier excel (*.xls), *.xls", _
, "Sélection de vos fichiers excel", , True)

Select Case TypeName(a)
Case Is = "Boolean"
Exit Sub
Case Else
For b = LBound(a) To UBound(a)
Workbooks.Open a(b)
Next
End Select

'Windows(a(b)).Activate 'ligne à supprimer
Cells.Select
Selection.Copy
Windows(Nom).Activate
Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False


End Sub