关于EXCEL 宏的使用,急求解

[复制链接]
查看11 | 回复4 | 2013-6-29 17:19:17 | 显示全部楼层 |阅读模式
改成以下形式Sub 正常上班()'' 正常上班 Macro' 宏由 User 录制,时间: 2013-6-29Selection.Value = "√"End Sub 这样的话可以一次选中多个单元格,然后将选中的多个单元格均打上"√" 附件中的文件你可以看下 附件中的“通过按键”这个表中有两个按键“开始打钩”“结束打钩”,当点击“开始打钩”后会自动在你所选中的单元格中自动打钩,点击“结束打钩”即可停止自动打钩。 附件中的“通过运行宏”这个表中你先选中需要打钩的单元格,然后运行宏即可在你选中的单元中打钩...
回复

使用道具 举报

千问 | 2013-6-29 17:19:17 | 显示全部楼层
Sub 正常上班()'' 正常上班 Macro' 宏由 User 录制,时间: 2013-6-29ActiveCell.value = "√"End Sub实际上你还可以写一个自定义函数:Function YN(Byval Rng As Range)
select case Rng.value...
回复

使用道具 举报

千问 | 2013-6-29 17:19:17 | 显示全部楼层
把Range("D6").Select删除,改为Sub 正常上班() '' 正常上班 Macro' 宏由 User 录制,时间: 2013-6-29''ActiveCell.FormulaR1C1 = "√"Range("E6").SelectEnd Sub...
回复

使用道具 举报

千问 | 2013-6-29 17:19:17 | 显示全部楼层
上下两个range.select都删掉,直流中间active那一句就可以了。话说直接打个√也要不了多久啊……...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行