pour une location de materiel j ai un tableau sur la feuille 1 et je
voudrais que lorsque je mais un x ou un changement de couleur dans la
premiere colonnes toute la ligne soit suprimer et tres important reaparaisse
a la suite d un tableau ou le nbre de ligne varie sur la feuille suivante.
J'ai déjà essayé cela mais ça ne marche pas.
Merci d'avance de votre aide
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Ellimac
Bonjour,
Dans le code de la feuille concernée :
Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Target.Column = 1 Then If Selection.Count > 1 Then Exit Sub If Target.Value = "x" Or Target.Value = "X" Then Target.EntireRow.Copy Sheets(2).Range("a65000").End(xlUp) (2).PasteSpecial Target.EntireRow.Delete End If End If End Sub
Camille
-----Message d'origine----- Bonjour, sous XL2000 , avec win 98 :
pour une location de materiel j ai un tableau sur la feuille 1 et je
voudrais que lorsque je mais un x ou un changement de couleur dans la
premiere colonnes toute la ligne soit suprimer et tres important reaparaisse
a la suite d un tableau ou le nbre de ligne varie sur la feuille suivante.
J'ai déjà essayé cela mais ça ne marche pas. Merci d'avance de votre aide
.
Bonjour,
Dans le code de la feuille concernée :
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Column = 1 Then
If Selection.Count > 1 Then Exit Sub
If Target.Value = "x" Or Target.Value = "X" Then
Target.EntireRow.Copy
Sheets(2).Range("a65000").End(xlUp)
(2).PasteSpecial
Target.EntireRow.Delete
End If
End If
End Sub
Camille
-----Message d'origine-----
Bonjour,
sous XL2000 , avec win 98 :
pour une location de materiel j ai un tableau sur la
feuille 1 et je
voudrais que lorsque je mais un x ou un changement de
couleur dans la
premiere colonnes toute la ligne soit suprimer et tres
important reaparaisse
a la suite d un tableau ou le nbre de ligne varie sur la
feuille suivante.
J'ai déjà essayé cela mais ça ne marche pas.
Merci d'avance de votre aide
Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Target.Column = 1 Then If Selection.Count > 1 Then Exit Sub If Target.Value = "x" Or Target.Value = "X" Then Target.EntireRow.Copy Sheets(2).Range("a65000").End(xlUp) (2).PasteSpecial Target.EntireRow.Delete End If End If End Sub
Camille
-----Message d'origine----- Bonjour, sous XL2000 , avec win 98 :
pour une location de materiel j ai un tableau sur la feuille 1 et je
voudrais que lorsque je mais un x ou un changement de couleur dans la
premiere colonnes toute la ligne soit suprimer et tres important reaparaisse
a la suite d un tableau ou le nbre de ligne varie sur la feuille suivante.
J'ai déjà essayé cela mais ça ne marche pas. Merci d'avance de votre aide