Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
912to916
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
912to916
912to916
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spaltenbreiten in Listbox

Spaltenbreiten in Listbox
10.10.2007 23:11:37
Lars
Hallo Leute,
möchte in einer mehrspaltigen Listbox erreichen, dass alle Spalten die selbe Breite haben wie in
der Tabelle, aus der die daten stammen, dort werden die Spalten mit optimaler Spaltenbreite
formatiert. Schrift in der Tabelle ist gleich schrift in der Listbox.
Danke schon mal.
mfg Lars

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spaltenbreiten in Listbox
11.10.2007 00:14:46
Daniel
Hi
automatisch geht da meines Wissens nach nichts, die änderung der Spaltenbreiten muß per Hand oder vom Makro aus erfolgen.
die Spaltenbreite innerhalb der Listbox wird in der Eigenschaft ColumnWidhts festgelegt, wobei die Breite pro Spalte jeweils in Pt angegeben und durch Semikolon getrennt wird. (dh. die Breite wird für jede Spalte extra angegeben, etwa so:" 60 Pt;60 Pt;60 Pt", das "PT" wird automatisch eingefügt)
für die Umrechung der in Excel angebenen Spaltenbreite der Tabelle in die Spaltenbreite der Listbox musst du noch einen Faktor anwenden, beim mir liegt der in etwa bei 6. dh. das o.g. Beispiel von 60 passt für die Excel-Standarbreite von 10,71.
Gruß, Daniel

Anzeige
AW: Spaltenbreiten in Listbox
11.10.2007 00:19:00
Lars
Hi,
danke schon mal.
Hättest du ein Codebeispiel, bei dem beim Öffnen der Userform die Spalten der Listbox
an die Spalten der Tabelle angepasst werden ?
mfg Lars

AW: Spaltenbreiten in Listbox
11.10.2007 00:35:20
Daniel
Hi
nö, hab ich nicht.
Lies dir mal die OnlineHilfe zu ColumnWidth durch, da ist es dann erklärt, wie der String für die Eingabe aussehen muss.
du musst dann ne kleine Schleife machen, die die Breite der betroffenen Spalten in Excel ermittelt, mit dem erforderlichen Faktor umrechnet und den String passend zusammensetzt.
Gruß, Daniel

Bahnhof, aber welcher?
11.10.2007 00:42:00
Lars
Hi,
danke, verstehe ich leider mangels VBA-Kennung nicht.
mfg Lars

Anzeige
AW: Bahnhof, aber welcher?
11.10.2007 01:34:00
Daniel
Hi
wenn dir das mehr hilft?

Dim Zelle As Range
Dim strCW As String
For Each Zelle In Range(ListBox1.ListFillRange).Rows(1).Cells
strCW = strCW & ";" & Zelle.Width
Next
ListBox1.ColumnWidths = Mid(strCW, 2)


ist allerdings für ne Steuerelement-Listbox.
könnte sein, daß bei einer Userform-Listbox du statt Listbox1.Listfillrange Listbox1.rowsource verwenden musst.
gruß, Daniel

AW: Spaltenbreiten in Listbox
11.10.2007 07:25:25
Beverly
Hi Lars,

ListBox1.ColumnWidths = ActiveSheet.Columns(1).Width & ";" & ActiveSheet.Columns(2).Width & ";" & ActiveSheet.Columns(3).Width


________________________________________

Anzeige
AW: Spaltenbreiten in Listbox
11.10.2007 07:27:00
Beverly
Hi Lars,

ListBox1.ColumnWidths = ActiveSheet.Columns(1).Width & ";" & ActiveSheet.Columns(2).Width & ";" & ActiveSheet.Columns(3).Width


________________________________________

Danke an alle. oT
12.10.2007 16:16:31
Lars
ot

302 Forumthreads zu ähnlichen Themen

@ Tino - brauche Hilfe bei einer deiner Formeln
oblivion

