Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Sauter 2 lignes

  • Initiateur de la discussion Initiateur de la discussion antoine04
  • 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 !

antoine04

XLDnaute Nouveau
Problème de saut de ligne

Bonjour tlm,

J'espère que tous le monde va bien depuis mon dernier passage chez vous 🙂

J'expose mon problème.

J'ai un fichier avec des commandes clients et le numéro de la commande dans la colonne D.
Les commandes contiennent de 1 à 11 lignes.
J'ai un code (ci-dessous) qui me permet d'extraire des données par macro mais j'aimerai que cette macro saute 1 ou 2 lignes suivant le contenu de la cellule supérieur. C'est-à-dire, si la cellule D(x) = D(x-1) alors il saute 1 lignes sinon il saute 2 lignes.

Voici le code :


J'ai pensé à cela, mais cela ne marche pas.

If Range("D" & ligne).Value = Range("D" & (ligne - 1)).Value Then

ligne = ligne + 1

Else

ligne = ligne + 2

End If

Si quelqu'un connait la solution à mon problème, je le remercie d'avance pour l'aide qu'il pourra me fournir

Merci d'avance.
 
Dernière édition:
Re : Sauter 2 lignes

Bonjour le fil, antoine04

Tu peux écrire, par exemple (en mode pressé 🙂)
Code:
If Range("D" & ligne).Value <> Range("D" & (ligne - 1)).Value Then ligne = ligne + 1
En place de
Code:
ligne = ligne + 1
A plus
 
- 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

Discussions similaires

Réponses
5
Affichages
705
Réponses
8
Affichages
270
  • Question Question
Microsoft 365 worksheet_change
Réponses
29
Affichages
1 K
Réponses
2
Affichages
332
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…