Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Komboboxen via Button: Laufzeitfehler 7777
zurück: Kombifeld mit Textfeld überlagern: Schönheitsfehler weiter: Daten mit Abfrage für Diagramm vorbereiten Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
jugendsani
Im Profil kannst Du frei den Rang ändern


Verfasst am:
24. Apr 2012, 15:12
Rufname:

Komboboxen via Button: Laufzeitfehler 7777 - Komboboxen via Button: Laufzeitfehler 7777

Nach oben
       Version: Office 2007

Hallo,
ich möchte via Button in einer Kombobox den nächsten Eintrag auswählen, der Code sieht so aus:
Code:
Private Sub Befehl11_Click()
    DoCmd.RunCommand acCmdSaveRecord
    id_Frage.SetFocus
    vListenindex = id_Frage.ListIndex
    Select Case id_Frage.ListIndex
      Case Is = -1
        id_Frage.ListIndex = 0
      Case Is = 6
        MsgBox "Alle Textfragen wurden eingegben, Sie werden weitergeleitet!"
        DoCmd.OpenForm "frm_Erfassung2"
        DoCmd.Close acForm, "frm_Erfassung1"
      Case Else
        DoCmd.RunCommand acCmdRecordsGoToNew
        Umzugsart = vUmzugsart
        MsgBox vListenindex
        id_Frage.ListIndex = vListenindex + 1
    End Select
End Sub
Als Antwort liefert mir Access einen netten Laufzeitfehler Sad

Hat jemand eine Idee, wo hier der Fehler liegen könnte?

Viele Grüße
jugendsani
KlausMz
Moderator Access


Verfasst am:
24. Apr 2012, 15:32
Rufname:
Wohnort: Irgendwo in der Pfalz


AW: Komboboxen via Button: Laufzeitfehler 7777 - AW: Komboboxen via Button: Laufzeitfehler 7777

Nach oben
       Version: Office 2007

Hallo,
der nette Laufzeitfehler hat doch bestimmt auch einen netten Text.
Es wäre nett gewesen, wenn Du den auch gezeigt hättest.

_________________
Gruß
Klaus . . . . . Feedback wäre wünschenswert.
Ich möchte bitte keine unaufgeforderten PN. Fragen bitte im Forum.
jugendsani
Im Profil kannst Du frei den Rang ändern


Verfasst am:
02. Mai 2012, 08:51
Rufname:

AW: Komboboxen via Button: Laufzeitfehler 7777 - AW: Komboboxen via Button: Laufzeitfehler 7777

Nach oben
       Version: Office 2007

Hi!

Sorry für die späte Antworte. Durch den Brückentag haben sich ein paar Tage Urlaub durchaus angeboten Smile
Die Fehlermeldung lautet:
Zitat:
Laufzeitfehler '7777':
Sie haben die ListIndex-Eigenschaft falsch verwendet.
Viele Grüße
jugendsani
MissPh!
Office-VBA-Programmiererin


Verfasst am:
02. Mai 2012, 10:08
Rufname:
Wohnort: NRW

AW: Komboboxen via Button: Laufzeitfehler 7777 - AW: Komboboxen via Button: Laufzeitfehler 7777

Nach oben
       Version: Office 2007

Hallo,

hier fehlen offensichtlich die Kenntnisse über den Umgang mit einem Kombifeld und der Bedeutung seiner Eigenschaften.
Mit Klick auf das Wort "Listindex" und Drücken der F1-Taste kommst du in die Access-Hilfe.
Dort findest du einen Hinweis wie folgt:
Access-Hilfe hat folgendes geschrieben:
Mit der ListIndex-Eigenschaft können Sie herausfinden, welches Element in einem Listenfeld oder Kombinationsfeld ausgewählt ist. Schreibgeschützter Long-Wert.

Die Auswahl eines Eintrags in der Liste kann über direkte Wertzuweisung erfolgen.

_________________
Gruß MissPh!
jugendsani
Im Profil kannst Du frei den Rang ändern


Verfasst am:
02. Mai 2012, 16:20
Rufname:


