Accéder à une feuille nommée dans excelRésolu

Question

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

mjpmjp · Accepted Answer

bonjour
dans ThisWorkbook

Private Sub Workbook_Open()
  Sheets(DatePart("ww", Date, 2, 2)).select
End Sub

@+JP

NHenry · Answer

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

cs_PARICHE · Answer

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

ucfoutu · Answer

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

Accéder à une feuille nommée dans excel

4 réponses

Votre réponse

Discussions similaires