Textfeldereingaben aus Word-UserForm in Exceldatei

Heiks · 12. November 2019 um 00:01

Hallo zusammen,

ich habe ein Problem in Sachen Programmierung und wäre echt happy wenn mir jemand dabei helfen könnte!

Folgendes Problem:
Ich habe in Word-VBA ein Formular erstellt, welches eine Eingabemaske darstellt in der man verschiedene Dinge eingeben kann (Bezeichnung, Datum, Vorname, Nachname, Abteilung, usw.)
Dies sind zum einen Textboxen zur freien Eingabe und zum Anderen Comboboxen, welche bereits Vorgaben zur Auswahl enthalten.

Jetzt soll durch betätigen eines Buttons die ganzen eingegebenen Daten an eine bereits vorgefertigte Excel-Datei geschickt werden, wo die verschiedenen Eingaben in den Textfeldern und Comboboxen in eine bestimmte zugeordnete Zelle geschrieben werden.

Ich hoffe das war verständlich - viel zu lesen, ich weiß.
Ihr würdet mir wirklich sehr helfen, wenn ihr mir sagen könntet ob dies
a) überhaupt möglich ist, und wenn ja
b) ihr mir vielleicht in sachen programmiercode weiterhelfen könnt!

Für jegliche Hilfe bin euch mehr als dankbar!

Daaaanke schonmal,
greeetz

Reinhard_fb8cb7 · 12. November 2019 um 00:02

Hallo Heiks,

Jetzt soll durch betätigen eines Buttons die ganzen
eingegebenen Daten an eine bereits vorgefertigte Excel-Datei
geschickt werden, wo die verschiedenen Eingaben in den
Textfeldern und Comboboxen in eine bestimmte zugeordnete Zelle
geschrieben werden.

d.h., dem Word-Code ist der name der Excel-Mappe bekannt und sie ist geöffnet?

Was genau bedeutet „eine bestimmte zugeordnete Zelle“?
Sollen alle Textboxwerte Comboboxwerte in diese eine zelle? *nicht glaub*

Ich hoffe das war verständlich - viel zu lesen, ich weiß.
Ihr würdet mir wirklich sehr helfen, wenn ihr mir sagen
könntet ob dies
a) überhaupt möglich ist,

Ja.

b) und wenn ja ihr mir vielleicht in sachen programmiercode weiterhelfen könnt!

Gerne. Dazu fehlen aber noch Informationen von dir.

Gruß
Reinhard

Heiks · 12. November 2019 um 00:02

Servus Reinhard,

also, erstmal danke dass du dich meiner annimmst hehe

d.h., dem Word-Code ist der name der Excel-Mappe bekannt und
sie ist geöffnet?

die Excel-Mappe ist nicht geöffnet - d.h. ich muss sie mit dem pfad ansprechen und öffnen lassen.

Was genau bedeutet „eine bestimmte zugeordnete Zelle“?
Sollen alle Textboxwerte Comboboxwerte in diese eine zelle?
*nicht glaub*

um auf mein ursprüngliches beispiel zurück zu kommen: in zelle b2 steht zum beispiel bezeichnung und in zelle c4 soll dann eben die eingabe der userform aus der word-datei reingeschrieben werden.

thx.
heiks

Reinhard_fb8cb7 · 12. November 2019 um 00:02

Hallo Heiks,

d.h., dem Word-Code ist der name der Excel-Mappe bekannt und
sie ist geöffnet?

die Excel-Mappe ist nicht geöffnet - d.h. ich muss sie mit dem
pfad ansprechen und öffnen lassen.

okay.
Äh, weißt du wie das geht, zu prüfen ob Excel läuft oder nicht, dementsprechend Excel ggfs. öffnen, dann die mappe öffnen?

Was genau bedeutet „eine bestimmte zugeordnete Zelle“?
Sollen alle Textboxwerte Comboboxwerte in diese eine zelle?
*nicht glaub*

um auf mein ursprüngliches beispiel zurück zu kommen: in zelle
b2 steht zum beispiel bezeichnung und in zelle c4 soll dann
eben die eingabe der userform aus der word-datei
reingeschrieben werden.

Dafür brauchst du doch kein Makro. Das kannste doch manuell machen.

Was soll das makro eigentlich tun?
Macht doch wenig Sinn immer nur inZelle C4 den Inhalt eines Textfeldes in Word einzutragen. Oder doch? *verwirrt*

Plauder bitte ein wenig mehr über deinen Gesamtplan was da geschen soll.

Ggfs. mit file-upload, s. FAQ:2606 Beispieldateien hochladen.

Gruß
Reinhard

thx.
heiks

Heiks · 12. November 2019 um 00:03

Hallo Reinhard,

die Excel-Mappe ist nicht geöffnet - d.h. ich muss sie mit dem
pfad ansprechen und öffnen lassen.

okay.
Äh, weißt du wie das geht, zu prüfen ob Excel läuft oder
nicht, dementsprechend Excel ggfs. öffnen, dann die mappe
öffnen?

