probleme de macro a l'ouverture

a partir de delphi je sors des données sur une feuille excel, qui me permets de faire des tcd a partir de celle ci. jusque la tout marche. cette feuille ne contenant pas tout ce que j'ai besoin j'ai du en faire une qui s'ouvre en meme temps a l'aide d'une macro, jusque la tout marche ma question est comment puis je reduire a l'ouverture la premiere et agrandir la seconde a l'ouverture merci a vous tous, voici une partie de mon code

But : Lance le fichier frère.
'
Workbooks.Open sfic & "_TC"
Application.WindowState = xlMaximized
ActiveWorkbook.Activate

End Sub

Private Sub auto_open()
'
Dim sfic As String ' Nom du répertoire et du fichier

sfic = ActiveWorkbook.FullName

'
' But : Lance le fichier frère.
'
Workbooks.Open sfic & "_TC"
ActiveWorkbook.Activate

End Sub

merci:D

Bjr,

essayes des commandes comme celles ci peut etre que ca va merché

ActiveWindow.WindowState = xlNormal
ActiveWindow.WindowState = xlMaximized
Application.WindowState = xlNormal
Application.WindowState = xlMaximized