|
|
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件 ★ 免费下载 ★ ★ 使用帮助★
本帖最后由 autoregsony 于 2018-7-31 00:45 编辑
之前做了一个xls表格里使用的背单词卡片。具体见附件rar
（使用的是wps制作的。公司装的是wps。内网only。所以自制一个上班时无聊可以过过需要记忆的东西）
使用这个方式做随机
MaxRow = Sheets("单词").[A65536].End(xlUp).Row
Set Ra = Sheets("单词").Cells(1, 1).Resize(MaxRow, 1)
Range("A1") = Ra(Int(Rnd() * Ra.Count + 1))
random.rar
(15.61 KB, 下载次数: 19)
不足之处：
1.词语越来越多，随机得来无法针对性抽取。
2.这个随机好像还随得挺真的，经常会出现整个词库都过了一遍了，但是还有几个单词是没有随到的。
不知道该怎么做假随机比较好，就是也照顾一下随机出现次数比较低的词语。
所以特来求助大佬们，
请问如何可以做到这个效果？
通过在某单元格(如附件中的表1[K11])录入1、2、3、4来进行课程筛选,
（输入1时，只随机出课程1的单词）
而录入ALL的时候就是全部随机。
后续还想加一个「已认得」按钮，认识的就再在库中标记，这样就不进入随机队列了~需要全员复习的时候，再把标志移一列就好了。
单词 | 发音 | 中文 | 课程 | 学习次数 | C | 发音C | 中文C | 1 |
| D | 发音D | 中文D | 1 | 1 | E | 发音E | 中文E | 2 | 1 | F | 发音F | 中文F | 2 |
| AV | 发音AV | 中文AV | 3 |
| AW | 发音AW | 中文AW | 3 |
| AX | 发音AX | 中文AX | 3 |
| AY | 发音AY | 中文AY | 4 | 2 | AZ | 发音AZ | 中文AZ | 4 |
| A | 发音A | 中文A | 4 |
| B | 发音B | 中文B | 4 | 2 | C | 发音C | 中文C | 4 |
| D | 发音D | 中文D | 4 | 1 | E | 发音E | 中文E | 4 | 2 |
小弟在此先谢过各位大佬了~~！
|
|
沪公网安备 31011702000001号 沪ICP备11019229号-2
发表于 2018-7-31 00:42
楼主