AW: Komboboxen via Button: Laufzeitfehler 7777 - AW: Komboboxen via Button: Laufzeitfehler 7777

Nach oben
       Version: Office 2007

Hi!

Kann ich das dann so umgehen, dass ich meine Variable vorher addiere und dann reinziehe?
Code:
    '...
      Case Else
        DoCmd.RunCommand acCmdRecordsGoToNew
        Umzugsart = vUmzugsart
        MsgBox vListenindex
        vListenindex = vListenindex + 1
        id_Frage.ListIndex = vListenindex
    End Select
End Sub
MissPh!
Office-VBA-Programmiererin


Verfasst am:
02. Mai 2012, 22:07
Rufname:
Wohnort: NRW

AW: Komboboxen via Button: Laufzeitfehler 7777 - AW: Komboboxen via Button: Laufzeitfehler 7777

Nach oben
       Version: Office 2007

So wie ich den Hinweis aus der Access-Hilfe verstehe (und wie es mir im Test bestätigt wurde), ist die Eigenschaft schreibgeschützt, d.h. du kannst sie auslesen, aber nicht setzen. Da nützt es auch nichts, wenn du eine Variable einsetzt oder sonstige Umwege versuchst.
_________________
Gruß MissPh!
Marmeladenglas
komme zurecht


Verfasst am:
02. Mai 2012, 22:19
Rufname:

AW: Komboboxen via Button: Laufzeitfehler 7777 - AW: Komboboxen via Button: Laufzeitfehler 7777

Nach oben
       Version: Office 2007

@MissPH:
es findet sich aber auch dieses Beispiel in der Hilfe.
Code:
Private Sub CommandButton2_Click()
    'Ensure ListBox contains list items
    If ListBox1.ListCount >= 1 Then
        'If no selection, choose last list item.
        If ListBox1.ListIndex = -1 Then
'........................................................
            ListBox1.ListIndex = ListBox1.ListCount - 1
'.........................................................
        End If
        ListBox1.RemoveItem (ListBox1.ListIndex)
    End If
End Sub
MissPh!
Office-VBA-Programmiererin


Verfasst am:
02. Mai 2012, 22:32
Rufname:
Wohnort: NRW

AW: Komboboxen via Button: Laufzeitfehler 7777 - AW: Komboboxen via Button: Laufzeitfehler 7777

Nach oben
       Version: Office 2007

Hi,

hier geht es aber um ein Kombinationsfeld, nicht um ein Listenfeld, das muss man wohl unterscheiden.

Die Hilfe ist in der Tat nicht ganz eindeutig in dieser Beziehung, aber ganz offensichtlich geht es nicht.
Da muss man also eine andere Lösung finden, indem man dem Kombifeld den nächsten Wert in der Liste zuweist.

So könnte es gehen:
Code:
    Me.cbo = Me.cbo.Column(0, Me.cbo.ListIndex + 1)
wenn die gebundene Spalte auf 1 eingestellt ist.

PS:
Soeben getestet, beim Listenfeld funktioniert das problemlos!

_________________
Gruß MissPh!
Marmeladenglas
komme zurecht


Verfasst am:
02. Mai 2012, 23:20
Rufname:

AW: Komboboxen via Button: Laufzeitfehler 7777 - AW: Komboboxen via Button: Laufzeitfehler 7777

Nach oben
       Version: Office 2007

Hi,
ich habe das mal nachgebaut, der ursprüngliche Code funktioniert im Beispiel ohne Fehlermeldung.



Database1.zip
 Beschreibung:

Download
 Dateiname:  Database1.zip
 Dateigröße:  16.26 KB
 Heruntergeladen:  30 mal

jugendsani
Im Profil kannst Du frei den Rang ändern


Verfasst am:
03. Mai 2012, 08:10
Rufname:

Re: AW: Komboboxen via Button: Laufzeitfehler 7777 - Re: AW: Komboboxen via Button: Laufzeitfehler 7777

Nach oben
       Version: Office 2007

Hi Marmeladenglas,

ich hab einfach mal deinen Code jetzt kopiert und was kommt: Laufzeitfehler 7777 Sad
MissPh!
Office-VBA-Programmiererin


