VBA/Office 2003: MsgBox-Größe

Computer: Software & Programmierung Visual Basic
1

Moin,

zwei Fragen dazu:

  1. Die max. Textlänge einer MsgBox ist 1007 Zeichen, darüber wird es abgeschnitten. Kann man das ändern?
  2. Kann man die durch geeignete Formatierung Teile des MsgBox-Textes formatieren, z.B. Fett oder andere Farbe (als schwarz).

Danke
Laika

2

Hallo Laika,

  1. Die max. Textlänge einer MsgBox ist 1007 Zeichen, darüber
    wird es abgeschnitten. Kann man das ändern?

ich gehe im Gegensatz zum einen Beitrags im nachfolgenden Link
http://www.wintotal-forum.de/f23/msgbox-vba-excel-55911
von max. 1023 Zeichen in der Win-MsgBox aus. Schau mal hier:

Sub aa()
Dim Inhalt As String
Inhalt = String(1019, „i“) & „Ende“ & „Nix“
MsgBox Inhalt
Inhalt = String(1019, „M“) & „Ende“ & „Nix“
MsgBox Inhalt
End Sub

Wie das in der API-MsgBox ist weiß ich nicht. Ich weiß auch nicht ob man in der API-MsgBox Inhalt unterschiedlich formatieren kann.

  1. Kann man die durch geeignete Formatierung Teile des
    MsgBox-Textes formatieren, z.B. Fett oder andere Farbe (als
    schwarz).

Bau wie im Link gesagt eine Userform mit einer TextBox und einem CommendButton für das „Ok“.
Die Titelzeile der UF kannste nicht anzeigen lassen mit API.

Gruß
Reinhard

3

N’abend Reinhard,

Schau mal hier:

Sub aa()
Dim Inhalt As String
Inhalt = String(1019, „i“) & „Ende“ & „Nix“
MsgBox Inhalt
Inhalt = String(1019, „M“) & „Ende“ & „Nix“
MsgBox Inhalt
End Sub

Ja, sowas Ähnliches habe ich schon gemacht, kann man genau die Grenze ermitteln (oder in der Doku irgendwo lesen :wink:)

Bau wie im Link gesagt eine Userform mit einer TextBox und
einem CommendButton für das „Ok“.

Danke, hatte ich auch schon gedacht, ist ja auch ziemlich einfach - wenn denn die Textbox in einer Userform mehr als 1024 Zeichen kann. Werde ich also bei Gelegenheit mal machen. Zur Zeit ist das in einer selten benutzten Nebenfunktion.
Eine Mehrzeiligkeit wie im Link gesagt, nützt natürlich nichts. Die Zeilenvorschübe (vbLf) werden ja mitgezählt!

Die Titelzeile der UF kannste nicht anzeigen lassen mit API.

Das kann dann ja eine zweite Textbox sein

Gruss und schöne Festtage
Laika

4

Userform mit Label
Moin Reinhard,

habe jetzt mal eine Userform mit Labels definiert: Eines für die Überschrift, eines für die variabel lange Liste. Mit HEIGHT und CAPTION kann ich die Liste des Labels 2 beliebig manipulieren, und es sieht so aus, dass ich da mehr als die 1024 Zeichen rein packen kann.
Mit einer TextBox wird das vielleicht auch gehen.

Gruss und schöne Festtage
Laika