Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel > Macros et VBA Excel
Macros et VBA Excel Vos questions relatives aux macros Excel, à l'utilisation de VBA et à l'automatisation de vos classeurs Excel.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 12/12/2011, 12h03   #1
Invité de passage
 
Inscription : mars 2011
Messages : 5
Détails du profil
Informations forums :
Inscription : mars 2011
Messages : 5
Points : 1
Points : 1
Par défaut Appel nom interne d'une feuille avec variable

Bonjour,

J'ai une question qui parait simple mais pour laquelle je n'ai pas trouvé de réponse sur le Web.
Je souhaite faire une boucle dans laquelle j'appelle les feuilles d'un classeur par leur nom interne (pour éviter des modifs de nom ou insertions de feuilles qui viendraient tous casser).
Je ne trouve pas la syntaxe pour faire ça. Disons que le nom soit Feuil1 et Feuil2. Je crée une variable i qui peut prendre la valeur 1 ou 2, Feuil&i.cells(1,1) ne fonctionne pas. Pareil en mettant des guillements ou parenthèses ou autre...

Je pense tout de même que ce type de chose doit être possible... Savez-vous comment faire ?

Merci à vous.
friout est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 12/12/2011, 12h52   #2
Expert Confirmé Sénior
 
Homme Daniel
aucune
Inscription : septembre 2011
Messages : 2 004
Détails du profil
Informations personnelles :
Nom : Homme Daniel
Localisation : France, Seine et Marne (Île de France)

Informations professionnelles :
Activité : aucune

Informations forums :
Inscription : septembre 2011
Messages : 2 004
Points : 4 037
Points : 4 037
Bonjour,

Je ne vois pas d'autre moyen que la bidouille suivante :

Code :
1
2
3
4
5
6
7
8
Dim sh As Worksheet, Feuille As Worksheet
For Each sh In Sheets
    If sh.CodeName = "Feuil1" Then
        Set Feuille = sh
        Exit For
    End If
Next sh
Feuille.Select 'par exemple
J'espère me tromper.
__________________
Cordialement.

Daniel

Citation:
La plus perdue de toutes les journées est celle où l'on n'a pas ri.
Chamfort
Daniel.C est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 01h31.


 
 
 
 
Partenaires

Hébergement Web