Excel精英培训网

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

一个很简单的转换acs码的程序遇到了麻烦

[复制链接]
发表于 2012-5-25 09:45 | 显示全部楼层 |阅读模式
先说好,我是纯新手,刚接触vba两天。。。。

我想用个简单的range("A1")这个东西调用值,但是里面这个A想靠自己计算得出,但是出现了很搞笑的状况。程序如下(这个只是测试程序):
第一次这么写
Dim aaa As Integer
Dim bbb As String
aaa = 1
bbb = Chr(69)
Worksheets(2).Range("E" & aaa).Value = "行 = " & bbb
运行结果在E列1行得到E这个很好,但是我的目标是在range里面把“E”替换为bbb,因为bbb中chr里面的值我原本的程序能通过计算获得(不过这东西就是个简单计算,就不写了),于是程序如下:
Dim aaa As Integer
Dim bbb As String
aaa = 1
bbb = Chr(69)
Worksheets(2).Range("bbb" & aaa).Value = "行 = " & bbb
这下好了,这个E显示到BBB列1行去了。。。不是按道理还是应该在E行1列显示么?能显示E,就说明bbb获得出来E了,但是为什么“E”&aaa就跑到那么老远了。。。

来求教各位高手,应该如何纠正这个错误?谢谢~
发表于 2012-5-25 09:58 | 显示全部楼层
坚持看完,终于晕倒了

不知希望的结果是怎样的?
回复

使用道具 举报

发表于 2012-5-25 11:15 | 显示全部楼层
楼主是想学学VBA还是好的,至于在实际中这么做的话,实在不好说什么,   bbb 你跑那么远干什么? 因为bbb你定义的是一个变量,不用加 “”加了变成了bbb字符了, "bbb" & aaa 与bbb&aaa是不同的,楼主应是 bbb&aaa  不是"bbb"&aaa   "bbb"<>bbb ,bbb<>"bbb"
回复

使用道具 举报

发表于 2012-5-25 11:48 | 显示全部楼层
如果相让结果在e1中,直接采用下面的指令就行了
Worksheets(2).Range(aaa,5).Value = "行 = " & bbb 或
Worksheets(2).Range("E" & aaa).Value = "行 = " & bbb

回复

使用道具 举报

发表于 2012-5-25 11:52 | 显示全部楼层
第一个cells(),
如果相让结果在e1中,直接采用下面的指令就行了
Worksheets(2).cells(aaa,5).Value = "行 = " & bbb 或
Worksheets(2).Range("E" & aaa).Value = "行 = " & bbb

回复

使用道具 举报

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

本版积分规则

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

GMT+8, 2024-6-16 02:14 , Processed in 0.111399 second(s), 7 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

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