«ç¼Ë±N¤@¨Ç¼ÆÈRAMDOM ¨ì¤£¦PªºÀx¦s®æ
- ©«¤l
- 48
- ¥DÃD
- 1
- ºëµØ
- 0
- ¿n¤À
- 53
- ÂI¦W
- 0
- §@·~¨t²Î
- XP
- ³nÅ骩¥»
- 2010 & 2003
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- ¨Ó¦Û
- China
- µù¥U®É¶¡
- 2013-1-12
- ³Ì«áµn¿ý
- 2013-11-23
|
¦pªG¤£©w单¤¸®æªº话¡A2#´N¥i¥H¤F
¦pªG¬O¦b©wªº单¤¸®æ¤¤随Éóªº话¡A´N¦³点³Â烦¤F¡C
n¥ý将©w单¤¸®æ¦s¤J数组A¡A¨Ï¥Î经¨åºâªk产¥Í¤£«Î`随Éó数¡A¶ñ¤J¤W±数组Aªº¦P«¬数组B
¦A将A1¶ñ¤J数组B编号为1对应¤U标ªº¨º个数组A单¤¸®æ¤¤ |
|
¦V°ª¤â学习
|
|
|
|
|
- ©«¤l
- 48
- ¥DÃD
- 1
- ºëµØ
- 0
- ¿n¤À
- 53
- ÂI¦W
- 0
- §@·~¨t²Î
- XP
- ³nÅ骩¥»
- 2010 & 2003
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- ¨Ó¦Û
- China
- µù¥U®É¶¡
- 2013-1-12
- ³Ì«áµn¿ý
- 2013-11-23
|
For i = 0 To 9
Cells(WorkSheetFunction.RandBetween(2,Rows.Count*Columns.Count)).Value = Range("A1").Offset(i, 0)
Next |
|
¦V°ª¤â学习
|
|
|
|
|