Office: (Office 2010) Listenfeld: optimale Spaltenbreite und dynamische Spaltenanzahl

Hallo zusammen,

ich habe auf einem Formular zwei Textfelder eingerichtet. In denen kann man sich zwei Datumsangaben tätigen (DatVon und DatBis). Auf Buttonklick wird dann ein SQLString gebildet, der eine Abfrage gegen das Backend laufen lässt, um die Belegung von Ferienwohnungen anzuzeigen.

Der SqlString wird dann als Rowsource eines Listenfeldes eingesetzt.

Soweit klappt alles hervorragend. Nun habe ich aber noch 2 Probleme in der Darstellung.

1) Wie kann kann ich im Listenfeld die Spaltenbreiten per VBA (dynamisch) optimal anpassen?

2) Wie kann ich die Spaltenanzahl dynamisieren, da die angezeigten Zeiträume unterschiedlich sein können?


Code:

Code:

WÄRE EINE REALISIERUNG ÜBER EIN ENDLOS-UFO EBTL: GÜNSTIGER???
Zúmal ich dann noch einige Sachen formatieren will (bedingte Formatierung, usw.)?

:)

 

Hi,

eine automatische Anpassung der Spaltenbreiten kennt das Listfeld nicht, die müsste programmiert werden. Das ginge z.B, indem du ein Recordset öffnest, das die Maximallänge der Feldwerte ermittelt:
Schema:
Code:

Die so ermittelten Angaben sind Buchstabenanzahlen. Die kannst du über den Daumen in cm umrechnen, die als Spaltenbreite nutzbar sind. Bei einer unproportionalen Schriftart geht das sogar genau.

Die anzuzeigenden Spalten entnimmt das Listfeld der Datenquelle. Wenn die die richtigen Werte zeigt, dann tut es das Listfeld auch. Die ggf. noch nachzustellende Listfeld-Eigenschaft wäre die Spaltenanzahl.

Eine Alternative zum Listfeld wäre das Listview. Das bietet dynamische Spaltenbreiten von sich aus. Auch die Spalten selbst ließen sich dynamisch warten. Der Code wird aber ungleich komplizierter.

Und wenn ich das alles richtig deute, willst du das Listfeld ja nur benutzen, um einen Zeitbereich zu visualisieren. Dafür gibt es ganz andere Möglichkeiten.

 

Hallo Martin,

Du hast mich richtig gedeutet. Welche Optionen schlägst Du vor, insbesondere vor dem Hintergrund, dass ich dann doch Felder bedingt formatieren möchte (frei = grün, belegt = rot)?

VG JJ

 

Such mal im Forum nach Gantt. Dieses Diagramm stellt solche Zeitblöcke grafisch dar.
Gerade neulich gefragt: Acc2010 - Kalender Report - MS-Office-Forum

 

OK, Danke erstmal für Deine Mühe.

Ich versuchs mal mit nem UFO als Endlosformular.

Leider bekomme ich dort aber direkt nen Fehler, wenn ich das UFbefüllen lassen möchte:

Code:

Was mache ich falsch??? *mad.gif* *mad.gif* *mad.gif*

 

Code:

strSQL muss dabei natürlich auch ein brauchbarer SQL-String sein *wink.gif*

 

Selbstredend *tongue.gif* . SQLSTR hab ich mir per Debug.print ausgeben lassen und auf dem Backend (SQLSRV) erfolgreich laufen lassen.

Nur zur Vollständigkeit hier ein konkretes Bsp:
Code:

Es ist nach der Änderung nun so, dass zwar keine Fehlermeldung mehr kommt, aber das UFO (Endlosformular) führt keine Daten zur Anzeige???

 

Liefert die SQL denn Sätze, wenn du sie separat ausführst?

Wenn ja: ist das Ufo an das HF gelinkt (Eigenschaften Verknüpfen von und -nach)? Dann wirkt zur Ufo-SQL ja auch noch diese Abhängigkeit vom aktuellen HF-Satz.

 

Wenn ich Sie separat ausführe liefert sie Datensätze => konnte ich auch schon beim Listenfeld überprüfen.

Link HF und UFO ist m. E. auch nicht vorhanden.

 

Hier die ADP.

 

Das ist keine Erachtens-, sondern Prüfungssache... ich guck mal.

 

Dein Ufo hat keine Controls.... das hat einen Mangel an Anzeige zur Folge... *rolleyes.gif*

 

Logisch. *rot werd*. Ich mach mal lieber Schluss für heute.

Allerdings stehe ich da vor dem nächsten Problem, da ich schließlich mit einer dynamischen Anzahl von Zeilen und Spalten arbeiten will.

Gar nicht so einfach, die Darstellung von Belegungsdaten.

 

Die Zeilen sind die Zeilen der Abfrage. Das macht das Formular schon.

Die Spalten hingegen muss das Formular kennen. Im genannten Link wird ein Weg gezeigt (was da für Berichte steht, gilt auch für Formulare).

Kurz: es wird auf eine Maximalzahl von z.B. 31 Dummy-Textfeldern herauslaufen, die die Tage 1-31 des darzustellenden Zeitraums darstellen. Damit wäre dann max. 1 Monat darstellbar. Größere Zeiträume erfordern mehr Textfelder.

 

Danke, nice Weekend.