Hello tout le monde,
Je suis en train de créer un tableau pour planifier des séances d'entraînement.
Certaine donnée sont transférer avec la macro ci-dessous.
Mais elle ne transfère pas toute les différentes couleurs de remplissage des cellules.
Sub Copiercoller()
'
' Copiercoller Macro
' Macro enregistrée le 13.09.2010 par Arn M.
'
'
Sheets("Annuel").Select
Range("F18:AJ21").Select
Selection.Copy
Sheets("1").Select
Range("H9:K39").Select
Selection.PasteSpecial Paste:=xlPasteAllExceptBorders, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
End Sub
Un grand merci pour aide très précieuse.
Je suis en train de créer un tableau pour planifier des séances d'entraînement.
Certaine donnée sont transférer avec la macro ci-dessous.
Mais elle ne transfère pas toute les différentes couleurs de remplissage des cellules.
Sub Copiercoller()
'
' Copiercoller Macro
' Macro enregistrée le 13.09.2010 par Arn M.
'
'
Sheets("Annuel").Select
Range("F18:AJ21").Select
Selection.Copy
Sheets("1").Select
Range("H9:K39").Select
Selection.PasteSpecial Paste:=xlPasteAllExceptBorders, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
End Sub
Un grand merci pour aide très précieuse.