MS-Office-Forum

Zurück   MS-Office-Forum > Microsoft Access & Datenbanken > Microsoft Access
Registrieren Forum Hilfe Alle Foren als gelesen markieren

Banner und Co.

Antworten
Ads
Themen-Optionen Ansicht
Alt 09.02.2019, 22:01   #1
Debus
MOF Koryphäe
MOF Koryphäe
Standard Acc2016 - Objekt erforderlich

Hallo,

warum klappt der folgende Code nicht!

Ziel ist es alle Forms zu schliessen ausser das Form frmnavi und das Form frmliste

Hier ist der Code

Code:

For Each Frm In Forms
    
    If Frm.Name <> "frmnavi" Or Frm.Name <> "frmliste" Then
        formname = Frm.Name
        DoCmd.Close acForm, formname
        Exit For
    End If
Next Frm
Danke
Holger
Debus ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 09.02.2019, 22:12   #2
ebs17
MOF Guru
MOF Guru
Standard

Bist Du sicher, dass Forms eine Auflistung aller geöffneten Formulare wiedergibt?

__________________

Ein freundliches Glück Auf!

Eberhard

Abfrageperformance ist kein Geheimnis
SQL ist leicht: {0}:{1}:{2}:{3}:{4}:{5}:{6}:{7}:{8}:{9}:{10}:{11}
Dein Dankeschön: DBWiki=>Spende
ebs17 ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 09.02.2019, 22:18   #3
Debus
Threadstarter Threadstarter
MOF Koryphäe
MOF Koryphäe
Standard

Ja,

Habe leider was vergessen

Code:

 Dim Frm As Form
 Dim formname As String
 
 
listID = Me.lst1.Column(0)
  
For Each Frm In Forms
    If Frm.Name <> "frmnavi" Then
        formname = Frm.Name
        DoCmd.Close acForm, formname
        Exit For
    End If
Next Frm


DoCmd.OpenForm "frmEingabe", acNormal, , "[ID] =" & listID
Danke
Debus ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 09.02.2019, 22:44   #4
ebs17
MOF Guru
MOF Guru
Standard

Woraus beziehst Du Deine Sicherheit?

(Nicht nur) Nebenbei: Welche Zeile wird denn als Fehler gekennzeichnet?
(Wenn man selber nichts weiß, heißt das nicht, dass andere dann alles wissen inklusive des Bildschirminhaltes und der Gedanken im Kopf.)

__________________

Ein freundliches Glück Auf!

Eberhard

Abfrageperformance ist kein Geheimnis
SQL ist leicht: {0}:{1}:{2}:{3}:{4}:{5}:{6}:{7}:{8}:{9}:{10}:{11}
Dein Dankeschön: DBWiki=>Spende
ebs17 ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 09.02.2019, 22:49   #5
Debus
Threadstarter Threadstarter
MOF Koryphäe
MOF Koryphäe
Standard

Auch hier ein Dankeschön an Dich!!!!!

Durch das umstellen auf Daten eingeben Nein läuft auch das

warum auch immer, aber nun funktioniert diese Funktion komplet


Schönen Abend wie gesagt noch
Debus ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 10.02.2019, 10:44   #6
CatboyJones
MOF Profi
MOF Profi
Standard

Klasse, das mit der Ananas war die Lösung!

CatboyJones ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 10.02.2019, 14:48   #7
Beaker s.a.
MOF Koryphäe
MOF Koryphäe
Standard

@Debus

Zitat:

warum auch immer, aber nun funktioniert diese Funktion komplet

Es fragt sich allerdings auch noch, wozu du ein NaviForm verwendest und
dann trotzdem Formulare ausserhalb öffnest. Nach PopUps sieht das nicht
aus, und das im NaviForm aktuell angezeigte erreichst du über Forms-
Auflistung auch nicht.
Ausserdem wird auch nur ein einziges Formular geschlossen, da du die
Schleife sofort verlässt. Im zuerst gezeigten Code wird i.Ü. auch eins der
beiden ausgeschlossenen Formulare geschlossen, je nach Reihenfolge in
der Auflistung; - muss And statt Or heissen.
Und was der DataMode damit zu tun haben soll erschliesst sich mir auch nicht.

