vba - 如何使用 vba 更改插入 ms word 的超链接的字体和大小

Question

我在 ms 访问中有一个运行这行代码的子程序

wrdDoc.Hyperlinks.Add Anchor:=wrdDoc.Bookmarks("LCEmail").Range, Address:="abc@yahoo.com"

如何将插入电子邮件的字体更改为 Microsoft sans serif 并将字体大小更改为 10？

Answer 1

你可以;

With wrdDoc.Hyperlinks.Add(Anchor:=wrdDoc.Bookmarks("LCEmail").Range, Address:="abc@yahoo.com")
    .Range.Font.Name = "Microsoft sans serif"
    .Range.Font.Size = 10
End With