Discussion :

[Florian53]

Bonjour, je voudrais réaliser une copie à l'aide d'une variable.

Je dispose d'une variable " AA " = (A1:A100) qui se situe sur la feuil1, je voudrais copier cette plage là dans la Feuil2 à partir de la cellule A3.

Est ce possible que cette plage soit copié en inserant un fond de couleur de la cellule ( par exemple bleu) , que la police soit arial de taille "8" et d'avoir les 4 bordures dans toutes les cellules ?

Est ce que quelqu'un pourrait me donner un bout de code pour réaliser ça.

Cdlt

[joe.levrai]

Bonjour,

utilise l'enregistreur de macro en réalisant manuellement toutes ces opérations

tu obtiens une base de code, qu'on t'aidera (si besoin) à rationaliser ... l'enregistreur de macro étant un piètre optimiseur de ressources et de lignes de codes

[Invité]

Salut,

A titre d'exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Option Explicit
 
Private Sub Copier()
  Worksheets("Feuil1").Range("AA").Copy Worksheets("Feuil2").[A3]
  With Worksheets("Feuil2").[A3].CurrentRegion
    .Interior.ThemeColor = xlThemeColorAccent1
    .Font.Name = "Arial"
    .Font.Size = 11
    .Borders.LineStyle = xlContinuous
  End With
End Sub