Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1016to1020
1016to1020
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Excel-Zellwert in Word einfügen

Forumthread: Excel-Zellwert in Word einfügen

Excel-Zellwert in Word einfügen
23.10.2008 21:31:00
Alexander
Hallo zusammen,
tolles Forum.
Ich habe folgendes Problem: Ich habe ein Word-Dokument mit Formular-Felder.
Diese sollen mit Werten aus einer Excel-Tabelle gefüllt werden.
Der VBA-Code muss im Word-Dokument stehen.
ActiveDocument.FormFields("text1").Result = workbooks("Mappe1.xls").worksheets(2).Range("A2")
So ist es nicht richtig. Wie muss der Ausdruck nach "=" richtig lauten?
Die Mappe befindet sich im selben Ordner wie das Word-Dokument.
Die Mappe kann auch geöffnet sein, wenn das erleichtert.
Vielen Dank.
Alexander Müller
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Excel-Zellwert in Word einfügen
23.10.2008 22:24:37
Ramses
Hallo
Dazu musst du Object-Variablen haben welche EXCEL und das Workbook instanzieren.
Ungetestet,... sollte aber tun
Dim myExcel as Object
Dim myWkb as object
Set myExcel = GetObject("Excel.Application")
set myWkb = myExcel.Workbooks.Open("C:\Deine Datei.xls")
Dann lautet die Anweisung korrekterweise
ActiveDocument.FormFields("text1").Result = myWkb.worksheets(2).Range("A2")
Gruss Rainer
Anzeige
AW: Excel-Zellwert in Word einfügen
24.10.2008 06:40:52
Alexander
Hallo Rainer,
danke für die Antwort.
Ich habe es ausprobiert.
Er gibt mir die Meldung "Automatisierungsfehler Ungültiger Syntax" bei:
Set myExcel = GetObject("Excel.Application")
Wie kann ich das beheben?
Danke
Alexander
AW: Excel-Zellwert in Word einfügen
24.10.2008 14:25:00
Jürgen
Hallo Alexander,
es sollte so lauten:
Set myExcel = GetObject(, "Excel.Application")
Gruß, Jürgen
Anzeige
AW: Excel-Zellwert in Word einfügen
24.10.2008 23:19:00
Alexander
Hallo Jürgen,
jetzt funktioniert es. Aber nur dann, wenn Excel geöffnet ist - ohne, dass die Exxcel-Datei geöffnet ist. .
Ist Excel geschlossen oder ist die Ecxel-Datei bereits geöffnet, funktioniert es nicht.
Was kann man da machen?
AW: Excel-Zellwert in Word einfügen
25.10.2008 00:36:26
Jürgen
Hallo Alexander,
eigentlich sollte es auch funktionieren, wenn Excel geschlossen ist.
Ansonsten versuch dies (ungetestet, da gerade kein Excel zur Hand):
On error resume next
Set myExcel = GetObject(, "Excel.Application")
If myExcel = nothing then
myExcel = CreateObject("Excel.Application")
set myWkb = myExcel.Workbooks.Open("C:\Deine Datei.xls")
else
for each Datei in myExcel.workbooks
If UCase(Datei.name) = "DEINEDATEI.XLS" then exit for
next
If Datei = nothing then
set myWkb = myExcel.Workbooks.Open("C:\Deine Datei.xls")
else
set myWkb = Datei
end if
end if
Datei solltest Du als Workbook deklarieren.
Ich habe mich allerdings gefragt, warum Du all diese Mühen auf Dich nimmst, um einen Wert aus der Excel-Datei in ein Formularfeld zu holen, das der Anwender dann wieder überschreiben kann. Kannst Du Deine Aufgabe nicht auch mit einer Verknüpfung lösen?
Gruß, Jürgen
Anzeige
;

Forumthreads zu verwandten Themen

fehler beim speichern - zellname existiert nicht
t4z

Hallo Leute,
folgendes Problem:
Will nach zahlreichen Änderungen in Datei A die Änderungen darin speichern. Kurz vor Ende des Speichervorgangs kommt dann die Fehlermeldung
"Microsoft Excel kann die Formel in der Zelle (Name:[Dateiname.xls]Tabellenname!solver_val) nicht konvertieren,...
07.08.2008 17:53:00
Thread-ID: 1000056
4 Beiträge
Menü in Excel von VB6.0 aus erzeugen??
VB6.0

Hallo zusammen,
ich hoffe ihr könnt mir bei meinem Anliegen helfen. Ich möchte den VBA-Code in eine dll transportieren (VB 6.0) und scheitere schon an dem Menüaufbau in Excel.
In der dll steht in einer Klasse:
Sub Test_Excel() Set xl = GetObject(, "Visio.Application") Set objMenu...
07.08.2008 20:23:28
Thread-ID: 1000091
13 Beiträge
AW: Excel Makro Starten
Matty

Hallo nochmal....
Was ist an meiner Variante falsch?
Ich habe die Dateinamen als String definiert und in der Schleife den String aufgerufen. Was ist an dem Aufruf Application.Run falsch bzw was muss ich anders formulieren, wenn ich möchte dass die dateien entsprechend der Schleife durch...
08.08.2008 07:42:54
Thread-ID: 1000149
2 Beiträge
Lagerverwaltung mit Excel
Ralf

Hallo,
ich habe eine Lagerverwaltungsliste, in Spalte A stehen die Produkte, in Spalte B die Lagerzugänge und in Spalte C die Lagerabgänge.
In jeder Zeile befindet sich immer nur ein Buchungsvorgang, also entweder nur Zugang oder nur Abgang vom Lager.
Ich möchte in Spalte F, die akt...
08.08.2008 09:51:52
Thread-ID: 1000187
4 Beiträge
Farben aus Excel 2007 in Excel 2000 übernehmen
Jochen

Das Farbkonzept von Excel 2007 habe ich trotz langer Web-Recherche nicht verstanden. Was muss ich in Excel 2007 tun, damit ich die gleichen Farben angezeigt bekomme, wenn ich eine in Excel 2007 erstellte Datei in Excel 2000 öffne?
Gruß,
Jogi
08.08.2008 15:58:40
Thread-ID: 1000338
2 Beiträge
Sudoku Kontexmenü-Rechts [evtl. Hajo]
Matthias

Hallo
(Level bitte nicht ganz so ernst nehmen)
Folgendes:
In Diese Arbeitsmappe
Option Explicit 'nach einer Idee von Hajo Ziplies 'https://www.herber.de/forum/ _ archiv/972to976/t972675.htm Private Sub Workbook_BeforeClose(Cancel As Boolean) KontextmenueZuruecksetzen End Sub P...
08.08.2008 21:58:35
Thread-ID: 1000418
10 Beiträge
datenimport aus excel in excel
caot

Hi mal wieder!
ich hab mal wieder ne frage:
es sind ca 1200 Excel Dateien aus denen jeweils aus ein paar Zeilen und Spalten die Werte in eine Exceldatei eingelesn werden sollen.
Die Ursprungsdateien sind laufend nummeriert... und dann
kommt noch ein name als nummer- name.xls <...
09.08.2008 11:22:00
Thread-ID: 1000469
3 Beiträge
Zeichenkette per for-next-schleife erstellen
lauer

Hallo,
ich möchte mir eine Zeichenkette erstellen lassen.
Ich habe in einer Zelle (B11) den Anfang (1) angegeben und in der anderen (C11) steht das Ende (49).
Nun möchte ich, dass er mir in der E11 die Zeichenkette reinschreibt.
Also ich möchte dann in E11 stehen haben: 1,2,3,4,...
09.08.2008 19:06:00
Thread-ID: 1000538
5 Beiträge
Word Dokument in Excel einlesen
Silva


Hallo an alle Exceluser,
ich stehe mal wieder vor einer neuen Herausforderung und komme nicht weiter.
Ich habe ca. 100 Worddateien (ALLE gleich aufgebaut). Und ich habe 1 Exceldatei.
Jetzt möchte ich eine definierte Anzahl an Informationen automatisch aus den Worddateien in Exc...
11.08.2008 11:24:00
Thread-ID: 1000766
8 Beiträge
Access update von Excel
Excel

Hi Excel Freaks,
Ich habe folgendes Problem.
Ich habe eine Access Datenbank mit ca. 150000 Artikel und neben den normalen Preisen enthält diese auch selbst erstellte Preise.
Jetzt bekomme ich per Excel einmal im Monat eine aktualisierte Preisliste mit ca. 12000 Artikeln.
Diese j...
11.08.2008 13:28:57
Thread-ID: 1000834
7 Beiträge
Excel-VBA und Lotus Notes
Markus

Hallo zusammen,
ich möchte eine Tabelle über Lotus Notes senden. Beim Verwenden des Befehls SendMail bekomme
ich eine Fehlermeldung. Gibt es für Lotus Notes andere Befehle oder weis jemand, wie das bei Lotus Notes funktioniert ?
Gruß
Markus
11.08.2008 15:07:27
Thread-ID: 1000882
4 Beiträge
Anzeige
Excel mit DropDown Menü und Aktualisierung
ML

Hallo,
beschäftige mich nochnet lange mit Excel und habe folgende Frage:
Ich will mir auf einem Tabellenblatt auf dem ich mehrere Produkte aufgelistet habe untereinander, in der Zelle oben wo Artikelnummer steht, mir ein DropDown-Menü erstellen, in dem alle Artikelnummern aufgelistet si...
11.08.2008 17:17:00
Thread-ID: 1000925
5 Beiträge

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige