自动结转带公式的数据，结转后无公式

fynh · 发表于 2004-6-15 09:45

8z9xnmyR.rar (14.81 KB, 下载次数: 354)
这是个很有用的小东东，我一直在用。现在送给大家。
在示例文件中按一下“结转"按钮,期末数可以转到期初，并且结转后的数不带公式，这种方法可以延伸一下，用到很多方面，我一直用的很好，下面是这个程序，很容易看懂并可自己修改。并且可以放到其它的程序中综合应用。
Sub 转期末数()
Sheets("科目汇总").Select '选择数据存放工作表
Range("G2:G62").Select '选择选定工作表中要转换的带列单元格
Selection.Copy
Sheets("科目汇总").Select '选择目标数据存放工作表，(也可以选别的工作表)
Range("D2").Select '选择目标数据存放工作表中的起始单元格
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End Sub

xiaojimin · 发表于 2004-7-3 10:18

谢谢！！

junestar · 发表于 2004-7-22 15:12

太好了,我一直在找这个东西

ladhome · 发表于 2004-7-22 22:33

通过宏记录就能得到这段代码，方法：工具——宏——记录新宏。然后作以下操作：选择源单元格区域——复制——选择目标单元格的首个单元格——选择性粘帖——数值——停止记录宏。

[此贴子已经被作者于2004-7-22 22:34:55编辑过]

xd3210 · 发表于 2004-7-23 07:47

学习Excel的方法:
带着问题学,带着任务学,即学即用支持7楼！

hyfyb · 发表于 2004-10-11 19:31

支持支持支持支持。

dd_qq1980 · 发表于 2004-10-19 14:12

谢谢！

jlqjlx · 发表于 2005-1-22 12:00

谢谢！！

rzz8118 · 发表于 2005-1-24 11:35

<DIV class=quote>以下是引用ladhome在2004-7-22 22:33:00的发言：
通过宏记录就能得到这段代码，方法：工具——宏——记录新宏。然后作以下操作：选择源单元格区域——复制——选择目标单元格的首个单元格——选择性粘帖——数值——停止记录宏。
</DIV>

rjtang · 发表于 2012-4-11 19:02

下载待用，谢谢！

		自动登录	找回密码
密码			免费注册

[分享] 自动结转带公式的数据，结转后无公式

[转帖]