Désactiver sélection copié

Re : Désactiver sélection copié

Bonjour Lu K,


Essaye en rajoutant à la suite :
a+

Re : Désactiver sélection copié

Bonjour

Application.CutCopyMode = False

Astuce pour le retrouver :

enregistrer une macro, faire copier et faire echap

Bien cordialement

Olivier

Re : Désactiver sélection copié

Bonjour mromain, odesta et le forum.

J'avais déja essayé le code Application.CutCopyMode = False sans succés.

Voici quand je copie:
With ActiveCell
Rows(ActiveCell.Row).Select
Selection.Copy
End With

Et dans un autre sub quand je colle :
If ActiveCell.Offset(0, 6) >= 1 And ActiveCell.Offset(-2, 6) >= 1 Then
Rows(ActiveCell.Row).Select
Selection.Insert Shift:=xlDown
Application.CutCopyMode = False
ActiveCell.Offset(0, 14).Select
ActiveCell.FormulaR1C1 = Datedebut
ActiveCell.Offset(0, -5).Select
end if

Je sais pas si cela peut aider ?