La modération vous a écrit: Macro pour a été supprimé de votre titre. Ce terme est inutile dans la section consacrée aux macros.
Bonsoir à tous,
J'ai une macro qui fonctionne très bien et qui me permet de copier/insérer/coller une ligne dans mon fichier. Je souhaiterais savoir s'il est possible que le "coller" se fasse dans un autre fichier (Feuille Champs du Fichier B) que le fichier source de la zone copiée (Feuille Champs du Fichier A).
Dans l'affirmative, est-il au surplus possible de la ligne soit copiée sur la première ligne vide (si la ligne 1 est remplie sachant que la colonne A est un point de repère fiable car si la colonne A est vide c'est que la ligne est vide).
Code : Tout sélectionner
Sub CopieGomme
Dim Champs As Object, Calculs As Object
Dim MaZone As Object, MaCopie As Object, Gomme As Long
Champs = ThisComponent.sheets.getByName("Champs") 'Désignation de la feuille Champs
Champs.Rows.insertByIndex(2,1)'1) 'Insertion ligne
MaZone = Champs.getCellRangeByName("A2:AHP2") 'la zone à copier
MaCopie = Champs.getCellRangeByName("A3") 'la destination de la copie
Champs.copyRange(MaCopie.CellAddress, MaZone.RangeAddress ' la copie
MaCopie.cellbackcolor = -1 'la couleur d'arrière plan
End Sub
Bien cordialement