Controle cellule pleine en VB Excel

Patrice Haraut -  
 Patrice Haraut -
Bonjour,
je cherche à faire une boucle en VB Excel, avec exécution d'une action tant que la cellule active est remlie.
Je connais la fonction inverse If IsEmpty(ActiveCell) Then
mais ne trouve pas de fonction "IsFull".
Si quelqu'un a une solution.
Merci d'avance
A voir également:

2 réponses

mobile 75
 
Bonjour
essaye avec ça
Do While activecell.value <>""


ou bien :
if avtivecell <>"" then


en esperant que cela t'aides
A+
2
Patrice Haraut
 
Merci pour l'info, cela m'a permit de reformater une liste de fichier provenant d'unix, et de remettre les noms de sous rép en face des noms de fichiers.
Pour info la macro :
ActiveCell.Offset(1, 0).Range("A1").Select
Do While ActiveCell.Value <> ""
ActiveCell.Offset(-1, 0).Range("A1").Select
Selection.Copy
ActiveCell.Offset(1, 0).Range("A1").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Selection.Copy
ActiveCell.Offset(1, 0).Range("A1").Select
Loop
Application.CutCopyMode = False
ActiveCell.Offset(1, 0).Range("A1").Select
0
mario90 Messages postés 29 Date d'inscription   Statut Membre Dernière intervention   7
 
Bonjour,

Moi j'ai déjà utilisé ça :

While Worksheets("Nomonglet").Cells(indice, numcolonne) <> ""
.
..
.
.

indice = indice + 1

Wend
0