en fait le msg box fonctionne parfaitement mais l'affichage de la page correspond à celle au moment de la fermeture du fichier et non à la position de la cellule active lors de l'ouverture.
Pour vous assurer que la feuille de calcul affiche la cellule active à son ouverture, vous pouvez adapter le code de la macro pour faire défiler automatiquement vers cette cellule lors de l'ouverture du fichier. Voici comment vous pouvez ajuster le code :
1. **Ouvrir l'éditeur VBA** :
- Appuyez sur `Alt + F11` pour ouvrir l'éditeur de Visual Basic for Applications (VBA).
2. **Accéder au code de la feuille de calcul** :
- Trouvez "ThisWorkbook" sous "Microsoft Excel Objects" et double-cliquez dessus pour voir le code.
3. **Modifier le code VBA** :
- Remplacez le code existant par le code suivant, qui va non seulement afficher un message pour la cellule active, mais aussi défiler vers cette cellule :
```vba
Private Sub Workbook_Open()
Dim cellAddress As String
cellAddress = ActiveCell.Address
MsgBox "La cellule active est : " & cellAddress
' Sélectionner et faire défiler vers la cellule active
ActiveCell.Select
ActiveWindow.ScrollRow = ActiveCell.Row
ActiveWindow.ScrollColumn = ActiveCell.Column
End Sub
```
Ce code assure que la cellule active est sélectionnée et que la fenêtre est centrée sur cette cellule lors de l'ouverture du fichier, vous permettant ainsi de voir l'emplacement exact de la cellule active.
4. **Enregistrer et tester** :
- Enregistrez le fichier et assurez-vous qu'il est en format `.xlsm`.
- Fermez et rouvrez le fichier pour vérifier que la fenêtre défile bien jusqu'à la cellule active.
Cela devrait régler le problème de l'affichage pour que vous puissiez voir directement la cellule active à l'ouverture du fichier.