ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

¶Ã¼Æ±a¤JRAND¡A¦p¦ó¸Õºâ¥X¤p¼ÆÂI«á­±³£¥h±¼

¶Ã¼Æ±a¤JRAND¡A¦p¦ó¸Õºâ¥X¤p¼ÆÂI«á­±³£¥h±¼

½Ð°Ý¦U¦ì¤j¤j¡ã¡ã
¥H¤U¹Ï¥Ü·Q°Ý¡A¦p¶Ã¼Æ±a¤J=RAND()*(215-(1))+(1).......     EXCELÀx¦s®æ¤º¦p¦ó¸Õºâ¥X¤p¼ÆÂI«á­±³£¥h±¼??
§Ú¤£·Q¥HÀx¦s®æ¦U¦¡->¼Æ­È->¤º³]©w

­þ­Ó¤j¤j¥i¥H±Ï§Ú~~[attachimg]32247[/

¤p¼ÆÂI«á­±³£¥h±¼.jpg (147 KB)

¤p¼ÆÂI«á­±³£¥h±¼.jpg

Helen

  1. int(Rand().........)
½Æ»s¥N½X

TOP

¦^´_ 2# ikboy


  ¤j¤j~~  µLªk¤]!!!
Helen

TOP

¦^´_ 1# §d¼ü¼ü

Sub ex1()
Range("A7:A26") = "=int(rand()*(215-(1))+(1))"
Range("A7:A26") = Range("A7:A26").Value
End Sub
{...} ªí¥Ü»Ý­n¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡

TOP

¦^´_ 1# §d¼ü¼ü

Sub ex1()
    '¶Ã¼Æ­pºâ«á¨ú¾ã¼Æ
    Range("A7:A26") = "=int(rand()*(215-(1))+(1))"
    Range("A7:A26") = Range("A7:A26").Value

    '±Æ§Ç
    Range("a7:a26").Sort key1:=Range("a7"), order1:=xlAscending, Header:=xlNo
End Sub
{...} ªí¥Ü»Ý­n¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡

TOP

¦^´_ 5# ML089


    ÁÂÁ¿߿ߤj¤j¡ã~~  ­þ¥i¥Hµ{¦¡¥[¤W¤£­«½Æªº¼Æ¶Ü?¡@¤]´N¬O»¡¶Ã¼Æ¡Ï¤£­«½Æ¡Ï±Æ§Ç
Helen

TOP

google"EXCEL°g"  blog  ©Îgoogleºô§}:https://hcm19522.blogspot.com/

TOP

¦^´_ 6# §d¼ü¼ü

Sub ex1()
    '¶Ã¼Æ­pºâ«á¨ú¾ã¼Æ
    Range("A7:A26") = "=int(rand()*(215-(1))+(1))"
    Range("A7:A26") = Range("A7:A26").Value

    '±Æ§Ç
    Range("a7:a26").Sort key1:=Range("a7"), order1:=xlAscending, Header:=xlNo
   
    '¨ú°ß¤@
    ActiveSheet.Range("A7:A26").RemoveDuplicates Columns:=1, Header:=xlNo
End Sub
{...} ªí¥Ü»Ý­n¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡

TOP

¦^´_ 8# ML089


    ÁÂÁ¿߿ߤj¤j~~~
Helen

TOP

        ÀR«ä¦Û¦b : ¯àµ½¥Î®É¶¡ªº¤H¡A¥²¯à´x´¤¦Û¤v§V¤Oªº¤è¦V¡C
ªð¦^¦Cªí ¤W¤@¥DÃD