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
GELÖST

Datensatz aus tbl1 Kopieren und in tbl2einfügen!

Frage Microsoft Microsoft Office

Mitglied: JonnyCash

JonnyCash (Level 1) - Jetzt verbinden

16.01.2010, aktualisiert 18:43 Uhr, 3758 Aufrufe, 3 Kommentare

Hallo Access User
Habe ein kleines Problem!
Ich habe die tablle1 und tabelle2
Des Weiteren habe ich ein Endlosformular was auf die Daten von tablle1 zurückgreift!

Ich möchte jetzt einen Button im Endlosformular haben der folgendes machen soll!

Schneide den aktuellen Datensatz aus der tabelle1 aus und füge Ihn in der tabelle2 hinzu!
(tbl1 und tbl2 haben die selbe strukur)

Wie kann man sowas in VBA umsetzen??

Vielen Dank für eure Hilfe!
Mitglied: n4426
16.01.2010 um 21:34 Uhr
Hi Jonny,

Verschieben geht soweit ich weiß gar nicht. Du kannst nur den Datensatz mit den gleichen Daten in TBL2 erstelle und dann in TBL1 löschen.

Das erstellen eines neuen Datensatz mittels VBA in einer anderen Tabelle würde z. B. so gehen.

01.
Dim db As Database 
02.
Dim rs As DAO.Recordset 
03.
         
04.
Set db = CurrentDb() 
05.
         
06.
         
07.
Set rs = db.OpenRecordset("SELECT TBL2.* FROM TBL2;", dbOpenDynaset) 
08.
              
09.
rs.AddNew 
10.
     
11.
    rs!Feld1 = Me.Feld1 
12.
    rs!Feld2 = Me.Feld2 
13.
    rs!Feld3 = Me.Feld3 
14.
 
15.
 
16.
    rs.Update 
17.
rs.Close 
18.
         
19.
db.Close
Danach musst du nur noch den vorhanden Datensatz in TBL1 löschen lassen.

mfg
andi
Bitte warten ..
Mitglied: JonnyCash
17.01.2010 um 14:45 Uhr
Hallo Andi

Vielen Dank für die Antwort!
Klappt Super deine Lösung!

Wochenende ist gerettet!

Gruß
Bitte warten ..
Mitglied: n4426
17.01.2010 um 15:52 Uhr
Dann ist gut, und jetzt noch den Beitrag als gelöst makieren.

mfg
andi
Bitte warten ..
Neuester Wissensbeitrag
Windows 10

Powershell 5 BSOD

(8)

Tipp von agowa338 zum Thema Windows 10 ...

Ähnliche Inhalte
Batch & Shell
Ordner erstellen ll Datei hinein kopieren (1)

Frage von heyalice zum Thema Batch & Shell ...

Datenbanken
gelöst DB2 Daten in Windows DB2 kopieren (1)

Frage von Emheonivek zum Thema Datenbanken ...

Heiß diskutierte Inhalte
Microsoft
Ordner mit LW-Buchstaben versehen und benennen (21)

Frage von Xaero1982 zum Thema Microsoft ...

Netzwerkmanagement
gelöst Anregungen, kleiner Betrieb, IT-Umgebung (18)

Frage von Unwichtig zum Thema Netzwerkmanagement ...

Windows Update
Treiberinstallation durch Windows Update läßt sich nicht verhindern (17)

Frage von liquidbase zum Thema Windows Update ...