Excel一键实现单元格内容中文/英文的切换技巧

1、新建一个Excel文档，另存为启用宏的工作簿，后缀名为xlsm格式。

2、绘制一个控制按钮，本教程以插入一个矩形形状为例。

3、编辑文字并美化控制按钮，如图所示。

4、切换到VBA界面，插入一个模块，不清楚的可以参考以下链接：

5、输入代码(复制粘贴即可)：Sub translation()Dim i%, j%i = ActiveCell.Rowj = ActiveCell.ColumnCells(i, j + 1).FormulaR1C1 = "=FILTERXML(WEBSERVICE(""http://fanyi. _youdao.com/translate?&i=""&RC[-1]&""&doctype=xml&version"")," _"//translation"")"Cells(i, j + 1).SelectSelection.CopySelection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, _SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = FalseEnd Sub

6、返回Excel窗口，指定宏。

7、以下列数据为例，选中需要中/英切换的单元格，点击按钮即可。