VBA如何实现对二维数组随机乱序

文摘   2024-11-09 11:31   湖北  

今天我要用VBA代码助手的AI功能来帮我写一个数组随机乱序函数,实现对任意数组的随机打乱功能,以往要写这个代码,自己敲还是有一定难度的,不过有了AI的帮助,这个问题会变得非常简单,从准备数据到写代码到测试,全程由VBA代码助手的AI功能辅助完成!

1. 准备数据 让AI帮我们生成一组数据备用

写回VBA里 点击运行 即可得到要测试的数据

2  随机排序的算法逻辑

一说到排序,很多同学就开始联想到7大排序算法,什么冒泡排序,插入排序,归并排序,快速排序一大堆,其实大可不必,有了AI以后,完全不需要关心这类底层实现逻辑,更何况今天要做的排序更简单,我们要看到问题的本质,所谓的随机乱序,实际上只需要考虑数组下标,随机乱序的步骤就3步

  • {来源数组}行下标放入一个一维数组{下标数组}

  • {下标数组}随机打乱

  • 定义一个和{来源数组}一样大小的{结果数组},按{下标数组}从{来源数组}装入数据 返回{结果数组}


那以前,上面的这些步骤得自己1个单词1个单词的敲出来,现在AI的出现让事情变得异常简单,只要和我一样准确的描述出需求和解决问题的步骤,就可以直接让AI生成代码,一次成功!

2  测试写好的排序函数

我实在太懒了,懒到测试也不想写,还是让AI来帮我写测试代码

'系统中已经存在函数{随机打乱二维数组(来源数组)}'数据区为A1:C1往下到最大行的区域 装入数组{arr}'调用 {随机打乱二维数组(arr)} 对{arr}随机打乱得到结果数组'结果数组一次性输出到E1

懒是人类进步的阶梯 果然没说错的!  写好需求扔给代码助手

就是这么简单!

每次运行都会得到一个重新打乱的结果数组

今天这个代码的实现,在传统VBA编程学习中,最少也得学上一两个月,很多同学学了几年甚至都无法写出这样代码,这就是AI的魅力,可以让我们用最少的学习成本,来得到最大的学习成果

最近我正在录制新课程  郑广学VBA-AI编程7日速通班

新学员398元送VBA代码助手VIP 

老学员半价200   试学网址v.excel880.com

课程咨询加我微信EXCEL880B

买课程可进永久答疑群,课程可免费试学点击下方链接即可

郑广学Excel实战教程



EXCEL880
Excel/WPS办公技巧分享 郑广学VBA/VSTO/JSA教程分享 课程咨询及付费定制表格加EXCEL880B
 最新文章