Suppression

Bonjour

Ci joint un fichier avec des codes VBA.

Mais la suppression d'une ligne sur deux feuilles différentes ne fonctionnent pas.

Merci pour la nouvelle aide

No

12formulaire.xlsm (27.29 Ko)

Bonsoir

en inversant l'ordre de tes "delete" , cela marche

Sheets("Feuil2").Rows([C2:C20].Find(ComboBox3.Value).Row).EntireRow.Delete
Sheets("Feuil1").Rows([C2:C20].Find(ComboBox3.Value).Row).EntireRow.Delete

Feuil2 en premier

Pour l'explication, seul un pro pourra te la donner

Bye

Bonjour

Super, ça fonctionne

merci beaucoup

Dommage qu'on ne sache pourquoi il faut inverser ....

Encore merci

T

Salut Tacentaure, Patty,

Explication du "phénomène"...

Sheets("Feuil1").Rows([C2:C20].Find(ComboBox3.Value).Row).EntireRow.Delete
Sheets("Feuil2").Rows(Sheets("Feuil2").[C2:C20].Find(ComboBox3.Value).Row).EntireRow.Delete

[C2:C20] est la référence d'une colonne de Feuil1 puisque la feuille active est la Feuil1.

En supprimant votre item d'abord en Feuil1, la recherche est forcément vaine lors de la deuxième tentative d'effacement puisque, dans cette colonne, la référence a disparu.

A+

Bonjour à tous , bonjour Curulis57

Merci pour cette explication, je pensais que du moment que la feuille était précisée, cela marcherait

Une bonne leçon , chef

Bonne journée

Hello

En effet, c'est évident quand on a la réponse.

Merci pour l'explication, très utile

Bonne journée

T

Rechercher des sujets similaires à "suppression"