Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1798 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Variable pour utiliser le CodeName d'une feuille

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Variable pour utiliser le CodeName d'une feuille

n°1893448
Rondoudoud​ou
Posté le 10-06-2009 à 09:38:04  profilanswer
 


Bonjour,
 
C'est idiot mais je n'arrive pas à retrouver comment sélectionner une feuille avec une variable égale à son CodeName.
Mon problème est le suivant :
 

Code :
  1. 'Calcul du nombre de lignes dans Data
  2. Feuil1.Select
  3. NbLigneData = Range("A65536" ).End(xlUp).Row


 
Je voudrais remplacer le "Feuil1" par une variable...
 
Merci merci  :jap:  


---------------
Ctplm !
mood
Publicité
Posté le 10-06-2009 à 09:38:04  profilanswer
 

n°1893468
olivthill
Posté le 10-06-2009 à 10:33:22  profilanswer
 

nom_feuille = "Feuil1"
ActiveWorkbook.Sheets(nom_feuille).Select

n°1893477
Rondoudoud​ou
Posté le 10-06-2009 à 10:53:24  profilanswer
 


Ce code marche pour le nom de l'onglet, pas pour son codename...


---------------
Ctplm !
n°1893497
olivthill
Posté le 10-06-2009 à 11:18:37  profilanswer
 

Plus haut, il était question de "Feuil1". Pourquoi en avoir parlé si cela n'a pas de rapport ? Qu'est-ce c'est que ce codename ? Est-ce Sheets(i).Name ?
Peut-être ma_feuille  = Excel.Workbooks(1).ActiveSheet ou Set ma_feuille = ThisWorkbook.Sheets("Feuil1" )


Message édité par olivthill le 10-06-2009 à 11:21:45
n°1893511
Rondoudoud​ou
Posté le 10-06-2009 à 11:27:15  profilanswer
 


Exemple : Feuil1 (Data), Feuil1 est le CodeName de la feuille, Data est son nom.
Comme le nom peut-être changé par les utilisateurs, j'ai besoin d'une variable qui reprenne le CodeName (qui ne change pas..).
J'ai déjà essayé les deux méthodes que tu cites et ça ne marche pas malheureusement..


---------------
Ctplm !
n°1893525
Rondoudoud​ou
Posté le 10-06-2009 à 11:31:48  profilanswer
 

 
Trouvé...
 

Code :
  1. Set F = Feuil1
  2. F.Select
  3. NbLigneData = Range("A65536" ).End(xlUp).Row


 
[:kosmos]  


---------------
Ctplm !

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Variable pour utiliser le CodeName d'une feuille

 

Sujets relatifs
récupérer variable à partir d'un lienProjet d'application: quel langage utiliser ?
utiliser les cookies d'autre site web !!variable et thread safe
Une variable qui prend un peu trop de place ...variable global dans un include, unique dans l'appli ?
copie entre feuille: erreur la 2e foisaddition de variable texte - erreur
Connaitre le type d'une variable dans un if en asp[Résolu][Javascript]Boucle de test et définition de variable.
Plus de sujets relatifs à : Variable pour utiliser le CodeName d'une feuille


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR