2011-11-18 51 views

回答

9

我会做到这一点的方法是:

  • 细胞L2,输入公式="'"&K2
  • 使用填充柄或Ctrl+D来填补它直至K列值的长度。
  • 选择整列L的值,并将其复制到剪贴板
  • 选择K栏相同的范围内,单击鼠标右键,选择“选择性粘贴”,然后选择“价值”
+0

欢呼队友DAT的技巧:) –

21

我将暗示不明显。在Visual Basic编辑器中有一个很棒的(并且经常被使用不足的)工具,叫做即时窗口。基本上,你可以在VBA中写出命令并在现场执行它们,有点像命令提示符。 这是这样的情况的完美。

按ALT + F11打开VBE,然后按Control + G打开立即窗口。 请输入以下内容并按回车键:

for each v in range("K2:K5000") : v.value = "'" & v.value : next 

和繁荣!你们都完成了。无需创建宏,声明变量,不需要拖放和复制等。关闭窗口并重新开始工作。唯一的缺点是撤销它,你需要通过代码来完成,因为VBA会破坏你的撤消堆栈(但这很简单)。

+1

大多数人都不知道,你可以使用:运行完整的循环和代码(直接窗口中的代码被限制为一行动每行,这是错误的来源)。 – aevanko

+1

Excel 2010中的ATL + F11 – Marnee

+1

已修复。感谢您指出了这一点! – aevanko

0

更普遍可以是: 对于每个V选择:v.value = “'” & v.value:执行

0

我使用concantenate之前下一个 以及选择单元格范围。为我工作。

  1. 填充J2-J14与“(appostrophe)
  2. 进入L2与式= concantenate(J2,K2)
  3. 拷贝L2至L3-L14
相关问题