(已解决)如何才能只复制数值和格式，不复制公式？

拼音佳佳

原帖由 pigjie 于 2009-3-17 10:32 发表



....

做个宏...

baayafcu

选择性粘贴->值->再用格式刷

betty2428

13楼的应该可以把，刚试了下

冲天妖狐

原帖由 拼音佳佳 于 2009-3-18 09:55 发表


做个宏...

是的，谁能帮忙做个宏？

stephen1707

复制-选择性粘贴-值和格式！

summer420

7楼的方法真实有效，你可以先试试啊，有什么搞笑的呢？~我一直都是这么做的。第二遍做粘贴值和数字格式的时候就相当于直接覆盖公式的部分了，而且也会保留你原有的文本格式啊~或者还有个办法就是直接选择移动复制工作表，然后再选择复制，粘贴值和数字格式。

zhuimeng110

我也在找 这样办法

zhczf

楼主辛苦了，学习经验

yy12388

1. Sub cr()
   
2. i = Sheet1.[a65536].End(xlUp).Row + 1
   
3. If i < 23 Then i = 23
   
4. Sheet1.Rows("2:2").Copy Sheet1.Cells(i, 1)
   
5. End Sub

复制代码

只复制数值，如何实现？

yy12388

1. Sub cr()
   
2. i = Sheet1.[a65536].End(xlUp).Row + 1
   
3. If i < 23 Then i = 23
   
4. Sheet1.Rows("2:2").Copy Sheet1.Cells(i, 1)
   
5. End Sub

复制代码

只复制数值，如何实现？