当前位置:首页教育技巧excel技巧excel数据库

excel表格怎么跳格选定

2024-08-09 15:18:22


1.大家好,请问EXCEL表格自动跳格的命令如何写

把以下代码复制到对应页面的VBA窗口即可。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Target.Row = 28 And Target.Column = 3 Then

Range("F8").Select

ElseIf Target.Row = 28 And Target.Column = 6 Then

ActiveWindow.SelectedSheets.PrintOut Copies:=1

Range("C8:C27") = ""

Range("F8:F27") = ""

Range("C8").Select

End If

End Sub

关于扫描条形码就切换页面的功能,本人认为不宜使用。原因是:扫描条码是一个输入动作,与按下键盘上的字母键或数字键的功能是一样的,扫描动作之后,是向当前选中的Excel单元格内写入字符,而不是击发切换页面命令,实际会产生并不是想要的结果。

2.Excel中怎样实现部分表格自动跳格

打开你的Excel文档,点击“工具”->宏->宏,输入auto_open点击创建进入代码编辑窗口,输入代码,然后保存退出,重新打开文档就生效:

Sub auto_open()

Application.OnKey "0", "a"

Application.OnKey "1", "b"

Application.OnKey "2", "c"

Application.OnKey "3", "d"

Application.OnKey "4", "e"

End Sub

Sub a()

ActiveCell.Value = 0

SendKeys "{Enter}"

End Sub

Sub b()

ActiveCell.Value = 1

SendKeys "{Enter}"

End Sub

Sub c()

ActiveCell.Value = 2

SendKeys "{Enter}"

End Sub

Sub d()

ActiveCell.Value = 3

SendKeys "{Enter}"

End Sub

Sub e()

ActiveCell.Value = 4

SendKeys "{Enter}"

End Sub

说明:

(1)Application.OnKey "0", "a"表示按下主键盘上的0(小键盘没效,如果你需要自已补充),就执行a过程.

(2)在Sub a()和Sub b()里是根据不同的按键输入不同的数值,再用SendKeys "{Enter}"输入回车,你可以在"工具"->选项->编辑 里面设置Enter键的方向.

相关信息


电脑版

【免责声明】本站信息来自网友投稿及网络整理,内容仅供参考,如果有错误请反馈给我们及时更正,对文中内容的真实性和完整性本站不提供任何保证,不承但任何责任。
版权所有:学窍知识网 Copyright © 2011-2025 www.at317.com All Rights Reserved .