Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

VBA: in Combobox Werte voreinstellen... und mehr

99 views
Skip to first unread message

gruene...@yahoo.com

unread,
Jul 19, 2000, 3:00:00 AM7/19/00
to
Hallo Forumsgemeinde!

Ich habe folgende Fragen/Probleme zu VBA mit Excel 97...

1. Wie kann ich in einer DropDownList eines Forms Werte voreinstellen?
Ich habe in einer Combobox die Werte "Januar" bis "Dezember" mit
AddItem bestimmt und möchte, dass z. B. "Januar" gleich drinsteht, wenn
das Form aufpoppt. Momentan zeigt die Combobox defaultmäßig eine leere
Zeile.

2. Thema Fehlerbehandlung:
Ich habe zwar eine On Error-Routine, aber nachdem der User meine
aussagekräftige Fehlermeldung mit Ok bestätigt, landet er auf jeden
Fall im VB-Editor. Zumindest ist das hier auf meiner Installation so...
Lässt sich das machen, dass der User auf jeden Fall in der Excel-
Umgebung bleibt?

3. Dann habe ich einen Druck-Button, der eine Range des Blattes
ausdrucken soll.
Mit
With ActiveSheet.PageSetup
.PrintTitleRows = "'R7':'R8'"
.PrintTitleColumns = ""
End With
wollte ich die ersten beiden Zeilen (in dem Fall Zeilen 7 und 8) dieser
Range als Wiederholungszeilen bestimmen. Das Modul bricht aber ab mit
dem "Laufzeitfehler 1004: Die PrintTitleRows-Eigenschaft des PageSetup-
Objektes kann nicht festgelegt werden."
Wahrscheinlich geht das so nur, wenn man ein komplettes Sheet
ausdruckt, nicht einen Bereich...?
Weiß da jemand eine Lösung?

Für alle Hinweise und Lösungsvorschläge bin ich dankbar! :-)

Grüße
Robert


Sent via Deja.com http://www.deja.com/
Before you buy.

Piet Schmiedel

unread,
Jul 19, 2000, 3:00:00 AM7/19/00
to

<gruene...@yahoo.com> schrieb in im Newsbeitrag:
8l43m1$fqs$1...@nnrp1.deja.com...

> 1. Wie kann ich in einer DropDownList eines Forms Werte voreinstellen?

Vielleicht ComboboxName.value="Wert" oder ComboboxName.selection=1 oder
ähnliches (nur sone Idee)

> 2. Thema Fehlerbehandlung:
> Ich habe zwar eine On Error-Routine, aber nachdem der User meine
> aussagekräftige Fehlermeldung mit Ok bestätigt, landet er auf jeden
> Fall im VB-Editor.

Vermutlich ist Deine OnError-Routine falsch. Schonmal Debugt? Mit On Error
Goto 0 nachher wieder ausgeschaltet? Innerhalb der Routine On Error
abgeschaltet, falls dort ein Fehler auftritt? Was macht Dein Programm denn
nach der Fehlermeldung? Du mußt ja irgendwie weitermachen.

Gruss,
Piet


Eckard Schwarz

unread,
Jul 20, 2000, 3:00:00 AM7/20/00
to

Hallo Robert

1) Me.ComboBox1.ListIndex = 0

2) Beendest du die Fehlerbehandlungsroutine mit "Resume"?

3) With ActiveSheet.PageSetup
.PrintTitleRows = "$7:$8"
.PrintTitleColumns = ""
End With

--
mfg

Eckard Schwarz

<gruene...@yahoo.com> schrieb in im Newsbeitrag:
8l43m1$fqs$1...@nnrp1.deja.com...

> Hallo Forumsgemeinde!
>
> Ich habe folgende Fragen/Probleme zu VBA mit Excel 97...
>

> 1. Wie kann ich in einer DropDownList eines Forms Werte voreinstellen?

> Ich habe in einer Combobox die Werte "Januar" bis "Dezember" mit
> AddItem bestimmt und möchte, dass z. B. "Januar" gleich drinsteht, wenn
> das Form aufpoppt. Momentan zeigt die Combobox defaultmäßig eine leere
> Zeile.
>

> 2. Thema Fehlerbehandlung:
> Ich habe zwar eine On Error-Routine, aber nachdem der User meine
> aussagekräftige Fehlermeldung mit Ok bestätigt, landet er auf jeden

0 new messages