1090 connectés

FORUM HardWare.fr

Programmation

VB/VBA/VBS

[VBA] Test cell vide ne fonctionne plus

Recherche :

Dernière réponse
Sujet : [VBA] Test cell vide ne fonctionne plus
rufo	Mets [Résolu] en début de titre de ton topic (en éditant ton premier message) pour signaler que c'est bon ;)

Votre réponse

Nom d'utilisateur

Pour poster, vous devez être inscrit sur ce forum .... si ce n'est pas le cas, cliquez ici !

Le ton de votre message

Votre réponse

Smilies

Liste des smilies perso
Wiki smilies
Chercher un smiley

Options

Activer votre signature
Désactiver les smilies
Activer la notification par email du sujet

Aperçu

Vous avez perdu votre mot de passe ?

Vue Rapide de la discussion

rufo	Mets [Résolu] en début de titre de ton topic (en éditant ton premier message) pour signaler que c'est bon ;)

GeekAlf

a priori c'est

Code :

ActiveCell.End(xlDown).Offset(1, 0).EntireRow.Select

qui ne passait pas

je l'ai remplacé par

Code :

ActiveCell.Offset(1, 0).Select

et ça passe à nouveau....

GeekAlf

Bonjour,

je rencontre un cas de figure que je n'arrive pas à expliquer.
j'ai une macro que j'ai développé il y a 7-8 ans et qui fonctionnait comme un charme jusqu'à il y a quelques temps.

Le principe est dans une plage de données de déplacer des lignes qui répondent à un critère dans un autre onglet, pas très sorcier.

à un moment donné dans une boucle, je teste une cellule, et si elle n'est pas vide, je sélectionne la ligne du dessous

Code :

Worksheets("LgFiltrees" ).Activate
Range(cel & 2).Select
If ActiveCell <> "" Then
Do While ActiveCell <> ""
ActiveCell.End(xlDown).Offset(1, 0).EntireRow.Select
Loop
End If

sur le fichier qui pose problème, ma cellule n'est pas vide et pourtant le code boucle indéfiniment comme si elle était vide.... :pfff:

j'ai une valeur texte 00099 dans la cellule.....

Merci de votre aide