Excel gegevens in Word

[Markjuhhh]

Ik heb een standaard Excel bestand voor het maken van een begroting voor mijn klanten. De gegevens die ik daar invul wil ik automatisch laten verschijnen in mijn standaard offerte in Word.

Ik heb hier 'Afdruk samenvoegen' voor geprobeerd, maar omdat al mijn gegevens willekeurig op mijn Excel bestand staan werkt dit niet.
Met koppelingen plakken werkt het wel, tot dat ik mijn standaard documenten kopieer naar de projectmap van de klant en het daar aan ga passen. Mijn Word document blijft dan de koppelingen houden met mijn standaard Excel bestand, en niet met de kopie ervan in dezelfde projectmap.

Is er iemand die voor mij hiervoor een werkende oplossing heeft?

Ps: ik werk met Office 2007

 

[OctaFish]

Ik zou je toch aanraden om je gegevensbestand zodanig te maken dat je wèl kunt samenvoegen; dat lijkt mij een stuk simpeler. Overigens neemt dat je probleem niet weg, want je blijft zitten met een verwijzing naar een document op een andere plaats als je de documenten verplaatst. Maar dat kun je met een macro wel oplossen:

Function BronAanpassen()
Dim mmds As MailMergeDataSource
Dim tmp As Variant
Dim sFile As String, sPath As String, sFilePath As String
Dim sConn As String, strSQL As String

    Application.DisplayAlerts = wdAlertsNone
    Set mmds = ActiveDocument.MailMerge.DataSource
    With mmds
        tmp = Split(.Name, "\")
        sFile = tmp(UBound(tmp))
        sPath = ActiveDocument.Path
        sFilePath = sPath & "\" & sFile
        sConn = .ConnectString
        strSQL = .QueryString
        MsgBox sConn & vbLf & strSQL
        sConn = Replace(.ConnectString, .Name, sFilePath, 1)
        MsgBox sConn
    End With
    ActiveDocument.MailMerge.OpenDataSource _
        Name:=sFilePath, _
        LinkToSource:=True, _
        Connection:=sConn, _
        SQLStatement:=strSQL, _
        SQLStatement1:="", _
        SubType:=wdMergeSubTypeAccess
    
    Application.DisplayAlerts = wdAlertsAll
    
End Function

Wel gemaakt in 2003, dus misschien werkt hij niet in 2007.