Verfasst am:
03. Mai 2012, 11:48
Rufname:
Wohnort: NRW

AW: Komboboxen via Button: Laufzeitfehler 7777 - AW: Komboboxen via Button: Laufzeitfehler 7777

Nach oben
       Version: Office 2007

Hi.

Was passiert, wenn du ihn nicht kopierst, sondern direkt im Beispiel testest?
Wenn das klappt, was hast du geändert?

Das Beispiel läuft in A2010 und A2003. Aber ohne SetFocus geht es bspw. nicht.

_________________
Gruß MissPh!
jugendsani
Im Profil kannst Du frei den Rang ändern


Verfasst am:
03. Mai 2012, 15:47
Rufname:


AW: Komboboxen via Button: Laufzeitfehler 7777 - AW: Komboboxen via Button: Laufzeitfehler 7777

Nach oben
       Version: Office 2007

Ich weiß nicht warum... aber nun geht es...

Danke an alle! Smile
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Kombifeld mit Button 8 fossiebaer 285 01. Apr 2011, 09:44
fossiebaer Kombifeld mit Button
Keine neuen Beiträge Access Tabellen & Abfragen: Laufzeitfehler 3075 (Komma) in Abfrageausdruck 3 stan_1958 1219 13. Jan 2011, 19:05
stan_1958 Laufzeitfehler 3075 (Komma) in Abfrageausdruck
Keine neuen Beiträge Access Tabellen & Abfragen: ODBC-Zugriff auf SQL Server; Laufzeitfehler 3146 2 Jay-F 2126 28. Okt 2010, 15:07
Gast ODBC-Zugriff auf SQL Server; Laufzeitfehler 3146
Keine neuen Beiträge Access Tabellen & Abfragen: Access-Abfrage - Inhalte via wenn-Funktion umbenennen 2 Orti81 901 03. Aug 2010, 15:11
Orti81 Access-Abfrage - Inhalte via wenn-Funktion umbenennen
Keine neuen Beiträge Access Tabellen & Abfragen: Laufzeitfehler 3085 - Undef. Funktion CONVERT 4 noob80 997 19. Feb 2010, 18:38
noob80 Laufzeitfehler 3085 - Undef. Funktion CONVERT
Keine neuen Beiträge Access Tabellen & Abfragen: Excel Tabellen per Button miteinander verknüpfen 0 Sebastian23 1096 18. Feb 2010, 16:08
Sebastian23 Excel Tabellen per Button miteinander verknüpfen
Keine neuen Beiträge Access Tabellen & Abfragen: Formatieren eine PivotCharts via VBA 0 TFree 189 16. Okt 2009, 12:48
TFree Formatieren eine PivotCharts via VBA
Keine neuen Beiträge Access Tabellen & Abfragen: Access: SQL-Anfügeabfrage via Button ausführen 10 philbo 3541 22. Jan 2009, 14:45
philbo Access: SQL-Anfügeabfrage via Button ausführen
Keine neuen Beiträge Access Tabellen & Abfragen: Kriterium per Button im Formular zur Laufzeit ändern 8 ghostX 702 28. Nov 2008, 16:47
ghostX Kriterium per Button im Formular zur Laufzeit ändern
Keine neuen Beiträge Access Tabellen & Abfragen: Laufzeitfehler 3109, Datensatz nicht zu löschen 0 Mitch26 407 31. Okt 2008, 18:45
Mitch26 Laufzeitfehler 3109, Datensatz nicht zu löschen
Keine neuen Beiträge Access Tabellen & Abfragen: Button VBA Code zum Verknüpfen aller ODBC -Tabellen 3 adamth 3953 08. Sep 2008, 13:10
rita2008 Button VBA Code zum Verknüpfen aller ODBC -Tabellen
Keine neuen Beiträge Access Tabellen & Abfragen: Mehrere unique Pin-codes per Button erstellen lassen 0 Musi 900 21. Mai 2008, 12:26
Musi Mehrere unique Pin-codes per Button erstellen lassen
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Excel Tricks