Excel精英培训网

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

[已解决]如何读取COMBOBOX所选的值

[复制链接]
发表于 2012-9-7 18:46 | 显示全部楼层 |阅读模式
读取COMBOBOX所选的值出现问题,救助.....
谢谢


Option Explicit


Private Sub ComboBox1_Change()
name = ComboBox1.Value
End Sub
Private Sub ComboBox2_Change()
p = ComboBox2.Value
End Sub
Private Sub CommandButton1_Click()
UserForm1.Hide
End Sub
Private Sub UserForm_Initialize()
ComboBox1.List = Range("b5", "b1251").Value
ComboBox2.AddItem "10"
ComboBox2.AddItem "20"
ComboBox2.AddItem "90"
End Sub




Public name As String, p As Integer
Sub ssl()

UserForm1.Show

Range("C1").Value = name
Range("C2").Value = p
End Sub


最佳答案
2012-9-7 18:57
本帖最后由 zjdh 于 2012-9-7 19:03 编辑

combobox.rar (29.65 KB, 下载次数: 395)

combobox.rar

26.27 KB, 下载次数: 80

excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
发表于 2012-9-7 18:54 | 显示全部楼层
回复

使用道具 举报

发表于 2012-9-7 18:57 | 显示全部楼层    本楼为最佳答案   
本帖最后由 zjdh 于 2012-9-7 19:03 编辑

combobox.rar (29.65 KB, 下载次数: 395)
回复

使用道具 举报

发表于 2012-9-7 18:59 | 显示全部楼层
本帖最后由 hwc2ycy 于 2012-9-7 19:15 编辑

combobox.rar (32.14 KB, 下载次数: 63)
回复

使用道具 举报

发表于 2012-9-7 19:19 | 显示全部楼层
变量名称定义错误,name 是VBA的保留字。把变量 name 改成 name1 或 myname 就行了
回复

使用道具 举报

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

本版积分规则

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

GMT+8, 2024-3-29 02:07 , Processed in 0.486507 second(s), 10 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

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