Excel中怎样把多个文本框里面内容比较快的方法复制到同一个文本框？
多个不同的文本框的内容复制到同一个文本框
你自己试成功了再告诉我，谢谢！
方括号的方法比较好！
两个方法：
1、三楼的方法可以做到，缺点是组合后的文本没有换行。
2、更好的办法是选中所有要复制的单元格后，拷贝粘贴到Notepad(记事本）里，再将全部内容拷贝粘贴到Excel目标单元格中。粘贴时要点进单元格，出现I光标时再贴，就不会贴到多个格中，而是以内部换行的方式出现在同一格中。
1、三楼的方法可以做到，缺点是组合后的文本没有换行。
2、更好的办法是选中所有要复制的单元格后，拷贝粘贴到Notepad(记事本）里，再将全部内容拷贝粘贴到Excel目标单元格中。粘贴时要点进单元格，出现I光标时再贴，就不会贴到多个格中，而是以内部换行的方式出现在同一格中。
温馨提示：答案为网友推荐，仅供参考
第1个回答 2009-01-08
用操作的方法只能一个一个复制粘贴。如果文本框比较多的话，编一段代码还快些。
比如有10个文本框，分别是文本框1～文本框10，要将其内容同时复制到文本框11里。
Sub abc()
kkk = ""
For i = 1 To 10
ActiveSheet.Shapes("Text Box " & i).Select
kkk = kkk & Selection.Characters.Text
Next
ActiveSheet.Shapes("Text Box 11").Select
Selection.Characters.Text = kkk
End Sub
Alt+F11,插入一个模块，将下面代码复制进去，然后执行这个宏即可。
比如有10个文本框，分别是文本框1～文本框10，要将其内容同时复制到文本框11里。
Sub abc()
kkk = ""
For i = 1 To 10
ActiveSheet.Shapes("Text Box " & i).Select
kkk = kkk & Selection.Characters.Text
Next
ActiveSheet.Shapes("Text Box 11").Select
Selection.Characters.Text = kkk
End Sub
Alt+F11,插入一个模块，将下面代码复制进去，然后执行这个宏即可。
第2个回答 2009-01-08
全部选中按ctrl+c复制，然后ctrl+v粘贴就可以啦
第3个回答 2009-01-08
在要复制到同一个文本框中输 =第一个单元格&第二个单元格&第三个&....最后一个。确定
