ExcelVBA语句中英文提取模块语句-.pdf
吴敏技巧-如何在 excel 中提取中英文转载Important:To access the commands that you need to create VBA code,the Developer tab must be visible in the Excel 2007 Ribbon user interface.If the Developer tab is not visible,use the following steps to display it:Click the Office Button,and then click Excel Options.In the Popular category,under Top options for working with Excel,select the Show Developer tab in the Ribbon check box,and then click OK.On the Developer tab,click Visual Basic to open the Visual Basic Editor.为实现这一命令，需要创建VBA代码，必须在excel2007 显示开发工具。即：点击officeexcel 选项 常用 显示开发工具确定之后，在 VBA代码窗口中，执行菜单操作“插入”“模块”，然后，会自动创建一个名为“模块 1”的模块。最后，将如下代码粘贴到你的模块1 中：复制以下内容_ 中文Function SplitStringChs(TheString)Dim n,Chs For n=1 To Len(TheString)If Asc(Mid(TheString,n,1)=0 Then Eng=Eng&Mid(TheString,n,1)End If Next SplitStringEng=Trim(Eng)End Function 点保存，然后07 版 excel 会显示未启用宏之类的，选择否，另存为03excel。关掉原先的excel 和模块选项卡，打开03 版 excel，在 B1 输入=SplitStringChs(A1),然后将 B1拓展到 B列，同理在 C1输入=SplitStringEng(A1),然后将 C1拓展到 C列。搞定！在此过程中，可能出现宏禁用的提示，打开excel 选项 信任中心 宏设置 启用所有宏 信任对 VBA工程对象的访问二.如何将 EXCEL 中同处于一列的中英文分别处于单独的两列？情况一：中英文处于同一列不同的两行，B1 输入=LEFT(A1,2*LEN(A1)-LENB(A1)，C1输入=RIGHT(A2,LENB(A2)-LEN(A2)，分别提取内容其它可用的自动翻译服务器：1）Language Weaver 途径：项目设置记忆库添加SDL Language Weaver SDL Trados Studio用户的 LW社区用户（早期访问）（C）2）SDL自动翻译服务器途径：项目设置-添加 SDL自动翻译服务器是SDL Trados Studio用户的 SDL ATS 社区账户（S）下一步（词典序列/项目不知道啥情况）完成。（注意：其中第三步选择“是”与“否”要基于翻译内容的机密性，如果“是”，会将您所翻译的内容记忆到SDL自动翻译服务器中，可能会涉及泄密问题。）1.在 excel中如何对一列里的中文和英文分列出来1.在数据区点一下鼠标点“数据”菜单“排序,”弹出“排序”对话框“主要关键字”选你要分中英文的那一列，想让英文在前则选“升序”，想让中文在前则选“降序”点“确定”即可完成。2.如果总是英文在前中文在后。提取英文的公式是：=LEFT(A1,2*LEN(A1)-LENB(A1)提取中文的公式是：=RIGHT(A1,LENB(A1)-LEN(A1)2.问在 excel 电子表格中怎样批量删除偶数行？新建一列，第一行输入1，第 2 行输入 2，第 3 行输入 1，第 4 行输入 2，选快速输入直至底部，使这一列呈1、2、1、2 样，选中菜单项数据-筛选，在新建的那列上选择筛选1 或 2(是偶数的那个数），删除之，并取消筛选即可。3.excel 怎么自动删除空白行？数据-筛选-高级-选择不重复的记录4.excel 表如何在一列输入同一个数字？excel 表如何在一列输入同一个数字？就是在第一列输入7000 个“1”，不要用拖拉的方法，有没有更简便的方法？在列第一个单元格填入1，然后选中整列然后用快捷键CTRL加 D，也就是向下填充然后这一列就全是1 了
