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

[MOmichel]

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

 

[fanch55]

Salut,

mm.txt ?

Le code indiqué ne correspond pas à celui qui est dans le classeur Excel ...

 

[MOmichel]

oui parce qu'il est brut avant le lancement de la procedure


mais cet apres midi j'ai finalement trouvé un solution
donc j'ai resolu monprobleme