Office中国论坛/Access中国论坛

标题: 如何改写下面的VBA让他不翻页也能达到一样的效果 [打印本页]

作者: 369218787 时间: 2012-2-29 19:29
标题: 如何改写下面的VBA让他不翻页也能达到一样的效果
本帖最后由 369218787 于 2012-2-29 19:30 编辑

Sub 下一条()

'

' 下一条 Macro

' 宏由彭涛录制，时间: 2012-2-29

'

'

ActiveSheet.Previous.Select

ActiveCell.Offset(1, 0).Range("A1").Select

Selection.Copy

ActiveSheet.Next.Select

Range("C3

4").Select c3 : d4

ActiveSheet.Paste

Application.CutCopyMode = False

End Sub

我的邮箱369218787@qq.com

作者: JosephTan 时间: 2012-2-29 19:38
发错地方了吧

作者: 369218787 时间: 2012-4-23 13:46

JosephTan 发表于 2012-2-29 19:38
发错地方了吧

可能是，谢谢了，我在录的时候先用快捷键调好位置就可以了。

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)