Problème syntaxe

Bonjour, j'ai un code pour centrer la cellule active a l'ouverture d'un fichier excel mais j'aimerai pluto que ce soit tjrs la celule H11 qui soit centrée. Comment puis- la remplacer dans mon code?

Merci

Sub CentrerCellule(R As Range)
Dim iROW As Integer
Dim iCol As Integer
iROW = H11
If iROW < 1 Then iROW = 1
iCol = R.Column - ActiveWindow.VisibleRange.Columns.Count / 2
If iCol < 1 Then iCol = 1
ActiveWindow.ScrollColumn = iCol
ActiveWindow.ScrollRow = iROW
End Sub

Bonjour

Code à essayer et à placer dans THISWORKBOOK

Private Sub Workbook_Open()
Dim iROW As Integer
Dim iCol As Integer
iROW = 11
iCol = 8
If iROW < 1 Then iROW = 1
iCol = iCol - ActiveWindow.VisibleRange.Columns.Count / 2
If iCol < 1 Then iCol = 1
ActiveWindow.ScrollColumn = iCol
ActiveWindow.ScrollRow = iROW
End Sub

Si ok, merci de cloturer le fil en cliquant sur la case à cocher verte lors de votre réponse

Cordialement

Bonjour, merci super!!