Les Allergies
Alimentaires
Posez votre question Signaler

Selectionchange perd la copy (Cut, Paste) [Résolu]

psychoman 30Messages postés 17 octobre 2007Date d'inscription - Dernière réponse le 8 janv. 2008 à 17:11
Bonjour,
Sur Excel 2007
j'ai fait un code pour vider une colonne quand la sélection change de sellule.
par contre je ne peux plus utiliser la fonction copier coller (Ctrl C, Ctrl V)
voici mon code
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Selection.Copy
COP = Selection
AA = Selection.Address
Sheets("T-off Tuyau").Range("F1") = COP
Sheets("Feuil1").Range("M3:M51").ClearContents
Sheets("Feuil1").Range("N3:N51").ClearContents
Sheets("T-off Tuyau").Range(AA).Copy
End Sub
J'ai essayé plusieurs trucs mais je n'y arrive pas.
Pouvez vous m'aider.
merci.
Vince
Lire la suite 

Selectionchange perd la copy (Cut, Paste) »

1 réponses
Réponse
+0
moins plus
psychoman 30Messages postés 17 octobre 2007Date d'inscription 8 janv. 2008 à 17:11
Bonjour,

J'ai réglé mon problème en isolant le code sur les 2 colonnes nécessaires en mettant une fonction si. pour laisser la fonction copier coller disponible sur les autres colonnes. voici le code :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Selection.Column = 14 Then
Sheets("Feuil1").Range("M3:M51").ClearContents
Sheets("Feuil1").Range("N3:N51").ClearContents
End If
If Selection.Column = 15 Then
Sheets("Feuil1").Range("M3:M51").ClearContents
Sheets("Feuil1").Range("N3:N51").ClearContents
End If


End Sub

a+
Vince.

 Ajouter un commentaire
Ajouter un commentaire
Posez votre question
Ce document intitulé « selectionchange perd la copy (Cut, Paste) » issu de CommentCaMarche (www.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Dossier à la une
Passage au tout numérique : quel coût pour les particuliers ?