Seriendruck in Word ohne Pfad einer Excel-Datei
02.01.2020 21:00:49
max
kann mir BITTE jemand helfen, habe ein (kleines problem).
und zwar habe ich eine excel datei wo ich eine stückliste schreibe und diese danach in word als seriendruck für etiketten ausdrucken will. aber der ordner wo sich die excel datei befindet ändert sich ja mit jedem kundennamen wieder, also habe ich jedesmal einen anderen pfad. wie kann man das lösen wenn ich zb. word öffne dann sollte ein befehl sein ordner auswählen und danach sollte dieser die unteren befehl durchführen.
bitte um hilfe
Sub Öffnen_der_Daten()
ActiveDocument.MailMerge.OpenDataSource Name:= _
"C:\Users\\Auftrag\2020\01_Kundennamen\Stückliste_.xlsm", _
ConfirmConversions:=False, ReadOnly:=False, LinkToSource:=True, _
AddToRecentFiles:=False, PasswordDocument:="", PasswordTemplate:="", _
WritePasswordDocument:="", WritePasswordTemplate:="", Revert:=False, _
Format:=wdOpenFormatAuto, Connection:= _
"Provider=Microsoft.ACE.OLEDB.12.0;User ID=Admin;Data Source=Pfad;Mode=Read;Extended _
Properties=""HDR=YES;IMEX=1;"";Jet OLEDB:System database="""";Jet OLEDB:Registry Path="""";Jet _
_
OLEDB:Engine Type" _
, SQLStatement:="SELECT * FROM `Etiketten$Etiketten`", SQLStatement1:="", _
SubType:=wdMergeSubTypeAccess
End Sub