@Eberhard

Zitat:

dass Forms eine Auflistung aller geöffneten Formulare wiedergibt?

Im Prinzip schon, nur das Form im NaviForm (s.o.) steht da nicht drin. Ich
denke das meintest du, - oder?

gruss ekkehard

__________________

--
S.M.I.²L.E.
Beaker s.a. ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 10.02.2019, 16:31   #8
ebs17
MOF Guru
MOF Guru
Standard

@ekkehard: An der Stelle meinte ich gar nichts konkret. Allerdings sollte man bei der Fehlermeldung schauen, was Objekt sein kann, um alles daran zu hinterfragen, idealerweise selbständig. Hinterfragen müsste man auch einen hinterlegten Glauben.

__________________

Ein freundliches Glück Auf!

Eberhard

Abfrageperformance ist kein Geheimnis
SQL ist leicht: {0}:{1}:{2}:{3}:{4}:{5}:{6}:{7}:{8}:{9}:{10}:{11}
Dein Dankeschön: DBWiki=>Spende
ebs17 ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 10.02.2019, 19:51   #9
Debus
Threadstarter Threadstarter
MOF Koryphäe
MOF Koryphäe
Standard

Hallo,

es ist richtig, da durch die Steuerung des NaviForm immer nur ein weiteres Formular geöffnet sein kann ausser das NaviForm! Somit ist da alles ok!

Ich weiss nur, das nun die Steuerung komplett richtig läuft.

Danke nochmal
Debus ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 11.02.2019, 11:59   #10
Beaker s.a.
MOF Koryphäe
MOF Koryphäe
Standard

Hallo Eberhard,

Zitat:

schauen, was Objekt sein kann

Das habe ich ja auch als erstes gemacht. Die Forms-Auflistung ist eine Eigenschaft
des Application-Objektes. Das ist, soweit ich weiss, das Standardobjekt und muss
deshalb nicht zwingend referenziert werden. Daher rührte dann meine Frage.
gruss ekkehard

__________________

--
S.M.I.²L.E.
Beaker s.a. ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Ads
Antworten


Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Besucher: 1)
 
Themen-Optionen
Ansicht

Forumregeln
Es ist Ihnen nicht erlaubt, neue Themen zu verfassen.
Es ist Ihnen nicht erlaubt, auf Beiträge zu antworten.
Es ist Ihnen nicht erlaubt, Anhänge anzufügen.
Es ist Ihnen nicht erlaubt, Ihre Beiträge zu bearbeiten.

vB Code ist An.
Smileys sind An.
[IMG] Code ist An.
HTML-Code ist An.
Gehe zu


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:18 Uhr.


Partner und Co.
Access-Paradies -Alles rund um die Datenbank Microsoft Access -Code -Programme-Tools -Tipps   Kostenlose Tipps & Tricks, Downloads und Programme   www.kulpa-online.com - Tipps - Tricks - Tutorials - Meinungen - Downloads uvm...   vb@rchiv · Willkommen in der Welt der VB Programmierung   Access-Garhammer - Hier finden Sie jede Menge Beispiel-Datenbanken zu Access und mehr ...   mcseboard.de   Die Top Seite für Excel-VBA-Makros uvm.

Powered by: vBulletin Version 3.6.2 (Deutsch)
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.

Copyright ©2000-2018 MS-Office-Forum. Alle Rechte vorbehalten.
Copyright ©Design: Manuela Kulpa ©Rechte: Günter Kramer
Eine Verwendung der Inhalte in anderen Publikationen, auch auszugsweise,
ist ohne ausdrückliche Zustimmung der Autoren nicht gestattet.