Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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

VBA Vergleiche Lokale Tabelle mit anderer Access Tabelle und wenn andere Tabelle neuer dann X sonst Y

Frage Entwicklung VB for Applications

Mitglied: christiankarl

christiankarl (Level 1) - Jetzt verbinden

22.11.2013, aktualisiert 14:41 Uhr, 3097 Aufrufe, 5 Kommentare

Hallo,
ich habe eine Zentrale Access Datei,
in welcher eine Tabelle Version vorhanden ist
In dieser steht nur eine Zeile, wo das akuelle Datum eingetragen wird.

Ich habe eine Lokale Access Datei in dieser ist ebenfalls diese Tabelle vorhanden.

Nun möchte ich per VBA die Tabellen vergleichen und wenn die Zentrale Tabelle, dort das Datum aktueller ist als die Lokale Datei dann soll
X passieren sonst Y,

Irgendwie bekomme ich dieses nicht hin,

Vielleicht kann mir hier jemand helfen.
Mitglied: SlainteMhath
22.11.2013 um 14:43 Uhr
Moin,

Irgendwie bekomme ich dieses nicht hin,
Im Prinzip würde so vorgehen:
1. Tabelle per ODBC Verknüpfen
2. Werte aus beiden Tabellen per Query oder dlookup auslesen
3. X oder Y machen
4. Verknüpfung wieder lösten

Wo genau hängst's?

lg,
Slainte
Bitte warten ..
Mitglied: christiankarl
22.11.2013, aktualisiert um 15:19 Uhr
Hallo Slainte,

danke für die Rückmeldung,
eigentlich hängt es am gesamten VBA.
bin da nicht wirklich Fit drin.

versuch

01.
DoCmd.TransferDatabase acLink, "Microsoft Access", _  
02.
                           "q:\test.accdb", _  
03.
                           acTable, "Version", "TempVersion", False 
04.
 
05.
'Hier fehlt der verlgeich zwischen den tabellen 
06.
 
07.
On Error Resume Next  
08.
    DoCmd.DeleteObject acTable, "TempVersion"  
09.
    On Error GoTo 0 
10.
 
Gruß
Christian
Bitte warten ..
Mitglied: SlainteMhath
22.11.2013 um 15:24 Uhr
eigentlich hängt es am gesamten VBA.
bin da nicht wirklich Fit drin.
damit wirst du dich aber ein bisschen beschäftigen müssen.

- Tabellen Verknüpfen z.b. hier: http://technet.microsoft.com/en-us/library/cc722917.aspx (ab: To link an external table)
- Werte auslesen geht per dlookup oder Query/QueryDef
- "X oder Y" machen geht mit "if...then...else"
Bitte warten ..
Mitglied: colinardo
23.11.2013, aktualisiert 24.11.2013
Hallo Christian,
der Vergleich zwischen zwei Tabellen und der Zurückgabe des aktuelleren Datums jeder Zeile, lässt sich auch ohne VBA in Access mit einer SQL-Abfrage folgender Art realisieren:
Im Beispiel heißen die Tabellen "table1" und "table2", die Datums-Spalten der Tabellen:"version" und die Primärindex-Spalte: "ID"
SELECT Switch([table1].[version]>[table2].[version],[table1].[version],True,[table2].[version]) AS [Neueste Version] 
FROM table1 INNER JOIN table2 ON table1.ID = table2.ID;
Das Ergebnis dieser Abfrage ist eine Tabelle mit einer Spalte namens "Neueste Version".
Hinweis: Diese SQL-Abfrage mit Switch() funktioniert nur unter MS Access.

Grüße Uwe
Bitte warten ..
Mitglied: SlainteMhath
25.11.2013 um 08:13 Uhr
Sieht ja schonmal gar nicht so übel aus

'Hier fehlt der verlgeich zwischen den tabellen
Schau dir doch bitte mal die dlookup-Funktion an
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
EXCEL VBA Termindaten aus Tabelle Filtern

Frage von t3jxbus zum Thema Microsoft Office ...

VB for Applications
gelöst Xml-Datei laden bzw. auf Festplatte kopieren und per VBA in eine Access-Tabelle speichern (22)

Frage von machohunk zum Thema VB for Applications ...

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

Frage von Dr.Cornwallis zum Thema Datenbanken ...

Microsoft Office
gelöst Verschieben von Zellinformation in andere Spalte (per VBA) excel 2010 (5)

Frage von thomas1972 zum Thema Microsoft Office ...

Neue Wissensbeiträge
Peripheriegeräte

Was beachten bei der Wahl einer USV Anlage im Serverschrank

(2)

Tipp von zetboxit zum Thema Peripheriegeräte ...

Windows 10

Das Windows 10 Creators Update ist auf dem Weg

(5)

Anleitung von BassFishFox zum Thema Windows 10 ...

Administrator.de Feedback

Tipp: Ungelöste Fragen ohne Antwort in Tickeransicht farblich hinterlegen

Tipp von pattern zum Thema Administrator.de Feedback ...

Viren und Trojaner

Neue Magazin Ausgabe: Malware und Angriffe abwehren

Information von Frank zum Thema Viren und Trojaner ...

Heiß diskutierte Inhalte
Windows Systemdateien
Warum System auf "C:" (29)

Frage von DzumoPRO zum Thema Windows Systemdateien ...

LAN, WAN, Wireless
Cisco SG200: Auf bestimmtem vLAN bestimmte TCP-Ports sperren (19)

Frage von SarekHL zum Thema LAN, WAN, Wireless ...

Windows Server
gelöst Update BackupExec 2015 auf 2016 führt zu SQL-Server Problem (16)

Frage von montylein1981 zum Thema Windows Server ...

Cloud-Dienste
gelöst Bitcoins minen über Nacht? (16)

Frage von 1410640014 zum Thema Cloud-Dienste ...