有个小问题请教线上大佬

lcxq120713 · 发表于 2022-12-1 10:58

aa = Sheet1.TextBox1.Value
Debug.Print aa
bb = aa + 1
Debug.Print bb

文本填入B，aa打印出B；我想让bb等于C,应该怎么写？

陆离Lowry · 发表于 2022-12-1 11:16

什么乱七八糟的，看都看不懂啊

lcxq120713 · 发表于 2022-12-1 11:18

陆离Lowry 发表于 2022-12-1 11:16
什么乱七八糟的，看都看不懂啊

就是列与列之间有计算公式么比如:D-2 = B 大概这样

MOY838840554 · 发表于 2022-12-1 11:18

用asc2码,字母A是65开始
主要两个函数
chr(编号) >>>输出字符
asc(字符) >>>输出编号

例如
chr(65) 输出：A
asc("A") 输出：65

那么先用asc函数获取编号+1，再用chr转成字符就行
bb=chr(asc(aa)+1)

lcxq120713 · 发表于 2022-12-1 11:21

MOY838840554 发表于 2022-12-1 11:18
用asc2码,字母A是65开始
主要两个函数
chr(编号) >>>输出字符

哦哦明白了谢谢感谢

陆离Lowry · 发表于 2022-12-1 11:22

lcxq120713 发表于 2022-12-1 11:18
就是列与列之间有计算公式么比如:D-2 = B 大概这样

用column、code、char转化

MOY838840554 · 发表于 2022-12-1 11:23

本帖最后由 MOY838840554 于 2022-12-1 11:27 编辑

不过这样不准，因为列可以超过26，如果计算超过26的计算，还是用columns，offset偏移列,然后获取address

		自动登录	找回密码
密码			免费注册