问题描述:office 2013 本地登陆微软账户之后,无法通过文档控件的WebUserName属性设置修订用户名
解决方案:
根据Office 2013的VBA帮助可知,有如下属性可控制是否使用本地或者用户自定义修订用户名:Options.UseLocalUserInfo
根据Office 2013 VBA 的帮助可知,当该属性设置为true时候修订用户名是与选项--常规里的用户名一致的;而当该属性为false的时候则是使用的登陆的账户名;
office 2013中该属性默认为false.
通过文档控件设置控件打开文档的修订用户名时候可做如下操作:首先利用控件提供的getOfficeVer方法判断当前客户端office 的版本,如果是2013那么则先设置
Options.UseLocalUserInfo属性为true,然后再通过WebUserName设置修订用户名即可。参考代码如下:
if(15==TANGER_OCX_OBJ.getOfficeVer())//如果是OFFICE 2013则设置Options.UseLocalUserInfo属性为true,TANGER_OCX_OBJ为文档控件对象
{
TANGER_OCX_OBJ.ActiveDocument.Application.Options.UseLocalUserInfo=true;
TANGER_OCX_OBJ.WebUserName="NTKO";
}
|