DeepSeek翻译替换APIKey安全存储
调用DeepSeekAPI翻译选中中文为英文并替换原文，APIKey安全存储
软件版本兼容性
登录后可以添加版本标签，帮助其他用户了解代码兼容性
代码内容
7.79 KB
Word VBA
Sub TranslateSelectedToEnglishDeepSeek()
'|||Name:DeepSeek翻译替换|Description:调用DeepSeekAPI翻译选中中文为英文并替换原文，APIKey安全存储|Vision:2.0.0|||
On Error GoTo ErrorHandler
' ---------- 1. 检查选中 ----------
If Selection.Type = wdSelectionIP Then
MsgBox "请先选中需要翻译的中文文本！", vbExclamation, "提示"
Exit Sub
End If
仅显示前10行代码，完整代码共227行
登录查看完整代码
评论 (0)
登录后可以发表评论
立即登录
暂无评论，来发表第一个评论吧！