Pour les Experts du Vb sous Excel

Fermé
éshsmo - 10 sept. 2001 à 13:59
 éshsmo - 10 sept. 2001 à 15:53
Bonjour

Je suis débutant en VB sous Excel et j'aimerai savoir comment faire un test afin de pouvoir vérifier si une feuille d'un classeur existe du style

If Feuil1.Exists then

Combox.Additem = Feuil1.Name

Else

MsgBox = "Feuille 1 n'existe pas"

End If

Mais bon je n'arrive pas donc si vous pouviez m'aider cela serait vraiment sympa

PS: L'exemple en dessus est totalement faux !!!
A voir également:

1 réponse

mr_poussy Messages postés 2735 Date d'inscription vendredi 24 août 2001 Statut Modérateur Dernière intervention 27 février 2013 61
10 sept. 2001 à 14:43
moi je dirai >

on error goto resol

sheets("feuil1").select
combox.additem = feuil1.name

on error goto 0

resol:
msgbox = "feuille 1 n'existe pas"

par exemple mais y a surement d'autre moyen.

si ca marche po dis le moi,je chercherais autre chose.
0
Merci je viens d'essayer et ça marche c'est vraiment trop coooool mais j'ai une autre question t'es pret:

Disons que j'ai 15 feuilles dans un fichier excel et j'aimerai faire une boucle qui afficherai lors de l'initialisation de ma fenêtre chaques noms de feuille dans un Liste modifiable (Combobox)

Exemple le fichier excel contient les feuilles a, b, c, d, e,... Ben je veux que dans la comboBox cela affiche
_________________
|______________|\/|
| a |
| b |
| c | <-Dessin mal fait pardon !!!
| d |
| ... |
|______________|

enfin tu as l'air vachement doué donc si tu arrive je te promet que je t'envoie chez toi personnellement des chocolats de mon Pays (Suisse)

Et encore merci beaucoup

0