Formelfehler bei VBA ??

[Fredl55]

Ich habe ein kleines Problem mit der beigefügten Datei. Wenn ich auf Erfassen drück kommt der Code und eine Fehlermeldung das eine Datei fehle. Was hab ich da falsch gemacht.
PS: habe in den bestehe Datei die Rubrik Alk/Dro/So und Beifahrer eingefügt ? Vermutlich hat sich da ein Fehler eingeschlichen

[WillWissen]

Hallo Fredl,

du solltest deine Datei schon als xlsm abspeichern, sonst sind deine Makros weg.

[Käpt'n Blaubär]

Hallo Günter,

ich schätze auch, das hätte er machen sollen.
Oder eben bei *.xls bleiben :19:

Code:

PS: habe in den bestehe Datei die Rubrik Alk/Dro/So und Beifahrer eingefügt ? Vermutlich hat sich da ein Fehler eingeschlichen

Schau Dir mal die uns vorgestellte Datei an, da gibt es keine Knöpsken mehr

[WillWissen]

Hi Peter,

ich glaube, ich war zu voreilig. Hilf mir doch bitte mal auf die Sprünge. Sind bei der Speicherung als .xls (Versionen vor 2007) nicht auch die Makros mit gespeichert worden ? Zumindest in seiner Datei sind die Module und die Formulare noch erhalten.

[Käpt'n Blaubär]

Hallo Günter,

Nur ab Version 2007 gibt es die Erweiterungen mit vier Buchstaben und ab dann wird zwischen xlsx und xlsm unterschieden.
Und dann sind die Makros bei Speichern unter *.xlsx eben futsch.

[Käpt'n Blaubär]

Ups, was ist denn jetzt kaputt???

alles wieder gerichtet. Nur habe ich keine Ahnung, wie es so kommen konnte

[Kuwer]

Hallo Fred,

es fehlen keine Dateien, sondern Controls in der UserForm Erfassung.
Diese sind vorhanden:

ComboBox: cboabgabe
ComboBox: cboSB
ComboBox: cbovorg
ComboBox: cbovorgang
ComboBox: ComboBox1
ComboBox: ComboBox2
CommandButton: CommandButton1
CommandButton: CommandButton2
Label: Label1
Label: Label10
Label: Label11
Label: Label12
Label: Label13
Label: Label2
Label: Label3
Label: Label4
Label: Label5
Label: Label6
Label: Label7
Label: Label8
Label: Label9
TextBox: TextBox10
TextBox: TextBox12
TextBox: TextBox3
TextBox: TextBox4
TextBox: TextBox6
TextBox: TextBox7
TextBox: txtdatum

Diese Zeilen passen nicht. Weder mit den ComboBox-Namen noch mit den Range-Namen! :

.cboeigene.List = Range("Eigene").Value
.cbobeifahrer.List = Range("Beifahrer").Value

Gruß Uwe

[Fredl55]

Jetzt kommt immer die Fehlermeldung mit der Range ?? was muss ich da tun, denke die Schaltflächen stimmen jetzt

[Steffl]

Hallo,

einen Bereich mit dem Namen 'Eigene' gibt es in deiner Tabelle nicht.

Nachtrag: Genauso wie einen Bereich 'Beifahrer'. Dafür gibt es im Namens-Manager einen Bereich 'SB'.
Nachtrag2: Das mit dem Namen hat Dir Uwe ja schon gesagt.

[Fredl55]

Ja schon Klar Stefan, nur hab ich keinen Plan wie ich den Bereich reinbringen kann ????
Das Problem ist das ich mich da nicht so gut um nicht zu sagen kaum auskenne.