电子表格Excel如何快速以文本方式把数据复制到其他表格

1.Excel如何快速以文本方式把数据复制到其他表格

用VBA做好了。

打开A和B工作簿，再选中B工作簿，快捷键 Alt + F11 将下面代码复制到模块，运行

Sub CopyText()

' 复制A表中第一个SHEET的A1~A10，到B表的A1~A10

'A工作簿的名称、SHEET1的名称、复制的单元格、B工作簿中的黏贴位置等请自行修改

Windows("A.xls").Activate

Sheets("Sheet1").Select

Range("A1:A10").Select

Selection.Copy

Windows("B.xlsx").Activate

Range("A1").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

' 复制A表中第二个SHEET的A1~A10，到B表的A11~A20

' SHEET名等和上面一样修改

Windows("A.xls").Activate

Sheets("Sheet2").Select

Range("A1:A10").Select

Selection.Copy

Windows("B.xlsx").Activate

Range("A11").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

' 复制A表中第三个SHEET的A1~A10，到B表的A21~A30

' SHEET名等和上面一样修改

Windows("A.xls").Activate

Sheets("Sheet3").Select

Range("A1:A10").Select

Selection.Copy

Windows("B.xlsx").Activate

Range("A21").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

'其它SHEET的程序自己复制上面的程序、修改一下即可。..

End Sub

2.Excel 如何将工资单内容弄成短信发送格式的文本

一个是直接复制粘贴，将excel里面的内容复制或剪切到剪切板上面，然后再打开TXT文本粘贴即可。

第二是在保存EXCEL文档时，选择下面的保存类型，找到后缀名为（*txt）格式的文件类型。 具体步骤如下： 1.首先找出需要转换成文本格式的数字列，比如下图中的A列，然后在空白列中，比如B列的B2，输入公式“=TEXT(A2,”0.00“)，其中B2与A2对应，”0.00“指的是小数点为2位数，如果小数点为1位数的可以写上”0.0“，或者为整数的可以写上”0“。

2.写完公式之后，直接点击”Enter“回车键，结果就显示出来了，然后把鼠标放到B2边框的右下角。 3.当鼠标在B2边框右下角时，会有一个“+”号出现，这是双击鼠标左键进行下拉，这时B列将会显示与A列相对于的数值。

4.然后全选B列的所有数列，复制再粘贴，就会出现右下角一个类似粘贴的图标，点击这个图标，再点击一个123数值。 5.这时候B列的数字全部都是文本格式显示，再把B列的所有数列复制，然后粘贴到A列中，接着再把B列全部删除，这样A列的所有数字都转化成文本格式了。

这样就一切OK了。