Lire les cases d'Excel une à une dans une boucle
Résolu
jay45
Messages postés
6
Date d'inscription
dimanche 21 novembre 2004
Statut
Membre
Dernière intervention
27 février 2006
-
27 févr. 2006 à 10:34
jay45 Messages postés 6 Date d'inscription dimanche 21 novembre 2004 Statut Membre Dernière intervention 27 février 2006 - 27 févr. 2006 à 11:30
jay45 Messages postés 6 Date d'inscription dimanche 21 novembre 2004 Statut Membre Dernière intervention 27 février 2006 - 27 févr. 2006 à 11:30
A voir également:
- Lire les cases d'Excel une à une dans une boucle
- Selectionner la derniere cellule non vide d'une colonne excel vba ✓ - Forum Visual Basic 6
- Supprimer une feuille excel vba ✓ - Forum VBA Office (Excel, Word ...)
- Tous les codes vba excel - Conseils pratiques -Visual Basic / VB.NET
- Appeler une cellule d'une autre feuille excel - Forum Visual Basic
- Impossible de lire la propriété vlookup - Forum Visual Basic
4 réponses
jrivet
Messages postés
7392
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
60
27 févr. 2006 à 10:45
27 févr. 2006 à 10:45
Salut,
Un fichier deja ouvert ou pas:
Ce que je veux dire, c est: Est ce que tu veux faire une macro sous Excel
@+, Julien
Pensez: Moteur de Recherche, Réponse Acceptée
Un fichier deja ouvert ou pas:
Ce que je veux dire, c est: Est ce que tu veux faire une macro sous Excel
@+, Julien
Pensez: Moteur de Recherche, Réponse Acceptée
jay45
Messages postés
6
Date d'inscription
dimanche 21 novembre 2004
Statut
Membre
Dernière intervention
27 février 2006
27 févr. 2006 à 11:16
27 févr. 2006 à 11:16
Le fichier est déjà ouvert mais je ne fais pas de macro
voici ce que je veux faire
tant que valeur<>choix
faire i++
valeur = case excel ( 1; i )
fin tant que
voila
voici ce que je veux faire
tant que valeur<>choix
faire i++
valeur = case excel ( 1; i )
fin tant que
voila
jrivet
Messages postés
7392
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
60
27 févr. 2006 à 11:21
27 févr. 2006 à 11:21
Re,
Bah faut je pense qu il faut que tu fasse un macro.
Du style
Dim i as long
Dim valeur as string
i = 1
Valeur = ActiveSheet.Range("A" & i).Value
While Ucase(Trim(Valeur)) <> Ucase(Trim(Choix))
i = i+ 1
Valeur = ActiveSheet.Range("A" & i).Value
Wend
@+, Julien
Pensez: Moteur de Recherche, Réponse Acceptée
Bah faut je pense qu il faut que tu fasse un macro.
Du style
Dim i as long
Dim valeur as string
i = 1
Valeur = ActiveSheet.Range("A" & i).Value
While Ucase(Trim(Valeur)) <> Ucase(Trim(Choix))
i = i+ 1
Valeur = ActiveSheet.Range("A" & i).Value
Wend
@+, Julien
Pensez: Moteur de Recherche, Réponse Acceptée
jay45
Messages postés
6
Date d'inscription
dimanche 21 novembre 2004
Statut
Membre
Dernière intervention
27 février 2006
27 févr. 2006 à 11:30
27 févr. 2006 à 11:30
Je te remerci je vais voir avec ton examples
