Copier coller de plusieurs colonnes dans une autre feuille

Bonjour a tous,

étant un peux léger en terme de VBA je souhaite vous demander un peu d'aide.

Je souhaiterais créé une macro qui copie le groupe de colonnes A;I de la feuille Annexe dans la feuille Base à la suite dans la premiere colonne vide a droite.

Et je souhaite commander ceci depuis la case bleu au haut de la feuille Base.

Merci beaucoup pour votre aide

Luks

Bonjour et bienvenue sur le forum

Un essai à tester. Te convient-il ?

Bye !

Salut Luks,
Salut gmb,

Public Sub CopyDescriMachines()
'
Dim sWk As Worksheet, iCol%
'
Application.ScreenUpdating = False
Set sWk = Worksheets("Annexe")
'
With Worksheets("Base")
    iCol = .Cells(4, Columns.Count).End(xlToLeft).Column + 1
    sWk.Range("A3").Resize(59, 9).Copy Destination:=.Range(fctCol(iCol) & 3).Resize(59, 9)
    .Columns(iCol).ColumnWidth = 18
End With
'
End Sub

A+

C'est super

Merci beaucoup a vous 2

Vous êtes au top

++