XL 2021 affichage à l'ouverture

[flag06]

Bonjour à toutes et tous,
comment puis-je faire en VBA pour que lorsque j'ouvre le fichier ça affiche la page
où se trouve la cellule active ou sélectionnée de la feuille?
en vous remerciant
cordialement

 

[wDog66]

Bonjour flag06,

La cellule active est forcément celle de la feuille active 🤔

Mais pour activer une feuille spécifique, vous mettez dans ThisWorkbook ce code

Private Sub Workbook_Activate()
  ThisWorkbook.Sheets("NomFeuille").Activate
End Sub

A+

 

[Staple1600]

Bonjour le fil, Bonjour @wDog66

[aparté amusé en en passant]
@wDog66
Content de voir que tes neurones sont plus efficaces que ceux de Clea 😉

F

Publié dans la discussion 'macro'

9 Février 2025

merci beaucoup pour votre réponse je vais tester ce code dès que possible
encore merci

• flag06

L'humanité est sauvé (pour le moment) 😉
[/aparté amusé en en passant]

 

[Jean-Eric]

Bonjour,
Une proposition à adapter :

Private Sub Workbook_Open()
Dim ACell As Range, SheetName As String
    Set ACell = ActiveCell
    SheetName = ACell.Parent.Name
    MsgBox "Sélection : " & SheetName & " ; Cellule : " & ACell.Address(0, 0)
End Sub

Cdlt.

 

[Dudu2]

Bonjour,
Une autre solution, dans un module quelconque...

Sub Auto_Open()
    ThisWorkbook.Worksheets("NomFeuille").Activate
End Sub

Exécuté uniquement si le classeur est ouvert manuellement.

 

[flag06]

Bonjour flag06,

La cellule active est forcément celle de la feuille active 🤔

Mais pour activer une feuille spécifique, vous mettez dans ThisWorkbook ce code

Private Sub Workbook_Activate()
  ThisWorkbook.Sheets("NomFeuille").Activate
End Sub

A+

Bonjour flag06,

La cellule active est forcément celle de la feuille active 🤔

Mais pour activer une feuille spécifique, vous mettez dans ThisWorkbook ce code

Private Sub Workbook_Activate()
  ThisWorkbook.Sheets("NomFeuille").Activate
End Sub

A+

Bonjour flag06,

La cellule active est forcément celle de la feuille active 🤔

Mais pour activer une feuille spécifique, vous mettez dans ThisWorkbook ce code

Private Sub Workbook_Activate()
  ThisWorkbook.Sheets("NomFeuille").Activate
End Sub

A+

 

[Staple1600]

Re

Il me semble que par défaut quand on ferme Excel, il mémorise la dernière cellule active.
Donc à sa réouverture, on retrouve la cellule active, non ?

Je viens de faire le test (sans macros)

Et histoire d'atteindre l'heure de l'apéro 😉

Private Sub Workbook_Open()
With Application
    .Goto .ActiveWindow.ActiveCell, True
End With
End Sub

 

[flag06]

bonjour et merci pour votre réponse mais j'ai du mal me faire comprendre car mon problème c'est la position de l'affichage écran
à l'ouverture qui correspond à l'affichage de la dernière fermeture du fichier. lorsque je réouvre mon fichier une macro se lance et active une cellule spécifiée et je voudrais si c'est possible que l'affichage suive. voila ma question.
en vous remerciant

 

[Staple1600]

Re

@flag06
Dans ce cas, rien de simple de joindre un petit fichier exemple (anonymisé).
Et là, tout de suite tu te feras comprendre sans souci 😉