Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1588to1592
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Text in Status Bar zentrieren
05.11.2017 09:15:16
Mister-B
Hallo und guten Morgen,
ist es möglich einen Text im Status Bar zu zentrieren und wenn, ja wie?
Danke und Gruß Martin

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
nicht ganz ...
05.11.2017 09:45:39
Matthias
Hallo
Die Länge des Strings ist Limitiert!
Anbei ein Beispiel dafür
Option Explicit
Sub MyStatusbar()
Dim myTxt$, WDH&
On Error GoTo Fehler
WDH = InputBox("Leerzeichenmultplikator für Leerzeichenwiederholung in Länge des Strings")
myTxt = "Das ist mein Text"
If Not IsNumeric(WDH) Then Exit Sub
If (WDH * Len(myTxt)) + (Len(myTxt)) > 255 Then
MsgBox "Zeichelänge zu groß! >=255", vbCritical, " Limit ..."
Application.StatusBar = False
Exit Sub
Else
Application.StatusBar = Application.WorksheetFunction.Rept(" ", WDH * Len(myTxt)) & myTxt
Debug.Print (WDH * Len(myTxt)) + (Len(myTxt)) 'Optional
End If
Exit Sub
Fehler:
Application.StatusBar = False
End Sub
Gruß Matthias
Anzeige
AW: nicht ganz ...
05.11.2017 12:22:47
Mister-B
Hallo Matthias,
schade darum. Ich muss mich damit abfinden, dass es nicht geht. Danke trotzdem.
Gruß
Martin

44 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige