aus excel heraus externe dateien öffnen :: Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office

Einloggen, um private Nachrichten zu lesen

Downloads

aus excel heraus externe dateien öffnen

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Autor

Nachricht

test
Newbie
Newbie

Anmeldedatum: 10.08.2006
Beiträge: 8

Verfasst am: 15.05.2007, 13:49

werte experten,
heute habe ich ohne erfolg versucht,
a) in einer excel datenbank einen schalter einzubinden, einfach einen button, den man anklicken kann und
b) der daraufhin mehrere (!) im selben verzeichnis befindliche dateien (serienbrief-wordvorlagen) öffnet - idealerweise mit dem jeweiligen datensatz. (schalter befindet sich zB in zeile 5, dann sollte auch der serienbrief mit dem 5. datensatz öffnen) das wäre aber nur eine schöne randerscheinung.
vielen dank
test

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5715

Verfasst am: 15.05.2007, 14:32

Hallo!

Zum Öffnen eines Word-Dokumentes kannst du diesen Code benutzen:
(Rechtsklick auf den Reiter des Tabellenblatts in dem der Button erscheinen soll > Code anzeigen > Code ins rechte Fenster einfügen)

Code:

Sub Oeffnen()
Dim WordApp As Object
Set WordApp = CreateObject("Word.application")
With WordApp
.Application.Visible = True
.Application.documents.Open ("C:\Pfad1\Pfad2\...\docname.doc")
End With
End Sub

Aus der Formular-Symbolleiste (Menü Ansicht > Symbolleisten) "malst" du dir einen Button und verknüpfst ihn per Rechtsklick mit dem Makro.

Um das ganze mit dem entsprechenden Datensatz aufzurufen, reichen meine VBA-Kenntnisse (und wahrscheinlich auch deine Infos) leider nicht aus...

_________________

Viele Grüße vom Schatzi
------------------------
Ich bin nur noch sporadisch erreichbar!
Bitte hofft nicht auf eine schnelle Beantwortung einer Rückfrage meinerseits!
Jeder andere Helfer darf Rückfragen gerne übernehmen!

test
Newbie
Newbie

Anmeldedatum: 10.08.2006
Beiträge: 8

Verfasst am: 15.05.2007, 14:50

hej danke, klappt super.
nur eine kleinigkeit noch: auf den pfad zu den vorlagen möchte ich mich nicht so gern festlegen. fest steht aber, dass sie sich immer im gleichen ordner wie die exceldatei befinden (werden). kann man da die angabe unter ".Application.documents.Open" nicht abkürzen?

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5715

Verfasst am: 15.05.2007, 15:05

Hallo!

So scheint es zu funktionieren (ohne Gewähr...):

Code:

Sub Oeffnen()
Dim WordApp As Object
Dim Pfad As String
Pfad = ActiveWorkbook.Path
Set WordApp = CreateObject("Word.application")
With WordApp
.Application.Visible = True
.Application.documents.Open (Pfad & "\docname.doc")
End With
End Sub

Achte auf den Backslash vor deinem Dateinamen!

test
Newbie
Newbie

Anmeldedatum: 10.08.2006
Beiträge: 8

Verfasst am: 15.05.2007, 15:44

nee schatzi,
das funktioniert leider nicht - oder, ich habe dich falsch verstanden. soll das "pfad &" so ausgeschrieben werden, oder soll ich es durch irgendetwas ersetzen?

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5715

Verfasst am: 15.05.2007, 15:52

Eigentlich musst du nur "docname.doc" durch deinen Worddateinamen ersetzen.

test
Newbie
Newbie

Anmeldedatum: 10.08.2006
Beiträge: 8

Verfasst am: 15.05.2007, 16:17

ok, das hatte ich. da kommt aber leider stets eine fehlermeldung (ohne text!?). schade...
danke dir dennoch!

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5715

Verfasst am: 15.05.2007, 16:26

Diese Fehlermeldung bekam ich auch, bis ich den Backslash vor den Dateinamen gesetzt habe.
Ab dem Moment funktionierte es (zumindest bei mir...)

test
Newbie
Newbie

Anmeldedatum: 10.08.2006
Beiträge: 8

Verfasst am: 15.05.2007, 17:47

mit oder ohne \: bekomme immer wieder diesen fehler. habe auch andere varianten probiert, aber ohne erfolg :(

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5715

Verfasst am: 15.05.2007, 17:51

Dann weiß ich leider auch nicht weiter.
Wie gesagt: Bei mir funktioniert's.

test
Newbie
Newbie

Anmeldedatum: 10.08.2006
Beiträge: 8

Verfasst am: 15.05.2007, 18:03

ok, ich hab's:
.Application.documents.Open ThisWorkbook.Path & "\docname.doc"
grüße

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Thema		Autor	Forum	Antworten	Verfasst am
Ähnliche Beiträge
	Outlook ein zweites mal öffnen nicht ...	Frankfurtkalle	Microsoft Outlook Hilfe	2	05.10.2008, 07:57
	vba syntax fragen (Excel 2000)	ramires	Microsoft Excel Hilfe	14	04.10.2008, 21:25
	Excel 2002 unter Vista - Datumswerte	Schassi	Microsoft Excel Hilfe	4	04.10.2008, 19:11
	Excel 2008 Mac Frage zu Diagrammen	Donvito	Microsoft Excel Hilfe	0	01.10.2008, 10:36
	TFT surrt bei Excel Datei	Natascha303	Microsoft Excel Hilfe	0	29.09.2008, 08:31

Gehe zu:

Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen

Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Alle Zeiten sind GMT + 1 Stunde
Deutsche Übersetzung von phpBB.de