MS Word makro yang dikembangkan pada Windows 7 berhenti bekerja pada mesin XP [ditutup]

1
Sub test(imagePath As String)
    Dim kl As Shape
    Dim rng As Range
    Set rng = ActiveDocument.Bookmarks("bkmk1").Range

    Set kl = ActiveDocument.Shapes.AddPicture(FileName:=imagePath, LinkToFile:=False, SaveWithDocument:=True, Width:=35, Height:=35)
    kl.RelativeHorizontalPosition = wdRelativeHorizontalPositionPage
    kl.RelativeVerticalPosition = wdRelativeVerticalPositionPage
    kl.Left = rng.Information(wdHorizontalPositionRelativeToPage)
    kl.Top = rng.Information(wdVerticalPositionRelativeToPage)
End Sub

Makro ini berhenti memposisikan gambar dengan benar pada mesin Windows XP dengan Office 2010. Bagaimana cara memperbaikinya?

pengguna2122034
sumber
Adakah kesalahan, atau hanya kegagalan diam?
Karan
Apakah ada perubahan dalam versi Office juga?
Gary
2
Jika Anda ingin bantuan dengan ini, harap perbarui pertanyaan ini dengan menanggapi komentar di atas dan untuk pertanyaan ini; Bagaimana cara "berhenti memposisikan gambar dengan benar"? Apakah pengaturan halaman dokumen sama persis dengan di komputer Windows 7?
CharlieRB