Top-Themen

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

Inhalte aus Word-Formularfeldern in Access Datenbank schreiben

Mitglied: Mandy1675

Mandy1675 (Level 1) - Jetzt verbinden

27.02.2007 um 12:30 Uhr, 5664 Aufrufe

Hi,

ich habe eine dot-Vorlage erstellt, in der es mehrere Formularfelder gibt. Diese sollen mittels Knopfdruck (in Tabelle speichern) in eine Access-Datenbank gespeichert werden.

Ich hatte mal eine ähnliche Aufgabe und habe versucht das Makro anzupassen, leider erfolglos.

Hier mein Code:

Sub speichern()
On Error Resume Next
frmSaveData.Show
End Sub

Sub Transfer_Data()
Dim db As DAO.Database
Dim strSQL As String 'SQL-String
Dim aFN(4) As String 'Array mit 5 Feldern

With ActiveDocument
aFN(0) = .FormFields("Eingang_Poststelle").Result 'Eingangsdatum Poststelle
aFN(1) = .FormFields("Eingang_Abteilung").Result 'Eingangsdatum Abteilung
aFN(2) = .FormFields("F_nnam").Result 'Nachname Betroffener
aFN(3) = .FormFields("F_vnam").Result 'Vorname Betroffener
aFN(4) = .FormFields("F_kvnr").Result 'KVNR Betroffener
End With

Set db = DBEngine.Workspaces(0).OpenDatabase("c:\ws_pv.mdb")
strSQL = "insert into tblWS_PV (kvnr, chg_date, eingang_poststelle, eingang_abteilung, name_vers, vorname_vers) " & _
"values ('" & aFN(4) & "', '" & Date & "', '" & _
aFN(0) & "', '" & aFN(1) & "', '" & _
aFN(2) & "', '" & aFN(3) & "')"

db.Execute (strSQL)
Unload frmSaveData
MsgBox ("Es wurde " & db.RecordsAffected & " Datensatz gespeichert.")
db.Close
End Sub

Ich habe das Ausführen des Makros an ein Formularfeld geknüpft und das geht auch. Die Datenbanktabelle gibt es natürlich auch.

Ich hoffe ihr könnt mir helfen.

Danke.


mandy
Ähnliche Inhalte
Microsoft Office
Word Textmarke in Formularfeld schreiben
Frage von hausensMicrosoft Office7 Kommentare

Hallo, Wir haben ein CRM über welches wir auch Nachrichten versenden. Über die Textmarken kann man auf Daten wie ...

Microsoft Office

Access Datenbank wird ohne Inhalt geladen

gelöst Frage von xbast1xMicrosoft Office3 Kommentare

Hallo zusammen, wir haben in der Firma eine Access Datenbank in welcher Gerätedaten eingepflegt werden können. Bisher hat dies ...

Microsoft Office

Word Formularfelder füllen mit Daten aus Excel

gelöst Frage von bluepythonMicrosoft Office15 Kommentare

Hallo, in einer Wordvorlage sollen bestimmte Felder wie Name, Vorname, Durchwahl, etc. automatisch gefüllt werden. Die benötigten Daten stehen ...

Microsoft Office

Feldfunktion in Word 2010: If-Abfrage hat Formularfeld als Ergebnis

Frage von phippserlMicrosoft Office1 Kommentar

Hallo, ich benötige als mögliches Ergebnis einer If-Abfrage (Feldfunktion in MS Word 2010) ein Formularfeld - quasi so: { ...

Neue Wissensbeiträge
Vmware
VMware Update für den ESXi 5.5 verfügbar
Information von sabines vor 10 StundenVmware

Nach dem ganzen Hickhack um Update mit Microcode Anpassungen und Rückzug, gibt es nun für den ESXi 5.5 ein ...

CPU, RAM, Mainboards

Meltdown und Spectre: Intel zieht Microcode-Updates für Prozessoren zurück

Information von keine-ahnung vor 14 StundenCPU, RAM, Mainboards5 Kommentare

Moin, extrem lutztig. Nur gut, dass ich noch nicht beim Probanden-Bingo mitgemacht habe :-) LG, Thomas

Router & Routing
PfSense als Addon auf QNAP
Information von magicteddy vor 1 TagRouter & Routing7 Kommentare

Moin, für Spielereien eine ganz nette Idee aber ich fürchte das soetwas auch als echte Firewall genutzt wird: In ...

Datenschutz

Teamviewer kommt für IoT-Geräte wie den Raspberry Pi

Information von magicteddy vor 1 TagDatenschutz1 Kommentar

Moin, jetzt werden IoT Geräte endgültig zur Wanze? Anscheinend kann man auf einem Dashboard seine Geräte visualisieren Ich stelle ...

Heiß diskutierte Inhalte
Netzwerkmanagement
Preis für Wartungsvertrag ok?
gelöst Frage von a-za-zNetzwerkmanagement26 Kommentare

Hallo! Mal ne Frage, weil ich mich mit dem akzeptablen Preis für einen Reaktionszeitvertrag nicht auskenne. Meine Firma hat ...

Windows Server
TEMP-Profile
gelöst Frage von Forseti2003Windows Server21 Kommentare

Guten Morgen, wer kennt sie nicht, die lieben Temporären Benutzerprofile, vorallem immer dann, wenn man sie am wenigsten braucht. ...

Multimedia & Zubehör
Welches Tablet für die Verkäufer?
Frage von Hendrik2586Multimedia & Zubehör15 Kommentare

Guten Morgen meine Lieben, vielleicht könnt ihr mir ja helfen. Es geht um unsere Außendienstmitarbeiter /Verkäufer. Sie sollen demnächst ...

Ubuntu
Ubuntu - Routing mit 2 Netzwerkkarten?
Frage von gabrixlUbuntu13 Kommentare

Hei Folgende Situation: Ich habe zwei virtuelle Maschinen: 1 - Server für DHCP, DNS und Routing - Netzwerkkarte 1: ...