excel是办公尤其是处理数据的一个好帮手,他能给需要进行各类数据处理提供很强大的支持,这是我在工作中遇到的一个问题,是这样的,比如有两个单元格有固定值,而另外还有一个单元格需要取随机数,但又要求不要和那两个有固定值得单元格重复。如何取呢?随机函数?rand()和randbetween()都可以,但是一时间还真想不出满足要求的写法。于是我想用VBA编写也许更简单。于是就有了下文。
在excel中不包含一些单元格数值的随机数方法
这里为了方便验证,我们将随机数值尽量取小一点,如果你要大一些的随机数,可以修改程序。
设在D1单元格里取随机数(1——5之间),A1、B1单元格为有固定数值的单元格,当然数值范围也在1——5直接,否则毫无意义。
要编写VBA,首先就要打开VBA,打开VBA的方法不止一种,这里我们就使用最简单最快捷的方式,使用快捷键吧。按“Alt F11”打开VBA窗口。VBA窗口右侧子窗口就是输入代码用的。
输入代码,如下:
如何为Excel工作表设置表格定义?
如何为Excel工作表设置表格定义?今天就由小编教大家解决这个问题!希望可以帮到大家! Excel工作表设置表格定义 1. 点击菜单栏的插入,然后选择名称下的定义。 2.输入定义名称,然后点击添加。在应用位置里可以看到这个有效性是在那一列,在此我们以B2位置为例,定义名称为“性别选择列&rdqu
Public Sub btsj()Dim sjd As Range Set sjd = Range("D1")line1: sjd.ClearContents Randomize sjd = Int(Rnd * 5 1) If sjd = Range("A1") Or sjd = Range("B1") ThenGoTo line1End IfEnd Sub
完成后就可以试运行并保存,运行是那个小三角,好像播放图标一样的,保存的图标不用多说。点击小三角图标后可能会弹出一个窗口,再点击运行即可。
为了快速验证,我们可以给宏加上快捷键,如图所示,这里我们给它设置快捷键“Ctrl s”,现在我们只要按Ctrl s就可以快速运行该宏/程序了。
注意事项
编写VBA程序的时候要细心,如果有错误提示,需要理性分析,耐心检查。
以上就是在excel中不包含一些单元格数值的随机数方法介绍,大家学会了吗?希望能对大家有所帮助!
excel2003怎么加页码
我们在打印之前都要设置页码,这样可以保证页数不会被打乱。下面让小编为你带来2003excel表格怎么加页码的方法。 2003excel表格加页码步骤如下: 1.如下图考勤表所示,文件浏览为2页,为方便管理人员看报表,需要在打印的时候添加页码。 2.返回文档,在文件菜单下,选择页面设置,如下图所示:选择页眉/