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

[¤À¨É] ÀH¾÷²£¥Í

[¤À¨É] ÀH¾÷²£¥Í

ÀH¾÷²£¥Í A~Z  a~z  0~9 ¤T¶µ ¥B«ö¤ñ²v²£¥Í  ¨ä·N¦r¥À26­Ó ²£¥Í¾÷·|¸û¦h ¼Æ¦r 10¸û¤Ö
google"EXCEL°g"  blog  ©Îgoogleºô§}:https://hcm19522.blogspot.com/

¥»©«³Ì«á¥Ñ singo1232001 ©ó 2023-10-17 18:43 ½s¿è

¦^´_ 1# hcm19522


    Sub test()
tx = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789"
Debug.Print Mid(tx, Round(Rnd * 62, 0) + 1, 1)
End Sub




Sub ¤Q²ÕÀH¾÷¼Æ1¨ì62()
For i = 1 To 10
Debug.Print Round(Rnd * 62, 0) + 1
Next
End Sub

TOP

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

TOP

        ÀR«ä¦Û¦b : ¡i¬°µ½Ävª§¡j¤H¥Í­n¬°µ½Ävª§¡A¤À¬í¥²ª§¡C
ªð¦^¦Cªí ¤W¤@¥DÃD