Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Word Template zieht Daten aus Access 2007

Frage Microsoft Microsoft Office

Mitglied: RicoTumb

RicoTumb (Level 1) - Jetzt verbinden

03.05.2010 um 11:20 Uhr, 4278 Aufrufe, 1 Kommentar

Hallo zusammen,

ich habe ein Word Template mit folgendem Code:

01.
Sub LeseDaten() 
02.
03.
' LeseDaten Makro 
04.
     
05.
    ActiveDocument.MailMerge.OpenDataSource Name:= _ 
06.
        "\\dwdf035\esf\Anfragen\Anfragen.MDB", ConfirmConversions:=False, _ 
07.
        ReadOnly:=False, LinkToSource:=True, AddToRecentFiles:=False, _ 
08.
        PasswordDocument:="", PasswordTemplate:="", WritePasswordDocument:="", _ 
09.
        WritePasswordTemplate:="", Revert:=False, Format:=wdOpenFormatAuto, _ 
10.
        Connection:= _ 
11.
        "Provider=Microsoft.Jet.OLEDB.4.0;Password="""";User ID=Admin;Data Source=\\dwdf035\esf\Anfragen\Anfragen.MDB;Mode=Read;Extended Properties="""";Jet OLEDB:System database="""";Jet OLEDB:Registry Path="""";Jet OLEDB:Database Password="""";Jet OLEDB:Engine Type=5;Jet " _ 
12.
        , SQLStatement:="SELECT * FROM `Angebote`", SQLStatement1:="", SubType:= _ 
13.
        wdMergeSubTypeAccess 
14.
         
15.
     
16.
    With ActiveDocument.MailMerge 
17.
        .Destination = wdSendToNewDocument 
18.
        .SuppressBlankLines = True 
19.
        With .DataSource 
20.
            .FirstRecord = wdDefaultFirstRecord 
21.
            .LastRecord = wdDefaultLastRecord 
22.
        End With 
23.
        .Execute Pause:=False 
24.
    End With 
25.
     
26.
End Sub
Die Datenbank aus der für das Template Daten gezogen werden ist Anfragen.MDB (wie oben im Quellpfad 2 mal angegeben). Anstelle dieser DB möchte ich nun eine andere DB einsetzen. Es ist eigentlich die selbe DB, nur dass sie in Access 2007 (also .accdb) konvertiert worden ist. Die "neue" DB liegt im selben Verzeichnis. Wenn ich jedoch nur den Namen der Datei (also Anfragen_neu.accdb statt Anfragen.MDB) umändere, funktioniert das Makro nicht. Es funktioniert nicht heißt: Das Word-Makro läuft nicht durch. Als Fehlermeldung kommt: Die Zeichenfolge ist länger als 255 Zeichen. Wenn ich dann auf Debuggen klicke wird der obere Teil des Word-Makros (also der Teil in dem der Quell-Pfad steht) komplett gelb markiert.

Hier auch die Function aus der DB, welche das Word Template aufruft:

01.
Function OpenAngebot(lDatei As String) 
02.
    Dim oApp As Object 
03.
    Dim aNr As String 
04.
    Dim dStr As String 
05.
 
06.
 
07.
    Set oApp = CreateObject("Word.Application") 
08.
    oApp.Visible = True 
09.
    oApp.Documents.Open FileName:=lDatei + Form_AngebotErstellen.Template.Value + ".doc" 
10.
     
11.
    oApp.Application.Run "LeseDaten" 
12.
    oApp.Documents(Form_AngebotErstellen.Template.Value + ".doc").Close SaveChanges:=wdDoNotSaveChanges 
13.
 
14.
 
15.
End Function
Könnte mir jemand evtl. sagen, weshalb das nicht funktioniert, obwohl es die selbe DB ist die ich einsetze, nur eben konvertiert???

Vielen Dank schonmal...

Rico
Mitglied: RicoTumb
03.05.2010 um 13:36 Uhr
Hallo,

mein Problem hat sich von selbst erledigt. Der Connection String war nach der Änderung des Dateinamen länger als 255 Zeichen, was nicht erlaubt ist. Mit einem kürzeren Dateinamen funktioniert alles wunderbar!

Grüße,
Rico
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
gelöst Schnellbausteine aus Word 2007 nach Word 2016 übernehmen (2)

Frage von TiTux zum Thema Microsoft Office ...

Microsoft Office
gelöst Access 2007 (2)

Frage von Everest zum Thema Microsoft Office ...

Vmware
ESXI Template erstellen (2)

Frage von Phill93 zum Thema Vmware ...

Neue Wissensbeiträge
Entwicklung

Exploit Development

Anleitung von burhanudinn123 zum Thema Entwicklung ...

Windows Update

Microsoft Update KB4034664 verursacht Probleme mit Multimonitor-Systemen

(1)

Tipp von beidermachtvongreyscull zum Thema Windows Update ...

Viren und Trojaner

CNC-Fräsen von MECANUMERIC werden (ggf.) mit Viren, Trojanern, Würmern ausgeliefert

(4)

Erfahrungsbericht von anteNope zum Thema Viren und Trojaner ...

Heiß diskutierte Inhalte
Netzwerkprotokolle
Leiten "dumme" Switches VLAN-Tags mit durch? (17)

Frage von coltseavers zum Thema Netzwerkprotokolle ...

E-Business
Wo tragt ihr eure privaten Termine ein? (13)

Frage von honeybee zum Thema E-Business ...

Batch & Shell
Batch zum suchen und verschieben von Verknüpfungen (12)

Frage von zeroblue2005 zum Thema Batch & Shell ...

Windows Server
Terminalserver starten willkürlich neu (12)

Frage von thaefliger zum Thema Windows Server ...