ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索

Ribbon 开发利器-Ribbon Commander

查看数: 110177 | 评论数: 123 | 收藏 233
关灯 | 提示:支持键盘翻页<-左 右->
    组图打开中,请稍候......
发布时间: 2015-7-10 16:05

正文摘要:

一、引子 曾几何时,Office 2003时,经典的菜单开发,几乎已成定式。VBA中,廖廖数行代码,所见即所得的菜单、按钮和FaceId,尽现眼前。更有甚者,如Word中的自定义菜单,可不用一兵一卒一行代码,即可完成自定义菜 ...

回复

zyhui1961 发表于 2023-4-6 12:44
守柔 发表于 2015-7-10 16:06
二、自定义功能区的实例对照
以下代码用于比照Excel 2003中的菜单开发,Excel 2007中自定义功能区的开发以 ...

老师您好!
请你帮忙:下面是我录制的宏的内容,单独运行没有问题。
    Sheets("成绩查询").Select
    Range("AA5:AA69").Select
    Selection.Copy '复制文本
    Range("Z5").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=F
alse, Transpose:=False '粘贴数值
    Range("Z5").Select
可是我加一个工作表事件,为什么就运行不了?
Private Sub Worksheet_Change(ByVal Target As Range) '工作表触发事件
    Set Myrng = Range("A1")   
    Sheets("成绩查询").Select
    Range("AA5:AA69").Select'老是从这个地方开始卡住了
    Selection.Copy '复制文本
    Range("Z5").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False '粘贴数值
    Range("Z5").Select
End Sub
joelzhang 发表于 2023-3-31 10:23
下载学习下,感谢!!!!!!
smsn 发表于 2023-3-7 19:44
2163kjh 发表于 2022-8-2 22:06
https://club.excelhome.net/thread-1635677-1-1.html
ribbon xml editor  完美汉化版
游乐缘 发表于 2021-11-29 09:53
留名学习,太强大了
supest 发表于 2021-9-11 17:44
image.png
里面的产品怎么装不上呢?提示连接失败?从网上只能找到V1.1.232,官网提示最新是V1.1.247,是版本旧的缘故吗?谁有最新版呢?
hbk0401 发表于 2021-8-31 17:16
生成的RIBBON工具栏中, Large的按键Label在下方显示, normal的按钮Label在右方显示.
那能不能让normal的按钮Label也显示在下方呢?或者不显示呢?(label=" "这个其实是占用显示空间的)
txxy200 发表于 2021-5-7 14:54

留名后,再学习~
zjsico 发表于 2021-5-3 07:27
不错,学习中

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-4-18 13:28 , Processed in 0.034255 second(s), 15 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表