Excel den Word'a veri aktarma sorunu

[erc61]

Degerli arkadaslar,
Surekli olarak hesaplari excel de yapip, word'a yukluyoruz. Excelde bir sey degistimi otomatikmen wordda da degisiyor.
Simdi office 2016 yi kullaniyoruz. Onceden 2007 yi kullaniyorduk.

Sorun simdi su: Excelden worda veri girdigimizde Excel surekli olarak hareket ediyor, bazan duruyor bazen hic durmuyor surekli yanip sonen lambalar gibi hareket ediyor.
Macro soyle yazilmisti. (hollandaca)

Sub PlakkenMetafile()
' naar nieuwe regel gaan
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.TypeParagraph
' Link plakken
Selection.PasteSpecial , DataType:=wdPasteEnhancedMetafile, _
Placement:=wdInLine, DisplayAsIcon:=False
' Link width aanpassen naar 16 cm
Selection.MoveLeft Unit:=wdCharacter, Count:=1
Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend
Selection.InlineShapes(1).Width = 453.55

End Sub

Sub PlakkenSpeciaal()
' naar nieuwe regel gaan
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.TypeParagraph
' Link plakken
Selection.PasteSpecial Link:=True, DataType:=wdPasteMetafilePicture, _
Placement:=wdInLine, DisplayAsIcon:=False
' Link width aanpassen naar 16 cm
Selection.MoveLeft Unit:=wdCharacter, Count:=1
Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend
Selection.InlineShapes(1).Width = 453.55
' Bijwerken op handmatig zetten
For Each afield In Selection.Fields
afield.LinkFormat.AutoUpdate = False
Next afield
End Sub

 

[leumruk]

Bunlar wordde kullanılam kodlar. Excelle bağlantıyı sağlayan kodlar değil. Çözüm için örnek dosya eklemeniz gerekiyor