在MSDN网站上下载的Office2016是零售版本的，我们在使用一些KMS工具激活时，需要先转换为VL(批量授权版本)版，可以将下列文本另存为bat文件，以管理员运行根据提示即可完成转换

链接：https://pan.baidu.com/s/1i6OGiGl密码：fgcq

@ECHOOFF&PUSHD%~DP0

setlocalEnableDelayedExpansion&color2e&cd/d"%~dp0"

titleOffice2016Retail转换VL版  by-CSDN ywd1992

%1%2

mshtavbscript:createobject("shell.application").shellexecute("%~s0","goto:runas","","runas",1)(window.close)&goto:eof

:runas

ifexist"%ProgramFiles%\MicrosoftOffice\Office16\ospp.vbs"cd/d"%ProgramFiles%\MicrosoftOffice\Office16"

ifexist"%ProgramFiles(x86)%\MicrosoftOffice\Office16\ospp.vbs"cd/d"%ProgramFiles(x86)%\MicrosoftOffice\Office16"

:WH

cls

echo.

echo             选择需要转化的Office版本序号

echo.

echo--------------------------------------------------------------------------------

echo         1.零售版OfficeProPlus2016转化为VL版

echo.

echo         2.零售版OfficeVisioPro2016转化为VL版

echo.

echo         3.零售版OfficeProjectPro2016转化为VL版

echo.

echo.--------------------------------------------------------------------------------

set/ptsk="请输入需要转化的Office版本序号【回车】确认（1-3）:"

ifnotdefinedtskgoto:err

if%tsk%==1goto:1

if%tsk%==2goto:2

if%tsk%==3goto:3

:err

goto:WH

:1

cls

echo正在重置Office2016零售激活...

cscriptospp.vbs/rearm

echo正在安装KMS许可证...

for/f%%xin('dir/b..\root\Licenses16\proplusvl_kms*.xrm-ms')docscriptospp.vbs/inslic:"..\root\Licenses16\%%x">nul

echo正在安装MAK许可证...

for/f%%xin('dir/b..\root\Licenses16\proplusvl_mak*.xrm-ms')docscriptospp.vbs/inslic:"..\root\Licenses16\%%x">nul

echo正在安装KMS密钥...

cscriptospp.vbs/inpkey:XQNVK-8JYDB-WJ9W3-YJ8YR-WFG99

goto:e

:2

cls

echo正在重置Visio2016零售激活...

cscriptospp.vbs/rearm

echo正在安装KMS许可证...

for/f%%xin('dir/b..\root\Licenses16\visio???vl_kms*.xrm-ms')docscriptospp.vbs/inslic:"..\root\Licenses16\%%x">nul

echo正在安装MAK许可证...

for/f%%xin('dir/b..\root\Licenses16\visio???vl_mak*.xrm-ms')docscriptospp.vbs/inslic:"..\root\Licenses16\%%x">nul

echo正在安装KMS密钥...

cscriptospp.vbs/inpkey:PD3PC-RHNGV-FXJ29-8JK7D-RJRJK

goto:e

:3

cls

echo正在重置Project2016零售激活...

cscriptospp.vbs/rearm

echo正在安装KMS许可证...

for/f%%xin('dir/b..\root\Licenses16\project???vl_kms*.xrm-ms')docscriptospp.vbs/inslic:"..\root\Licenses16\%%x">nul

echo正在安装MAK许可证...

for/f%%xin('dir/b..\root\Licenses16\project???vl_mak*.xrm-ms')docscriptospp.vbs/inslic:"..\root\Licenses16\%%x">nul

echo正在安装KMS密钥...

cscriptospp.vbs/inpkey:YG9NW-3K39V-2T3HJ-93F3Q-G83KT

goto:e

:e

echo.

echo转化完成，按任意键退出！

pause>nul

exit