• Initiateur de la discussion Initiateur de la discussion Robert
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

R

Robert

Guest
Bonjours à tous

Sujet:
Repérer un nombre en colonne R à partir de la ligne 6 si le nombre est trouvé, suppression de la ligne complète.

Débutant en VBA, je suis capable d'enregistrer une macro et créer une boite de dialogue, mais j'ai un sérieux manque de formation pour aboutir à celle-ci.

Mon besoin est le suivant:
La boite de dialogue est crée.
Dans celle-ci, l'utilisateur doit sélectionner un N° ( 0 , 1369 , 5520 et 5885 )
Le début de ma macro est le suivant:
Private Sub List_Approv_Chang()
Dim test As Integer
Test=List As Integer
Range("Y1")=test
UserForm1.Hide
If Range("Y1").Value<>""Then
Range("Y1").Value
Range("R6").Select
End If
End Sub
ENSUITE, ou je ne trouve pas la solution !

1 Contrôler si Rx=Y1 à partir de R6
2 Si Rx = Y1
3 Sélection de la ligne complète
4 Supprimer la ligne
5 Descendre d'une ligne
6 Aller sur Bx de cette ligne
7 Si Bx est renseigné
8 OUI
9 Se positionner en Rx de la même ligne
10 Refaire la boucle de 1 à 11
11 Rx<>Y1
Refaire la boucle de 5 à 11
Si Bx est vide
Revenir à A1

J'espère être claire dans ma demande et je vous remercie par avance si vous pouvez m'apporter une solution qui me rendrait un grand service

Merci à tous et à bientôt
 

Pièces jointes

Bonjour Robert et le Forum
ci-joint ton fichier un peu modifié
n'oublie pas d'enlever le texte qui est sous ta zone à analyser, celà perturbe le déroulement des macro (faux comptage de nombre de lignes)
bon courage et @+
Denis
 

Pièces jointes

Bonjour Denis et le Forum

Merci beaucoup pour ta réponse très rapide.
Comme je te l'ai dit dans mon mail, je fais un éssai et te tien informé du résultat
Heureusement que nous avons des Pros pour nous aider

Merci beaucoup

A trés bientôt sur le Forum
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
1
Affichages
607
Réponses
0
Affichages
597
Réponses
1
Affichages
265
Réponses
1
Affichages
330
Retour