Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

APPLIQUER UNE MACRO A UNE FEUILLE EXCEL UNIQUEMENT

lamc

XLDnaute Nouveau
Bonjour,

j'ai déjà trouvé des pistes de réponse à ma question ci-dessous mais je ne sais pas comment articuler les différentes commandes en VBA... :-(
Alors j'explique mon problème au cas où une âme charitable ayant des connaissances voudrait bien me dépanner !
Dans un fichier Excel, j'utilise une macro qui permet de limiter les copier-coller des utilisateurs en copier-coller valeur, le fichier Excel contient pas mal de mises en forme conditionnelles qui pouvaient être "perturbées" par des copier-coller intempestifs... le problème c'est que je voudrais que cette macro ne s'exécute que sur une seule feuille (l'utilisateur peut avoir besoin de coller des mises en formes, des formules etc. à partir d'autres fichiers Excel sur une autre feuille du classeur).

Pour résumer, je voudrais que la macro ci-dessous ne s'applique qu'à ma feuille "MRE":

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Source As Range)

On Error Resume Next 'sécurité
With Application
If .CutCopyMode Then
.EnableEvents = False
.Undo
Selection.PasteSpecial xlPasteValues
.OnUndo "", ""
.OnRepeat "", ""
.EnableEvents = True
End If
End With
End Sub

Merci d'avance pour votre aide !!
 

gilbert_RGI

XLDnaute Barbatruc
Bonjour,
mettre le code dans la feuille(MRE)
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
et non dans le ThisWorkBook
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Source As Range)
 

lamc

XLDnaute Nouveau
super! merci beaucoup !
par contre, une fois que j'ai collé mes valeurs dans la cellule de destination, si je clique dans une autre cellule, le coller-valeur se répète...?
Est-ce qu'il y a moyen de limiter à un seul copier-coller SVP ?
merci d'avance!
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…