XL 2019 inserer une zone selectionnée dans une autre feuille d'un antre fichier

MOmichel

XLDnaute Junior
bonjour a tous

j'ai 2 fichiers
le premier se nommant "MM" dans lequel je travail sur la "FEUIL2"
je sélectionne une zone (CurrentRegion) (cette zone est composée de X colonnes et X lignes)
le deuxième (classeur = ActiveWorkbook.Name) ayant une feuille SHEET ("MOT")

ce que je voudrais faire c'est de copier la zone sélectionnée dans "MM" et l'insérer dans le deuxième classeur dans la feuille ("MOT") au niveau de ActiveCell.Offset(2, 0 )


Pourriez-vous m'aider à ecrire ce code

pour info

je voudrais ecrire ce code a la suite de celui-ci

Dim Cellule_Ref As Range ' pour déclarer l'objet au début de ta macro
Dim Cellule_Rf As Integer
Cellule_Ref = ActiveCell
Dim fin As Long
Dim classeur As String
classeur = ActiveWorkbook.Name
'-------------------------------------------------------------------------------------------------------------
' creation d'un plan dans MM feuille 2
'--------------------------------------------------------------------------------------------------------------
Range("c2").CurrentRegion.Copy
Sheets.Add After:=ActiveSheet
Sheets("feuil2").Range("A1").PasteSpecial xlPasteValues
Columns("c:c").Replace What:="total ", Replacement:=""

'-------------------------------------------------------------------------------------------------------------
' import /insertion la zone selectionnée vers --> ActiveCell.Offset(2, 0)qui est dans
' "classeur" (variable déclarée), sheets("MOT")
'--------------------------------------------------------------------------------------------------------------
Range("c2").CurrentRegion.Copy
 

Pièces jointes

  • s18 .xlsm
    54 KB · Affichages: 7
  • mm.txt
    7 KB · Affichages: 8
Dernière édition:

Discussions similaires