Accéder à une feuille nommée dans excel [Résolu]

Signaler
Messages postés
2
Date d'inscription
mardi 12 juin 2012
Statut
Membre
Dernière intervention
14 juin 2012
-
Messages postés
115
Date d'inscription
dimanche 6 avril 2003
Statut
Membre
Dernière intervention
29 juin 2012
-
je voudrais simplement écrire quelques lignes de VB dans excel pour faciliter l'utilisation d'un fichier qui comprend 52 onglets (un par semaine). je souhaiterais que l'utilisateur en ouvrant son fichier soit directement positionné sur l'onglet de la semaine en cours. J'ai bien trouvé comment remonter le quantième de la semaine en cours mais après c'est le trou !
Dim NumSem As Byte
NumSem = DatePart("ww", Date, 2, 2)

merci pour votre aide

PARICHE

4 réponses

Messages postés
115
Date d'inscription
dimanche 6 avril 2003
Statut
Membre
Dernière intervention
29 juin 2012

bonjour
dans ThisWorkbook

Private Sub Workbook_Open()
  Sheets(DatePart("ww", Date, 2, 2)).select
End Sub


@+JP
Messages postés
14788
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
1 mai 2021
155
Bonjour,

Sheets("Sheet1")
C'est ce que tu cherches (à adapter bien sûr) ?

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list
---
Mon site
Messages postés
2
Date d'inscription
mardi 12 juin 2012
Statut
Membre
Dernière intervention
14 juin 2012

En fait il s'agit d'activer l'onglet correspondant au n° de semaine en cours (numéro remonté par la ligne de code :
NumSem = DatePart("ww", Date, 2, 2)
soit comment ouvrir une feuille portant un nom que l'on vient de récupérer et non par son index........
merci

PARICHE
Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
236
Bonjour,
soit toto la variable contenant ce nom
Sheets(toto)
pardi.



________________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement vous dire ce qu'elle contient. Je n'interviendrai qu'en cas de nécessité de développ