Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1444to1448
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Excel-Daten in Word-Textbox anzeigen
02.09.2015 11:57:10
spinifex
Hallo Forum,
es will mir nicht gelingen, auf Grundlage von folgendem Code in Word VBA eine (vermutlich niedrige) Klippe zu nehmen:

Private Sub Document_Open()
Dim xlApp As Excel.Application
Dim wb As Excel.Workbook
Dim ws As Excel.Worksheet
Dim zeile As Long
Set xlApp = New Excel.Application
Set wb = xlApp.Workbooks.Open(FileName:="C:\Excel\Datei.xlsx")
Set ws = wb.Worksheets(1)
Me.ComboBox1.Clear
For zeile = 1 To 12
Me.ComboBox1.AddItem ws.Cells(zeile, 1)
'Hier hätte ich gerne ws.Cells(zeile, 2) aber in einer Textbox
Next zeile
Me.ComboBox1.ListIndex = 0
wb.Close
xlApp.Quit
Set xlApp = Nothing
End Sub
'In Word VBA ist unter Extras / Verweise Microsoft Excel 14.0 Object Library aktiviert
Die Übergabe in die Combobox (auch mehrere) funktioniert. Die in eine Textbox leider nicht. Me.Textbox1.AddItem gibt es nicht und meine Versuche die Daten stattdessen mit .Copy und .Paste zu übertragen, sind leider erfolglos.
Sinn des Ganzen: Ähnlich wie mit EXL - Verweis sollen durch Auswahl des Wertes in der ComboBox die Werte für fünf weitere Textboxen übergeben werden.
Vielleicht hat jemand eine Idee - dafür schon jetzt vielen Dank!
Spinifex

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Excel-Daten in Word-Textbox anzeigen
02.09.2015 15:20:15
spinifex
Hallo Case,
wenn der Code hält was die einleitende Beschreibung Deines Links verspricht, ist das genau meine Lösung!
Herzlichen Dank -freu und hüpf ;-)
Spinifex
Anzeige

303 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige