在excel中不包含一些单元格数值的随机数方法
发布时间：2023-07-12 13:59:08
excel是办公尤其是处理数据的一个好帮手,他能给需要进行各类数据处理提供很强大的支持，这是我在工作中遇到的一个问题，是这样的，比如有两个单元格有固定值，而另外还有一个单元格需要取随机数，但又要求不要和那两个有固定值得单元格重复。如何取呢?随机函数?rand()和randbetween()都可以，但是一时间还真想不出满足要求的写法。于是我想用VBA编写也许更简单。于是就有了下文。
在excel中不包含一些单元格数值的随机数方法
这里为了方便验证，我们将随机数值尽量取小一点，如果你要大一些的随机数，可以修改程序。
设在D1单元格里取随机数(1——5之间)，A1、B1单元格为有固定数值的单元格，当然数值范围也在1——5直接，否则毫无意义。
要编写VBA，首先就要打开VBA，打开VBA的方法不止一种，这里我们就使用最简单最快捷的方式，使用快捷键吧。按“Alt+F11”打开VBA窗口。VBA窗口右侧子窗口就是输入代码用的。
输入代码，如下：
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程序的时候要细心，如果有错误提示，需要理性分析，耐心检查。
0
投稿猜你喜欢
相信大家都知道，无论是哪个版本的微软操作系统都会带有防火墙功能，它可以自动阻止一切不明程序或者有毒程序的侵害，不过，防火墙有些时候实在是太严- Win10专业版的系统有很多，版本后面都是带一串数字，不知道朋友们有没有注意到这些数字，很多小伙伴都不知道自己电脑的版本号是什么，如何查看W
- kirakira怎么拍摄live视频？kirakira是款可以拥有闪光特效的相机类软件，让你的手机拥有特效处理照片的能力，具有不日炫光和万花
- 和很多网友一样，小编这两天也将自己的电脑升级到了最新版Win10创作者更新。话说新系统的好处就不多说了，比方说那个“夜灯”其实就是对俺这样夜
- 将文本复制到Word文档时有时会带有文本格式，每次都需要自己选择为无格式文本粘贴，有没有更加便捷的方法呢？本文将给大家介绍如何直接使用Wor
- 微软面向 Beta 频道发布了 Windows 11 预览版 Build 22621.450 和 Build 22622.450 (KB50
- 我们都知道Mac电脑一般使用的是蓝牙键盘，在我们没有蓝牙键盘，只有PC电脑键盘的时候怎么办？其实Mac电脑也可以设置使用PC键盘，下面分享M
- 在Word2003中插入图片以后,我们可能会对一些图片修改一下样式或者是将图片和文字摆放位置稍微作出调整,那么word如何设置图片文字的环绕
- Excel中的公式具体该如何操作才能从公式变成数字呢?下面是由小编分享的excel把公式变成数字的教程，以供大家阅读和学习。excel把公式
- 在word 中所谓页边距就是指内容离文档边缘的距离，页边距越大空白位置越多，当然要决定页边距的宽窄还是要取决于工作中的具体需要，例如，当用户
- 外星人Alienware M15 R4是一款娱乐影音笔记本电脑，其采用了英特尔酷睿第10代i7处理器以及发烧级核芯显卡，能够满足用户们日常娱
- win7磁盘被保护怎么取消？有些用户在对磁盘进行操作的时候会遇到提示窗口显示“磁盘被保护”的情况，这种情况出现的原因是启用了磁盘保护功能。那
- excel表格是办公软件中最常用的东西，操作简单，用户可以通过筛选来集中选择自己想要的内容，下面小编教你excel怎样筛选自己所需要的表格。
- word怎么绘制一幅春节对联效果？word中想要绘制一幅春节对联，该怎么绘制呢？下面我们就来看看详细的画法，很简单，需要的朋友可以参考下今天
- 我们都知道wps是一款集word文档、ppt以及excel表格等软件的强大功能与一体的办公软件，这也说明了用户可以在wps软件中完成不同类型
- 近期有小伙伴发现自己的电脑开机内存就占用50％，并且伴有卡顿现象出现，经过一番检查后，发现是windows update这个服务的出的问题，
- 在iPadOS 17中，苹果推出重新设计的锁定屏幕与交互式小组件！升级iPadOS 17 预览版后，用户可个性化设置锁定屏幕和与小组件交互的
- win10Xbox是win10系统自带的游戏平台，全称Xbox Game BAR，很多的用户都还不是很熟悉他，录屏的时候怎么更省力呢，今天就
- step01 打开Word，点击菜单“视图—工具栏—窗体”，打开“窗体”工具栏。step02 在文档中选中客户输入文字的地方，一般都是下划线
- 这篇文章主要介绍了Windows任务管理器没有菜单栏的解决方法图文教程,小编就经常会遇到这个情况,其实还原方法很简单,看完本文你也会的,需要
