Pour les Experts du Vb sous Excel

éshsmo -  
 éshsmo -
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

Réponse 1 / 1
mr_poussy Messages postés 2739 Date d'inscription   Statut Modérateur Dernière intervention   61
 
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
éshsmo
 
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