Excel精英培训网

 找回密码
 注册

QQ登录

只需一步,快速开始

工作中常用的Excel函数公式,全印在一张超大鼠标垫上
查看: 348|回复: 3

[已解决] 在ComboBox2显示 ComboBox1中的字母部分,其它不显示,效果类似D列公式

[复制链接]
发表于 2020-1-14 09:43 | 显示全部楼层 |阅读模式
本帖最后由 iphone9 于 2020-1-14 19:04 编辑

在ComboBox2显示 ComboBox1中的字母部分,

其它不显示,类似D列公式效果!请老师帮忙~!!!
2020-01-14_094418.jpg
提取英文2.rar (18.75 KB, 下载次数: 4)
发表于 2020-1-14 11:35 | 显示全部楼层
用一个循环,逐个截取每个字符,然后用ASC码来判断。所有的大些字母和所有的的小写字母的ASC都集中在某个数字区间,你去网上查一下ASC码就会判断了。

回复

使用道具 举报

发表于 2020-1-14 11:39 | 显示全部楼层
Private Sub ComboBox1_Change()
    ss = ComboBox1.Text
    For I = 1 To VBA.Len(ss)
       If Mid(ss, I, 1) Like "[a-z,A-Z]" Then
           aa = aa & Mid(ss, I, 1)
       End If
   Next I
   ComboBox2.Text = aa
End Sub

回复

使用道具 举报

 楼主| 发表于 2020-1-14 19:04 | 显示全部楼层
scl5801 发表于 2020-1-14 11:39
Private Sub ComboBox1_Change()
    ss = ComboBox1.Text
    For I = 1 To VBA.Len(ss)

谢谢~!完美解答
回复

使用道具 举报

*滑块验证:
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2020-8-14 04:38 , Processed in 0.062400 second(s), 4 queries , Gzip On, Redis On.

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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