die excel datei ist auf jedenfall immer geschlossen - d.h. sie muss geöffnet werden… weiß gerade auch noch nicht wie das geht - schau mich aber auch nochmal im i-net um.

Was genau bedeutet „eine bestimmte zugeordnete Zelle“?
Sollen alle Textboxwerte Comboboxwerte in diese eine zelle?
*nicht glaub*

um auf mein ursprüngliches beispiel zurück zu kommen: in zelle
b2 steht zum beispiel bezeichnung und in zelle c4 soll dann
eben die eingabe der userform aus der word-datei
reingeschrieben werden.

Dafür brauchst du doch kein Makro. Das kannste doch manuell
machen.

ne ne - dieser vorgang wird etliche male auf eine „ur-datei“ in form eines excel-sheets vorgenommen - ziel soll ja gerade sein, dass jemand die eingaben in der word userform macht - daraufhin wird ein word-dokument erstellt und zudem sollen die daten aber in ein vorgefertigte excel-datei reinkopiert werden, welche separat abgespeichert werden. ansonsten wären ja die eingabedaten danach weg - genau dies soll verhindert werden!

Was soll das makro eigentlich tun?
Macht doch wenig Sinn immer nur inZelle C4 den Inhalt eines
Textfeldes in Word einzutragen. Oder doch? *verwirrt*

Plauder bitte ein wenig mehr über deinen Gesamtplan was da
geschen soll.

Leider kann ich keine bisherigen codes hochladen - sorry, darf ich nicht!

Hintergrund: ich brauche den code für einen bestimmten programmiervorgang, der so aussieht:
ich gebe daten in eine userform ein, die in word-vba erstellt wurde!
durch betätigen eines buttons sollen diese in die textfelder der userform eingegebenen daten in ein vorgefertigtes excel-sheet reinkopiert werden, um diese festhalten zu können! Diese Kopie der daten muss in eine exceldatei geschehen, da aufgrund der eingabedaten die in bestimmte zellen reingeschrieben werden sollen, verschiedene hinweise erscheinen!!
puuuh!
hoffe du oder ihr könnt mir helfen! vielen dank nochmal!
hast du reinhard vll ne idee in sachen code wo ich mal rumprobieren kann…
a)code für das öffnen einer exceldatei von word-vba aus
b)code für das kopieren von inhalten von textfelder aus word-vba in excel-sheet

daaaaaaaaaanke!
gruß heiks

Reinhard_fb8cb7 · 12. November 2019 um 00:03

Hallo Heiks,

Leider kann ich keine bisherigen codes hochladen - sorry, darf
ich nicht!

wer hat denn da so eine Paranoia *weia*

a)code für das öffnen einer exceldatei von word-vba aus
b)code für das kopieren von inhalten von textfelder aus
word-vba in excel-sheet

Hättest du mir eine Beispielmappe hochgeladen mit gleichem Tabellenstruktur wie im Original hättest du vielleicht schon eine Komplettlösung.
Ich will ja nur wissen wohin ich Textfeld1 schreiben soll, wohin Textfeld2 usw.

Dazu brauch ich doch von Word nur die Bezeichnungen der Objekte auf der UF und in Excel nur die Angabe was wohin warum soll.

Naja, jetzt mußte dir das selbst schnitzen

Nachfolgender Code schreibt das was du in der UF in Textbox1 eingibst in die Excelmappe, Tabelle1, fortlaufend untereinander in Apalte A rein.
Über Extras—Verweise kannst du ja noch den Verweis auf MS Office Excel Object… setzen

Gruß
Reinhard

In das Modul der UF:

Option Explicit

Private Sub CommandButton1\_Click()
If TextBox1.Text "" Then
 Call ExcelStarten
 Call Schreiben
 'Call ExcelBeenden
End If
End Sub

In ein Standarmodul, Modul1 o.ä.:

Option Explicit
Public objXL As Object

Sub Schreiben()
With objXL
 .Visible = True
 .workbooks.Open "C:\test\kwmichael.xls"
 With .ActiveWorkbook.Worksheets("Tabelle1")
 .Cells(.Cells(.Rows.Count, 1).End(xlUp).Row + 1, 1).Value = UserForm1.TextBox1.Text
 End With
 .ActiveWorkbook.Save
End With
End Sub

Sub ExcelStarten()
On Error Resume Next
Set objXL = GetObject(, "Excel.Application")
If Err.Number 0 Then
 Err.Clear
 Set objXL = CreateObject("Excel.Application")
End If
On Error GoTo 0
End Sub

Sub ExcelBeenden()
Set objXL = GetObject(, "Excel.Application")
objXL.Quit
End Sub

Heiks · 12. November 2019 um 00:03

Hallo Reinhard!

Erstmal ein dickes THX! Du bist ja schneller wie die feuerwehr!!
Ich stöber mal nach nem taschenmesser und fang an zu schnitzen…

wenn ich nicht weiterkomme, weiß ich ja wie der Profi-Schnitzer heißt!

Danke nochmal, sieht schonmal sehr gut aus - ich schau mal wie weit ich komme!

greetz heiks