OVH Cloud OVH Cloud

Problème VBA fichier lié pour comprehension

1 réponse
Avatar
j0b
Bonjour à vous tous, encore une fois je remercie l'existence de ce forum pour
pouvoir nous entraider ce qui est vraiment génial.

alors voila le fichier est disponible à l'adresse suivante :
http://rapidshare.de/files/2678056/exemple.pour.suppression.bis.xls.html

il suffit de cliquer sur free pui attendre une minute et vous allez pouvoir
le download.

Maintenant en ce qui concerne mon problème j'ai cré une userform et a partir
de celle ci je voudrais bien réalisé en vba une procédure me permettant de
supprimer les lignes que je ne veux plus ceci en saisissant le numéro de la
pièce que je ne veux plus dans la textbox (si la piece à 3 lignes il faut
tous les supprimer). J'avais réussi à faire cela mais ca coincé une fois sur
2 donc je pense que la procédure que vous allez me proposé sera meilleur. A
cela dans mon vrai fichier j'ai des formules et donc je voulais ajouté une
condition qui testé si la cellule montant ou nbrkm est rempli pour supprimer
celle ci et pas l'autre. Merci bien pour votre aide un bon programmeur fait
ca en 2min alors que moi il me faut 2h lol. Merci encore et bonne journée

1 réponse

Avatar
anonymousA
bonjour,

en utilisant les conditions de ton fichier exemple. une proc à mettre
dans le commandbutton1_click de ton UF.
Par ailleurs, si j'étais toi, je positionnerais le bouton de commande de
ta feuille au dessus des données.
On suppose bien sur que la feuille active est celle contenant les
données et que d'autre part tes formules dans les champs nbrkm ou
Montant renvoient la valeur 0 quand tu les considères comme pas remplies.

Dim plage As Range

Set plage = Range("B5:B" & Range("B65536").End(xlUp).Row)

With plage
For I = .Cells.Count To 1 Step -1
With .Cells(I)
If .Value = Val(Me.TextBox1.Value) And .Offset(0, 3) = 0
And .Offset(0, 4) = 0 Then
.EntireRow.Delete Shift:=xlUp
End If
End With
Next
End With

A+

Bonjour à vous tous, encore une fois je remercie l'existence de ce forum pour
pouvoir nous entraider ce qui est vraiment génial.

alors voila le fichier est disponible à l'adresse suivante :
http://rapidshare.de/files/2678056/exemple.pour.suppression.bis.xls.html

il suffit de cliquer sur free pui attendre une minute et vous allez pouvoir
le download.

Maintenant en ce qui concerne mon problème j'ai cré une userform et a partir
de celle ci je voudrais bien réalisé en vba une procédure me permettant de
supprimer les lignes que je ne veux plus ceci en saisissant le numéro de la
pièce que je ne veux plus dans la textbox (si la piece à 3 lignes il faut
tous les supprimer). J'avais réussi à faire cela mais ca coincé une fois sur
2 donc je pense que la procédure que vous allez me proposé sera meilleur. A
cela dans mon vrai fichier j'ai des formules et donc je voulais ajouté une
condition qui testé si la cellule montant ou nbrkm est rempli pour supprimer
celle ci et pas l'autre. Merci bien pour votre aide un bon programmeur fait
ca en 2min alors que moi il me faut 2h lol. Merci encore et bonne journée