Plage de copie VBA vers une autre feuille + classeur

Pour copier une cellule ou une plage de cellules dans une autre feuille de calcul, vous devez utiliser la méthode « Copier » du VBA. Dans cette méthode, vous devez définir la plage ou la cellule à l’aide de l’objet plage que vous souhaitez copier, puis définir une autre feuille de calcul avec la plage dans laquelle vous souhaitez la coller.

Copier une cellule ou une plage dans une autre feuille de calcul

Range("A1").Copy Worksheets("Sheet2").Range("A1")
  1. Tout d’abord, définissez la plage ou la cellule que vous souhaitez copier.
    define the range or cell
  2. Tapez ensuite un point (.) et sélectionnez la méthode de copie dans la liste des propriétés et des méthodes.
    type a dot and select the copy method
  3. Ici, vous obtiendrez un intellisense pour définir la destination de la cellule copiée.
    define the destination of the copied cell
  4. À partir de là, vous devez définir la feuille de calcul, puis la plage de destination.
    define the worksheet and than destination range

Maintenant, lorsque vous exécutez ce code, il copie la cellule A1 de la feuille active vers la « Feuille2 ». Il y a une chose dont vous devez vous assurer que lorsque vous copiez une cellule et que vous la collez dans une destination, elle y colle également la mise en forme.

Mais si vous voulez simplement copier la valeur d’une cellule et la coller dans les différentes feuilles de calcul, considérez le code suivant.

Worksheets("Sheet2").Range("A1") = Range("A1").Value

Cette méthode n’utilise pas la méthode de copie mais ajoute simplement de la valeur à la feuille de calcul de destination en utilisant un signe égal et en utilisant la propriété value avec la cellule source.

Copier la cellule d’une autre feuille de calcul

Supposons maintenant que vous souhaitiez copier une cellule d’une feuille de calcul qui n’est pas active à ce moment-là. Dans ce cas, vous devez définir la feuille de calcul avec la cellule source. Tout comme le code suivant.

Worksheets("sheet1").Range("A1").Copy Worksheets("Sheet2").Range("A1")

Copier une plage de cellules

Range("A1:A10").Copy Worksheets("Sheet2").Range("A1:A10")
Range("A1:A10").Copy Worksheets("Sheet2").Range("A1")

Copier une cellule dans une feuille de calcul dans un autre classeur

Lorsque les classeurs sont ouverts mais pas encore enregistrés.

Workbooks("Book1").Worksheets("Sheet1").Range("A1").Copy _
Workbooks("Book2").Worksheets("Sheet1").Range("A1")

Lorsque les classeurs sont ouverts et enregistrés.

Workbooks("Book1.xlsx").Worksheets("Sheet1").Range("A1").Copy _
Workbooks("Book2.xlsx").Worksheets("Sheet1").Range("A1")

Copier une cellule dans une feuille de calcul dans un autre classeur fermé

'to open the workbook that is saved in a folder on your system _
change the path according to the location you have in your _
system
Workbooks.Open "C:UsersDellDesktopmyFile.xlsx"

'copies cell from the book1 workbook and copy and paste _
it to the workbook myFile
Workbooks("Book1").Worksheets("Sheet1").Range("A1").Copy _
Workbooks("myFile").Worksheets("Sheet1").Range("A1")

'close the workbook and after saving
Workbooks("myFile").Close SaveChanges:=True

En relation: Comment ouvrir un classeur à l’aide de VBA dans Excel

Ajouter un commentaire

Votre adresse e-mail ne sera pas publiée. Les champs obligatoires sont indiqués avec *