
Excel
1、首先我们打开一个工作样表作为例子。
2、使用 alt+f11组合快捷键 进入 vbe编辑器, 插入一个新模块,在模块编辑框中输入以下代码:
Option Explicit
Sub asc()
Dim Num1%, Num2%
Num1 = asc(excel) '返回69
Num2 = asc(e) '返回101
[a1] = Num1= : [b1] = Num1
[a2] = Num2= : [b2] = Num2
End Sub
3、这里我们声明变量类型的方式和原来的不一样,使用的是 %符号 ,其实代表的就是as integer,效果是一样的。
4、这里我们给两个变量赋值, 赋值的内容为字符串excel和字符串e ,但是并不是那么简单,我们给的值是 asc()函数转换的代码 。其中excel使用asc()函数只是取字符串首位字母的代码。这里区分大小写。
5、然后我们将值写入单元格中, 单元格可以直接用[]中括号加上序列表示 ,比如[a1]就代表的是a1单元格,所以这里表现就是在a1单元格中输入num1字符串,并在a2单元格内输入asc值。
6、插入一个按钮并指定宏,我们运行后得到了正确的结果。另外,我的这个过程是可以正常运行,但是asc被指定按钮时会报错,大家可以选择其他的过程名,就可以指定按钮了。
Copyright © 2025 IZhiDa.com All Rights Reserved.
知答 版权所有 粤ICP备2023042255号