activer un onglet dès l'ouverture Résolu/Fermé

Question

Bonjour,

Je cherche à activer un onglet d'un classeur Excel (sous Vba) dès l'ouverture de celui ci, car les utilisateurs le ferment systématiquement sur le mauvais onglet, trompant l'utilisateur suivant.

Merci de votre aide pour ce truc facile, mais que je ne parviens pas à faire !!

Cordialement

David

lermite222 · Answer

Bonjour,
Private Sub Workbook_Open()
    Sheets("TaFeuil").Select
End Sub
A+

michel_m · Answer

Bonjour
a installer dans le module Thisworkbook de VBE

Private Sub Workbook_Open()
Sheets("nomdetafeuille").Range("A1").Select
End Sub

dave38 · Answer

Merci pour votre réponse.

En fait, mon classeur a 2 feuilles, et le programme suivant fait partie de la seconde. Je voudrai y insérer une ligne de commande qui le fait revenir à la 1ère feuille en fin d'exécution. le problème est que je souhaite que le retour vers la 1ère feuille ne se fasse qu'après fermeture du classeur complet. merci de votre aide !!

Private Sub CheckBox1_Click()
Dim pdm1
Dim OFinterim
    pdm1 = Sheets("AO").Range("AH138").Value
    OFinterim = "Olivier_Feur_Intérim ."
Sheets("AO").Select
    Selection.AutoFilter Field:=4, Criteria1:="OF intérim"
    MsgBox "Bonjour " & OFinterim & "Votre Part de Marché sur les Flux Long Terme est de " & pdm1
    CheckBox1 = False
   End Sub

michel_m · Answer

le retour vers la 1ère feuille ne se fasse qu'après fermeture du classeur complet

?????
Si le fichier est fermé...

lermite222 · Answer

Bonjour,
Bonjour Michel, en employant un petit détour.... 
A la fin de ta macros ajouter la ligne...
    Application.Quit
et dans le module de ta feuille...
Private Sub Workbook_BeforeClose(Cancel As Boolean)
    If ActiveSheet.Name <> "Feuil1" Then
        Windows(ActiveSheet.Parent.Name).Visible = False
        Sheets("Feuil1").Activate
        Workbooks(ActiveSheet.Parent.Name).Save
    End If
End Sub

Private Sub Workbook_Open()
    Windows(ActiveSheet.Parent.Name).Visible = True
End Sub
dave38 : Bien sûr, remplacer "Feuil1" par le nom de ta feuille

A+

michel_m · Answer

Bonjour lermite,

OK, j'y avais pas pensé; c'est l'expression "après la fermeture" qui m'avait fait tilté!
Merci

Activer un onglet dès l'ouverture

6 réponses

Discussions similaires