用VBA实现数字滚动到指定数字?

好久没做过了啊，我下午试着做一个看看。稍等啊。。

Excel vba设定用指定数字替代日期，其实就是提取后判断处理再组合的一个过程。VBA代码如下：Sub ZDate()EndRow = Range("A65536").End(xlUp).RowFor i = 1 To EndRowStr1 = Range("A" & i)Y = Mid(Str1, 4, 1)M = Month(Str1)D = Day(Str1)If M >= 10 Then M = Chr(M + 55)If D >= 10 Then D = Chr(D + 55)Str2 = Y & "-" & M & "-" & DRange("B" & i) .NumberFormat = "@"Range("B" & i) = Str2NextEnd Sub

至于具体所需要填写的地方就自行修改即可。思路：1、提取年、月、日的具体数据；2、判断月、日的大小；3、利用Chr函数转换成字母；4、组合新的数据填入单元格中。

最简单的方法是录制一个宏，再进入宏编辑器分析一下自然明白。
Range("E4").Select
Selection.NumberFormatLocal = "yyyy-m-d"
E4是指定单元格的名称。

用PPT做不现实，建议用Flash

这要看你是想做什么了，是一个范围的值还是确定的几个数字。在数据-》数据有效性里面。可以设置的

看下面是可以用
Excel怎样快速从数据中随机抽取n个不重复显示
Excel怎样列出合格率随机数
Excel指定文本按指定次数随机排序显示