如何使用VBscript对excel电子表格的行进行洗牌?

时间:2015-03-19 04:59:32

标签: excel vbscript shuffle

我正在使用excel电子表格,其中包含一些已订购/排序的数据。我希望通过使用VBscript动态调整行来撤消这种排序。 有没有办法可以做到这一点?

示例:假设我有10个科目,每个科目有100个问题。它们都在主题顺序中的excel表格中,我需要将它们随机播放,以便它们随机出现而不使用VBscript按主题顺序排列。

2 个答案:

答案 0 :(得分:0)

为每个条目分配一个随机数并对其进行排序。

答案 1 :(得分:0)

随机逻辑非常简单, 在列上使用 rand() - >然后使用过滤器进行排序。

  • '在单元格的第一列上应用随机公式
     oReadSheet.Cells(iRow,1)=" = Rand()"
  • '排序
    调用oReadSheet.Sort.SortFields.Add(oReadSheet.Columns(1),, xlAscending)

参考工作代码: -
Example for randomization of Excel data using vbscript