listbox de certaines pages

[francois]

bonjour au forum

je cherche à mettre certaines page de mon classeur dans une listbox
Pour l'instant j'arrive a mettre touts les pages de mon classeur dans une listbox mais je voudrais en enlever quelques une.
existe t'il un moyen de selectioner les pages que l'on veut mettre dans une listbox.

merci d'avance

 

[Riddick]

Bonjour Francois

Beaucoup de choses sont faisables mais on sait pas tout faire
Dis moi en plus
Tu veux choisir manuellement ou bien ne prendre que les feuille dont le nom commence par un caractere ou......
Connais tu le nom des feuilles que tu veux pas ou leur position (tout au début)
Il faut en savoir plus

Je reste par là!

 

[francois]

merci de m'aider

je cherche en fait a ne prendre que les feuilles dont le nom commence par un caractere exemple graph(...) ou données(...)

merci

 

[francois]

re-bonjour
peut-on m'aider?

 

[Robert]

Bonjour François, Riddick, bonjour le forum,

Le code ci-dessous remplit une combobox (à l'initialisation de l'UserForm qui la contient) selon les 5 premières lettres du nom de chaque onglet. À adapter :

Private Sub UserForm_Initialize() 'à l'initialisation de l'Userform
Dim ws As Worksheet 'déclare la variable ws
For Each ws In Worksheets 'boucle sur tous les onglets du classeur
'condition : si les majuscules des 5 premières lettres du nom de l'onglet sont 'GRAPH'
'(à adapter à ton cas)
If UCase(Left(ws.Name, 5)) = 'GRAPH' Then
ComboBox1.AddItem ws.Name 'ajoute le nom de l'onglet à la comboBox1
End If 'fin de la condition
Next ws 'prochain onglet du classeur
End Sub

 

[Riddick]

re

Jete un oeil la dessus je connais pas ton niveau en VBA
le code qui t'interresse se trouve dans le Userform 'frm1'
dans form.activate

Si tu as besoin je reste encor un peu dans le coin [file name=francois_20050617151048.zip size=12586]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/francois_20050617151048.zip[/file]

 

[francois]

merci pour vos reponses

 

[francois]

salut riddick

je viens de regarder ton fichier c'est exactement ce qu'il me faut cependant je n'ais pas la possibilité d'aller directement sur la page en cliquant sur un bouton 'ok'

que dois-je faire

merci

 

[francois]

bonjour au forum

excusez moi d'insister mais je reitére ma question :

que dois-je faire pour aller directement sur les feuilles qd je suis dans la listbox

je sais ca doit etre tout simple mais je suis nul en macro

merci d'avance

 

[francois]

bonjour cher forum
j'ai besoin d'aide
merci

 

[Robert]

Bonjour François, Riddick, bonjour le forum,

Tu es un peu impatient et je te signale que tu n'avais pas précisé ce point dans ta question initiale. Je te le dis pour te faciliter la tâche, à l'avenir si tu veux une réponse efficace soit précis dans ta question et essaie d'envoyer un exemple (où ton fichier s'il est léger). Cela évite de perdre du temps à créer un UserForm qui ne vas pas forcément te convenir mais surtout d'avoir la réponse la mieux adaptée à ta requête.

J'ai donc modifié la démo de Riddick pour qu'en sélectionnant un onglet il devienne actif. [file name=francois2.zip size=14219]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/francois2.zip[/file]