1. Liebe Forumsgemeinde,

    aufgrund der Bestimmungen, die sich aus der DSGVO ergeben, müssten umfangreiche Anpassungen am Forum vorgenommen werden, die sich für uns nicht wirtschaftlich abbilden lassen. Daher haben wir uns entschlossen, das Forum in seiner aktuellen Form zu archivieren und online bereit zu stellen, jedoch keine Neuanmeldungen oder neuen Kommentare mehr zuzulassen. So ist sichergestellt, dass das gesammelte Wissen nicht verloren geht, und wir die Seite dennoch DSGVO-konform zur Verfügung stellen können.
    Dies wird in den nächsten Tagen umgesetzt.

    Ich danke allen, die sich in den letzten Jahren für Hilfesuchende und auch für das Forum selbst engagiert haben. Ich bin weiterhin für euch erreichbar unter tti(bei)pcwelt.de.
    Dismiss Notice

Formate in UserForm-Listbox

Discussion in 'Office-Programme' started by moritz20010, Nov 9, 2010.

Thread Status:
Not open for further replies.
  1. Hallo zusammen,
    ich habe eine UserForm mit u.a. einer ListBox mit 4 Spalten zur Auswahl von gespeicherten Rechnungen eingerichtet.
    Beim Starten (füllen) der Listbox werden die Spalten so ausgefüllt, wie in der Tabelle gespeichert .
    Beispiel:
    Sp1 Datum | Sp2 Rechnungsart | Sp3 Re-Summe | Sp4 Überw-Dat.
    25.09.2010 | Rechnung Stadtwerke | 148,77 € | 04.10.2010

    Code in UserForm
    …
    .ListBox1.AddItem Cells(lng, 1).Value
    .ListBox1.Column(1, i) = Cells(lng, 2).Value
    .ListBox1.Column(2, i) = Cells(lng, 3).Value
    .ListBox1.Column(3, i) = Cells(lng, 4).Value
    .ListBox1.Column(4, i) = Cells(lng, 5).Row
    …
    Anzeige in der Listbox
    25.09.2010 | Rechnung Stadtwerke | 148,7658 | 04.10.2010

    Code in UserForm
    …
    .ListBox1.AddItem Cells(lng, 1).Value
    .ListBox1.Column(1, i) = Cells(lng, 2).Value
    .ListBox1.Column(2, i) = Cells(lng, 3).Text
    .ListBox1.Column(3, i) = Cells(lng, 4).Value
    .ListBox1.Column(4, i) = Cells(lng, 5).Row
    …
    Anzeige in der Listbox
    25.09.2010 | Rechnung Stadtwerke | 148,77€ | 04.10.2010
    Wird die Spalte als Textwert übernommen, dann ist die Anzeige der Summe nicht mehr rechtsbündigt.


    Gibt es eine Möglichkeit die Daten „formatiert“ an die Listbox zu übergeben?
    Ich benutze MS-Office2003.

    Gruß Moritz
    :bitte:
     
Thread Status:
Not open for further replies.

Share This Page