OVH Cloud OVH Cloud

Barre d'état

2 réponses
Avatar
Michel41
Bonjour
Comment récupérer avec VBA, le texte dans la barre d'état (Status...) mis
automatiquement par Excel et Word (n° page, colonne et ligne), bien que cela
ne fonctionne qu'en écriture apparemment ?
Merci. @+
M41

2 réponses

Avatar
Mousnynao
Bonjour,

ex.:
Sub LireBarreEtat()

Dim AncienStatut As Variant

AncienStatut = Application.DisplayStatusBar
MsgBox Application.StatusBar

Application.DisplayStatusBar = True
Application.StatusBar = "Soyez patient s.v.p. ..."
MsgBox Application.StatusBar

Application.StatusBar = False
Application.DisplayStatusBar = AncienStatut

End Sub

mousnynao


Bonjour
Comment récupérer avec VBA, le texte dans la barre d'état (Status...) mis
automatiquement par Excel et Word (n° page, colonne et ligne), bien que cela
ne fonctionne qu'en écriture apparemment ?
Merci. @+
M41





Avatar
Michel41
Bonjour
Cela ne fonctionne pas avec Word
Merci quand même
@+

"Mousnynao" a écrit dans le message de
news:
Bonjour,

ex.:
Sub LireBarreEtat()

Dim AncienStatut As Variant

AncienStatut = Application.DisplayStatusBar
MsgBox Application.StatusBar

Application.DisplayStatusBar = True
Application.StatusBar = "Soyez patient s.v.p. ..."
MsgBox Application.StatusBar

Application.StatusBar = False
Application.DisplayStatusBar = AncienStatut

End Sub

mousnynao


Bonjour
Comment récupérer avec VBA, le texte dans la barre d'état (Status...) mis
automatiquement par Excel et Word (n° page, colonne et ligne), bien que
cela
ne fonctionne qu'en écriture apparemment ?
Merci. @+
M41