Hallo, ich habe eine Frage an dich. Du hast mir die Formel erstellt in A16.
Ich habe die Datei mal hochgeladen und in Blatt "Beispiel" Spalte A etwas hereingeschrieben.
Danke für deine Hilfe.
Gruß Oblivion
https://www.herber.de/bbs/user/54685.zip
17.08.2008 21:06:00
Thread-ID: 1002466
4 Beiträge
Anzeige
In mehrspaltiger ListBox Einträge in Spalte zählen
Josef

Hallo!
Mit "Label140.Caption = ListBox9.ListCount" kann ich die eingetragenen Zeilen in einer Listbox zählen und in einem Label eintragen lassen.
Ist es möglich, in einer merhspaltigen ListBox Einträge in einer Spalte z.B. Spalte 8 zu zählen.?
Wenn ja, wie würde hier bitte eine VBA...
26.08.2008 12:10:10
Thread-ID: 1004750
4 Beiträge
Bestimmten Wert in einer Zelle finden
Olli

Hallo,
ich lauf gerade wieder mal mit einem Brett vorm Kopf rum und hoffe, mir kann einer hier helfen.
Ich habe in einer Zelle mehrere Werte stehen, die jeweils durch Semikolon getrennt sind (bis zu 15).
Wie kann ich per VBA eine Schleife erstellen, dass solange nach einem Wert gesu...
19.09.2008 08:54:00
Thread-ID: 1010897
5 Beiträge
Anzeige
Formel gesucht: Anzahl vesch. Werte in Zellbereich
Martin

Hallo liebe Excelianer,
gibt es eine Formel, die die Anzahl verschiedener Zelleninhalte für einen Bereich ermittelt? Zum Beispiel wenn ich 15 Zellen hätte, in denen 3mal die 5 steht und 12mal die 7 steht. Da ja nur 2 verschiedene Werte in den 15 Zellen stehen, müsste also 2 herauskommen. Nu...
19.09.2008 13:25:00
Thread-ID: 1011022
4 Beiträge
UDF - pos. oder neg. Wert in ausgeblendet. Bereich
Peter

Guten Abend
Ich möchte mit Hilfe einer Funktion (z.B. yWert) abfragen, ob innerhalb einem benannten Bereich (z.B. "Zahlenteil") positive oder negative Werte in ausgeblendeten Zeilen enthalten sind. Falls dies zutrifft, sollte die Rückgabe der Tabellenname sowie die betreffenden Zelladressen...
26.09.2008 21:20:00
Thread-ID: 1012746
4 Beiträge
Vergleichen mit Funktion WENN
Uwe

Hallo liebe Forummitglieder,
ich habe ein Problem mit vergleichen von Zahlen.
Ich habe schon selbst probiert, aber das haut hinten und vorne nicht hin.
=WENN(ODER(B10=1;"100")WENN(B10=2;"200")WENN(B10=3;"300")WENN(B10=4;"400"))
Ich möchte wenn in B10 1 steht 100, bei 2 200, bei...
01.10.2008 08:25:00
Thread-ID: 1013514
9 Beiträge
Wert der letzten befüllten Zelle in Bereich
Bibo

Hallo EXCEL-Freunde,
ich habe bei excelformeln.de bei Beate Schmitz und Aladin Akyurek abgekupfert und ermittle mit der genauso kurzen wie eleganten Formel =VERWEIS(9^99;A1:F1) oder =VERWEIS(9^99;C1:C10) die letzten Zahlen in den angegebenen Bereichen.
Das klappt auch wunderbar, soweit...
12.10.2008 15:32:39
Thread-ID: 1015865
5 Beiträge
Such in Spalte Ergebnis in listbox
Markus

Hallo zusammen,
hab wieder mal ein Problem.
Hab ne Userform mit mehreren Textboxen und einer Listbox
In Textbox1 steht mein Suchtext das makro sucht nun im angegebenen Arbeitsblatt nach dem Text und
schreibt mir alle Daten aus der Gefundenen Zeile in Textboxen.
Hab nun fest...
14.10.2008 11:24:35
Thread-ID: 1016271
3 Beiträge
Anzeige

Links zu Excel-Dialogen

ListBox UserForm

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
4
3
4
4
3
3
8
4
2
4
4
3
2
5
3
2
8
13
10
4
5
4
2
3