Forums XLPages

Excel & VBA Forum principal Afficher les nom des feuiiles et la cellule b2 de chaque feuilles dans une liste de choix

Afficher les nom des feuiiles et la cellule b2 de chaque feuilles dans une liste de choix
#1
MOSTA2010
Débutant XLPages

Inscription: 28/12/2008

Messages: 1

Système d'exploitation:
PC
Version Excel utilisée:
2000
Posté le : 28-12-2008 15h18
Bonjour.

AIDEZ MOI SVP ,

JE CHERCHE UN CODE POUR QUE JE PEUX AFFICHER DANS DEUX COLLONES LES NOMS DES FEUILLES ET LES CELLULES B2 DE CHAQUE FEUILLE DANS UNE LISTE DE CHOIX.

SALUTATION
MOSTA2010
Hors Ligne
 Rapport   Haut 

Re: Afficher les nom des feuiiles et la cellule b2 de chaque feuilles dans une liste de choix
#2
myDearFriend!
Webmestre

Inscription: 18/05/2006
De Saône-et-Loire (71)

Messages: 1539

Système d'exploitation:
PC
Version Excel utilisée:
97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
Posté le : 28-12-2008 15h58
Bonjour MOSTA2010, le Forum,

Désolé, je ne comprends pas ta question. Donne nous plus de détails et/ou joins un exemple de ce que tu cherches à faire.

Par ailleurs, écrire en majuscules, ça ne se fait pas sur Internet : ça veut dire crier.
(j'ai modifié ton sujet en conséquence)

Cordialement,
Didier_mDF
Image redimensionnée
Le Webmaster

La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
Hors Ligne
 Rapport   Haut 

Re: Afficher les nom des feuiiles et la cellule b2 de chaque feuilles dans une liste de choix
#3
JCGL
Accro XLPages

Inscription: 23/05/2007
De Chamrousse

Messages: 309

Système d'exploitation:
PC
Version Excel utilisée:
2013
Posté le : 28-12-2008 17h57
Bonjour à tous,
Bienvenue à Mosta2010,

Peux-tu essayer avec ceci dans un Module Standard :

Option Explicit

Sub Liste()
Dim X As Byte
Sheets("Liste").Range("A2:B500").ClearContents

For X = 2 To Sheets.Count
With Sheets("Liste")
.Range("B" & Range("B65536").End(xlUp).Row + 1) = Sheets(X).Range("B2")
.Range("A" & Range("A65536").End(xlUp).Row + 1) = Sheets(X).Name
End With
Next X
End Sub

Clique sur le GO dans l'image

A+ à tous





Pièce jointe:
zip JC Liste.zip   [ Taille: 9.98 Ko - Téléchargements: 480 ]

Cordialement
Hors Ligne
 Rapport   Haut 


Vous pouvez voir les sujets.
Vous ne pouvez pas débuter de nouveaux sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.

[Recherche avancée]


Qui consulte actuellement ce sujet ?   1 Utilisateur(s) anonymes