excel函数翻译器?1.打开excel,在上方菜单栏中找到“审阅”按钮,用鼠标点击一下。2.下方很清楚的看到“翻译”二字,点击“翻译”,会看到表格的右方出现了“信息搜索”一栏。3.想要把“生活”翻译为英文,可在“搜索”中输入内容,那么,excel函数翻译器?一起来了解一下吧。
首先,感谢您的提问!
在回答问题之前,基虚我们假定:
电脑是链接网络的;
被翻译的Excel内容存放在"A2"单元格中,翻译的结果在"B2"单元格中显示。
那搏核燃么,我们只需在"B2"单元格中输入公式=FILTERXML(WEBSERVICE("http://fanyi.youdao.com/translate?&i="&A2&"&doctype=xml&version"),"//translation"),即可。
如下图示:
当我们在"A2"单元格中输入中文内容时,自动翻译为英文,反之,当输入英文内容时,也会自动翻译为中文。
当然,我们也可以借助于Excel菜单【审阅】-【翻译】命令,把Excel文档内容翻氏做译为我们想要的目标语言。
希望以上对你有帮助。谢谢!
怎么实现Excel文档自动翻译?Excel文件内容比较多,要一个个找到去翻译的话还是很浪费时间的,小编这里有一个Excel文档翻译的方法还不错,有兴趣的一起来看看!
借助文档翻译器进行翻译:
1:打开文档翻译器,点击选择页面中的文档翻译的功能。
2:添加需要进行翻译的Excel文档,点击【点击上传文档】按钮,选择需要的文件即可。
3:选择一个需要的翻译语言,可以将中文的文件翻译成英文,也可以将英文的文件翻译成中文,这是基本的语言,还有其他语言春谨改,自己可以去尝试。
4:之后就可以开始翻译啦,点击翻译的按钮,就会开始对添加的文件进行翻译。
5:翻译成功后的文件内容会先展示在右边的展示框中,我们可以先进行文件内容的查看。
6:如果需要保存文件,点击导出文件的按钮,选择一个保存的位置就好了。
Excel文档翻晌冲译的方法如同扒判上述介绍的一样方便,步骤不多,操作也十分便捷,有需要的话不妨去试试!
生词本是经常需要整理的, 但这过程真是太哗数羡耗时了, 特别是查询翻译时。
本文利用 Excel 的 WEBSERVICE 和 FILTERXML 函数实现批毕消量翻译。
利用以下 Excel 公式实现批量翻译 :
全文完。
便捷的乱拍中英互译。
利用 WEBSERVICE 函数提取有道翻译查询结果, 再利用 FILTERXML 提取目标数据。
复制以下公式到目标单元格。
END
感谢阅读。
更多相关内容 :
首先, 就是要将我们电脑上的Excel表格翻译给打开,使该进入到后台运行的阶段。
打开文档翻译的后,在电脑桌面上,我们可以看到弹出的功能页面。页面的左侧是功能板块,在多种功能中,我们需要选择一空友困下文档翻译功能
我们进入到文档翻译的功能页面后,点击 Excel表格翻译。再为该功能添加一下Excel表格的文件。最简单的方式就是直接将我们需要翻译的表格拖拽到页面中,当然我们点击页面中的“上传文件”也是一样的。
上传完表格文件之后,可以适当的修改一下告清表格翻译前后的语种,如翻译前的语言是简体中文,而我们翻译后的语言是英文的。
如果我们有导出格式和导出目录要求的,就需要调整一下了。一般我们的导出格式是不需要调整的,斗念只要修改一下导出目录就可以了。
最后,我们只需要点击一下整个功能页面右下角的“开始识别”就好了。
我之前用过,质量还可以,三千条左右的内容,不到10分钟就OK了,我再校对一下就能用,挺好。谷歌翻译确实是所有机器翻译中质量最高的。
代码如下,放模块1里:
FunctionURLEncodePlus(strURL)'ANSI编码,空格处理成+号
Dimi
Dim瞎者辩tempStr
Fori=1ToLen(strURL)
IfAsc(Mid(strURL,i,1))<0Then
tempStr="%"&Right(CStr(Hex(Asc(Mid(strURL,i,1)))),2)
tempStr="%"&Left(CStr(Hex(Asc(Mid(strURL,i,1)))),Len(CStr(Hex(Asc(Mid(strURL,i,1)))))-2)&tempStr
URLEncodePlus=URLEncodePlus&tempStr
ElseIf(Asc(Mid(strURL,i,1))>嫌世=65AndAsc(Mid(strURL,i,1))<=90)Or_
(Asc(Mid(strURL,i,1))>=97AndAsc(Mid(strURL,i,1))<=122)Or_
(Asc(Mid(strURL,i,1))>=48AndAsc(Mid(strURL,i,1))<=57)Then
URLEncodePlus=URLEncodePlus&Mid(strURL,i,1)
Else
tempStr=Mid(strURL,i,1)
SelectCasetempStr
Case".","-","~","_"'如果发现网站有其他不需要编码的字符,放在这里
URLEncodePlus=URLEncodePlus&tempStr
Case""
URLEncodePlus=URLEncodePlus&"+"
CaseElse
URLEncodePlus=URLEncodePlus&"%"&Hex(Asc(tempStr))
磨缺EndSelect
EndIf
Next
EndFunction
PublicFunctionEnToCh(rngAsRange)
Dimxml
Dimurl$,EngSentence$
Setxml=CreateObject("MSXML2.XMLHTTP")
EngSentence=URLEncodePlus(rng.Text)
url="https://translate.google.cn/m?hl=en&sl=enN&tl=zh-CN&ie=UTF-8&prev=_m&q="&EngSentence
Withxml
.Open"GET",url,False
.send
IfInStr(.responseText,"
")>0Then EnToCh=Split(Split(.responseText,"
")(1),"
EndIf
EndWith
EndFunction
网上很难找到这个的,压箱底的宝贝,我调试通花了不少功夫。
以上就是excel函数翻译器的全部内容,1:打开我们的文档翻译器,选择文档翻译的功能,之后选择添加需要翻译的Excel表格就好。2:文件添加好之后,选择需要翻译的语种,根据自己的需要进行选择就好。3:翻译语种选择完之后,我们就可以点击翻译的按钮。