以下是一個簡單的亂數密碼產生函式 首先您在 Excel ,按下 Alt-F11,開啟 Visual Basic, 然後選擇 “插入”→"模組”,把以下程式碼輸入,就完成一個函式 RandPwd() 如果要使用它,就在 Cell 裡輸入 =RandPwd(8),該格就會產生一個8碼長度的亂數密碼 Public Function RandPwd(Num As Integer) Dim Rand As String Application.Volatile Do i = i + 1 Randomize Rand = Rand & Chr(Int((85) * Rnd + 38)) ...