Afficherdeux feuilles du classeur à l'ouverture

tototiti2008

XLDnaute Barbatruc

• 5 Novembre 2010

• #2

Re : Afficherdeux feuilles du classeur à l'ouverture

Bonjour ennida,

sais-tu le faire en manuel ?

Si oui, as-tu essayé d'enregistrer une macro en le faisant ?

 

Vote positif 0 Vote négatif

E

ennida

Guest

• 5 Novembre 2010

• #3

Re : Afficherdeux feuilles du classeur à l'ouverture

J'y ai même pas pensé. En fait il suffit d'enregistrer le classeur avec deux feuilles affichées...merci

 

Vote positif 0 Vote négatif

E

ennida

Guest

• 5 Novembre 2010

• #4

Re : Afficherdeux feuilles du classeur à l'ouverture

Trop facile : le classeur s'ouvre bien avec deux feuilles affichées mais ce sont les deux mêmes.

 

Vote positif 0 Vote négatif

K

kjin

XLDnaute Barbatruc

• 5 Novembre 2010

• #5

Re : Afficherdeux feuilles du classeur à l'ouverture

Bonjour, salut tototiti,

Code:

Private Sub Workbook_Open()
Application.EnableEvents = False
With ActiveWorkbook
    Set wnd = ActiveWindow
    With wnd
        .WindowState = xlNormal
        .Top = 0
        .Left = 0
        .Width = Application.Width / 2
        Sheets(1).Select
        .NewWindow
         With ActiveWindow
            .Top = 0
            .Left = wnd.Left + wnd.Width
            .Width = Application.Width / 2
            Sheets(3).Select
        End With
    End With
End With
Application.EnableEvents = True
End Sub

A+
kjin

 

Vote positif 0 Vote négatif

E

ennida

Guest

• 5 Novembre 2010

• #6

Re : Afficherdeux feuilles du classeur à l'ouverture

merci ça marche 🙂

 

Vote positif 0 Vote négatif