您好,这里是“E图表述”为您讲述的Excel各种知识。
【前言】
上期内容发布后,很多人都说“引出的数据都没有排序”,作者只能说“好吧,我再给你写一个可以排序的内容吧”。但是作者还要说一点:学以致用,用中求学。你是想做人上人,就要吃苦中苦,VBA不像函数,ActiveX控件更不是生拉硬套,当有需要去主动“设计”而不能套用的的时候,如果你不行,就看行的人去吃“蛋糕”吧,但是你没有权利抱怨。
【正文】
上次的动图效果,“还给”同学们一个可以排序的Checkbox控件,而且“加大难度”,我们不使用Commandbutton控件,只需要选择“复选框”,就可以出导出内容
上期效果:
上期内容
本期效果:
步骤1:
按窗体控件布局如下:
没有Commandbutton控件了,我们的数据怎么导出呢?这是个问题。我们可以利用CheckBox_Click事件。
步骤2:
对CheckBox1控件,这么多的Checkbox控件,你知道哪个是Checkbox1控件吗?如果你对E图表述的公众号,尤其是控件实例部分有关注的话,就应该有一个比较“好的使用习惯”,当你设置这4个复选框控件的时候,应该是顺序添加,而不应该“跳跃”,如果是顺序添加的,那么顺理成章的,这4个复选框的Checkbox(i)的i值,就也应该是顺序排列的。赶紧学起来吧,控件是一个很好玩的内容。
右键选择Checkbox1.Caption为“西游记”的控件,鼠标右键——“查看代码”,默认弹出控件的Click事件,输入下面的代码,
步骤3:
按照第1个控件的内容,将其他几个控件的Click事件也添加上代码,注意一点,Click的隶属控件名称,在工程名称中是不一样的,及此完成。
如下:
Private Sub CheckBox1_Click()
代码如上
End Sub
Private Sub CheckBox2_Click()
代码和上面一样
End Sub
Private Sub CheckBox3_Click()
代码依然和上面一样
End Sub
Private Sub CheckBox4_Click()
同样的操作过程,代码还是和上面一样
End Sub
【编后语】
你要的排序给你了,如果你不会太高级的方式,那么就用思路来弥补吧,记住“勤能补拙”。如果技术不过硬,又不想动脑子,那么就看着别人吃“蛋糕”吧。
如果上面的内容对您还有帮助,或者觉得作者比较用心。可以关注、在看、转发朋友圈,便于您继续观阅和浏览往期的“Excel干货分享”。微信公众号:“E图表述”或者“Excel_Easy”
领取专属 10元无门槛券
私享最新 技术干货