Problème Else sans IF

Résolu
Elouna -  
 Elouna -
Bonjour,

Pouvez-vous svp me dire ce qui ne va pas avec cette macro pourtant simple?
Merci d'avance

Sub Macro

Range("R10").Activate

While ActiveCell.Value <> Empty
If ActiveCell.Value <> "2042" Then ActiveCell.EntireRow.Delete Shift:=xlUp
Else: ActiveCell.Offset(1, 0).Activate
Wend

End Sub

2 réponses

  1.
    Colbi97 Messages postés 643 Statut Membre 12
     
    Bonjour,
    Tout d'abord, il ne faut pas de ":" après Else et de plus, un petit End If serait bien avant le Wend (ce serait "plus propre"...)
    0
  2. Elouna
     
    Les ":" se mettaient en automatique, par contre ça marche si je mets mon Else sur la même ligne que le If, merci beaucoup!
    0

Discussions similaires

A quoi sert la sortie IF OUT démodulateur?
LesNulsCCM -
Graffitir -

3 réponses
Google search
JML34 -
JML34 -

2 réponses
Commande if then else sous batch
Wombata -
dg_belmontet -

3 réponses
The Realtek Network Controller was not found
Maxime949 -
kaneagle -

1 réponse
The Realtek Network Controller was not found.
Maxime -
kaumune -

13 réponses