Problème de boucle If

Question

Bonjour je suis en train de fair la boucle suivante:

If Selection = "" Then
        
        ElseIf Selection <> "" Then
        Selection.Copy
End If

Et après le 1er Then je voudrai dire de faire l'action "rien faire"
Est ce possible??

Ledaf

VB_PtitCat · Answer

Il suffit que tu inverse par exemple
if selection <> "" then Selection.copy

et forcément si c'est egal il ne fera rien ^^

MerZi ... Zi ... Zi ... PtitCat   
                                 P.S:DSL pour l'orthographe

pape0 · Answer

Pour infos, l'instruction 'IF' n'est pas une Boucle, c'est une condition.

<hr />
Aller voir ces sites 
http://www.pape-bleu.net
  ou http://www.papebleu.net.

jrivet · Answer

Salut,
En complément je dirais qu'on préférera utiliser VbNullString à la place de "".

Sinon je rejoints [auteur/VBPTITCAT/1075109.aspx VB_PtitCat],et [auteur/PAPE0/233029.aspx pape0] dans leur commentaire

@+: Ju£i?n
Pensez: Réponse acceptée

cs_titicar · Answer

Et pour info, il me semble avoir déjà lu quelque part sur ce site qu'il valait mieux ne pas utiliser l'instruction 'ElseIf'.

titicar

cs_MPi · Answer

Salut Titicar,

D'après moi l'instruction ElseIf a sa place dans plusieurs cas.
L'important, c'est le nombre de IF / ElseIf versus la lisibilité du code.
On pourrait préférer un Select Case qui est beaucoup plus lisible.

Et j'abonde dans le sens de toutes les réponses données.

MPi²

cs_Jack · Answer

Salut Après traduction, tu voudrais faire la 'Copy' lorsqu'il y a quelque chose dans la Selection. Ceci suffit amplement, pourquoi vouloir raisonner à l'envers ? If Selection <> vbNullString Then Selection.Copy End If Vala Jack, MVP VB NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

cs_Jack · Answer

Oups, je n'avais pas vu que VB_PtitCat avait déjà proposé cette simplification.

Problème de boucle If

7 réponses

Votre réponse

Discussions similaires