Controle cellule pleine en VB Excel

Fermé
Patrice Haraut - 24 oct. 2003 à 10:56
 Patrice Haraut - 24 oct. 2003 à 13:56
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

2 réponses

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


ou bien :
if avtivecell <>"" then


en esperant que cela t'aides
A+
2
Patrice Haraut
24 oct. 2003 à 13:56
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 lundi 15 avril 2002 Statut Membre Dernière intervention 18 septembre 2014 7
24 oct. 2003 à 11:55
Bonjour,

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

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

indice = indice + 1

Wend
0