Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 2481|回复: 3

[已解决]怎么在vba加入注释以便区分?

[复制链接]
发表于 2015-1-22 13:44 | 显示全部楼层 |阅读模式
Private Sub 查询按钮_click()

Dim a, i, x
    x = Sheets(1).range("a1")
    a = Sheets(3).range("a1").CurrentRegion
    If Sheets(3).range("a1").CurrentRegion.Find(x) Is Nothing Then
    MsgBox "输入错误或机型数据不存在,请点确定重新输入", , "警告"
   
    End If

If InStr("SAF008AC,SAO008AC,SAU008AC,SAF013AC,SAO013AC,SAU013AC", range("A1")) Then
   

range("A6") = "600 * 550 * 1980"
range("C6") = "6kW"
End If
end sub

类似以上,每个命令背后都有个意图,怎么让编程的人知道每个命令的意图呢?好像直接在程序旁边打中文不行啊
最佳答案
2015-1-22 13:50
ffwewg323g32g.gif


方式1:手动在注释的前面输入单撇符号(')
方式2:点击"设置注释块",见动画
发表于 2015-1-22 13:47 | 显示全部楼层
回复

使用道具 举报

发表于 2015-1-22 13:50 | 显示全部楼层    本楼为最佳答案   
ffwewg323g32g.gif


方式1:手动在注释的前面输入单撇符号(')
方式2:点击"设置注释块",见动画
回复

使用道具 举报

 楼主| 发表于 2015-1-22 13:58 | 显示全部楼层
学习了,谢谢!
回复

使用道具 举报

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

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-4-24 15:02 , Processed in 0.277597 second(s), 10 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

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