Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

VBA in Access - IF Verzweigung

Frage Entwicklung Datenbanken

Mitglied: EXXON

EXXON (Level 1) - Jetzt verbinden

08.02.2006, aktualisiert 09.02.2006, 6528 Aufrufe, 7 Kommentare

Probleme mit if-verzweigung

Hallo,

ich hab nen Problem mit folgender if Verzweigung:

If Me!Identcode.Value = DLookup("Identcode", "Scandaten") Then
MsgBox "Achtung: Wert ist doppelt"
Else
DoCmd.RunMacro "Speichern"
End If

Also wenn die Schleife ausgeführt wird, wird jedesmal das Makro ausgeführt egal ob der if Wert True oder False ist ohne das die Message-Box ausgeführt wird. Kann mir jemand dabei helfen das die MsgBox ausgeführt wird wenn der if wert true ist?

Vielen dank im Vorraus,

Matthias
Mitglied: verkehrsberuhigt
08.02.2006 um 16:21 Uhr
Also wenn die Schleife ausgeführt wird,
wird jedesmal das Makro ausgeführt egal
ob der if Wert True oder False ist

Das zu glauben fällt mir schwer...
Vielmehr denke ich, dass Du beim DLOOKUP-Aufruf noch ein (Vergleichs-)Kriterium angeben musst.
Aber mit einem DEBUG sollte das doch schnell zu klären sein?!
Bitte warten ..
Mitglied: EXXON
09.02.2006 um 10:12 Uhr
kannst du mir vieleicht mal den syntax mit nem beispiel geben? ich weiß nicht wo da der fehler sein könnte.

Erklärung zu den Gegebenheiten:
also in das feld identcode wird eine zahl eingegeben welche in der tabelle Scandaten im Feld Identcode nachgeschaut werden soll und mit dem identcode.value verglichen werden soll.
Bitte warten ..
Mitglied: verkehrsberuhigt
09.02.2006 um 10:28 Uhr
Hallo

kannst du mir vieleicht mal den syntax mit
nem beispiel geben? ich weiß nicht wo
da der fehler sein könnte.

Ich will es versuchen...
Zu Beginn würde ich folgendes versuchen:

Vorhanden = DLookup("Identcode", "Scandaten", "Identcode = """ & Me!Identcode.Value & """)
If Me!Identcode.Value = Vorhanden Then
MsgBox "Achtung: Wert ist doppelt"
Else
DoCmd.RunMacro "Speichern"
End If

Das geht natürlich eleganter aber ich hoffe, dass es so besser verständlich ist.
Bitte warten ..
Mitglied: EXXON
09.02.2006 um 10:45 Uhr
Vorhanden = DLookup("Identcode", "Scandaten", "Identcode = """ & Me!Identcode.Value & """)

verständlich wars schon ;)
aber da kommt ne fehlermeldung bei deinem code in der zeile oben
"Syntaxfehler"

habe aber inzwischen über ne msgbox rausgefunden das der lookup-befehl von mir immer die selbe zahl produziert die nichts mit der anderen (eingegebenen) zahl zu tun hat. Die zahl von me!identcode.value ist richtig!
Bitte warten ..
Mitglied: verkehrsberuhigt
09.02.2006 um 10:57 Uhr
a) Vermutlich fehlt in meiner Zeile ein abschliessenden Anführungszeichen
b) Geliefert bekommst Du vermutlich aus dem ersten Datensatz den Wert aus dem Feld Identcode oder?
Bitte warten ..
Mitglied: EXXON
09.02.2006 um 11:21 Uhr
a) hab ich schon probiert hat aber keinen brauchbaren ergebnisse zurückgeliefert bzw. fehlermeldung
b) nach dem code suche ich: 721427503916 herauskommt: 63604591364
die zahl die herauskommt ist mitten in der tabelle auserdem ist die zahl nur elf Stellen lang anstatt 12 wie es sein sollte (fehler in der tabelle)
so und jetzt hab ich noch fast alle fehlerhaften datensätze rausgelöscht jetzt kommt die zahl 461073421744 raus (das ist der datensatz nr. 43650)
Bitte warten ..
Mitglied: EXXON
09.02.2006 um 14:54 Uhr
so ich habs jetzt doch noch lösen können es muss heißen:
DLookup("[Identcode]", "Scandaten", "[Identcode] = '" & Me!Identcode & "'")
lag irgendwie teilweise dadran das es Text war :rolleyes:
Bitte warten ..
Ähnliche Inhalte
VB for Applications
gelöst VBA Code Änderung Access 2010 (6)

Frage von Dr.Cornwallis zum Thema VB for Applications ...

Basic
VBA Access Variable an Query Kriteria weitergeben (1)

Frage von Everest zum Thema Basic ...

Datenbanken
Access 2010 - Filter für Datum funkioniert nicht VBA (4)

Frage von Dr.Cornwallis zum Thema Datenbanken ...

VB for Applications
Druckerschachtzuweisung in vba oder direkt im Druckerprofil? (3)

Frage von yoface zum Thema VB for Applications ...

Neue Wissensbeiträge
Humor (lol)

Taschenrechner in IOS kaputt!

(5)

Information von Lochkartenstanzer zum Thema Humor (lol) ...

Sicherheit

Kanadischer Geheimdienst veröffentlicht erstmals Sicherheitssoftware

(3)

Information von BassFishFox zum Thema Sicherheit ...

Virtualisierung

Docker Monitoring und Steuerung per "sen"

Tipp von Frank zum Thema Virtualisierung ...

Heiß diskutierte Inhalte
Windows 7
Abbruch bei Brennvorgang (19)

Frage von Simulant zum Thema Windows 7 ...

Router & Routing
Externe IP von innen erreichbar machen (16)

Frage von Windows10Gegner zum Thema Router & Routing ...

Firewall
WIndows 7 RDP Massen Angriff (14)

Frage von Motte990 zum Thema Firewall ...