Excel Random Art
Why are you reporting this puzzle?
Created in Excel by generating random colour :
Sub JiGiDi()
Set rng = Range("A1:AL30")
For Each cell In rng
cell.Interior.ColorIndex = Int(15 * Rnd) + 1
Next cell
End Sub
------
*In Excel press ALT+F11, Insert -> Module -> Paste the code -> press F5
** Assuming Macros are enabled
Sub JiGiDi()
Set rng = Range("A1:AL30")
For Each cell In rng
cell.Interior.ColorIndex = Int(15 * Rnd) + 1
Next cell
End Sub
------
*In Excel press ALT+F11, Insert -> Module -> Paste the code -> press F5
** Assuming Macros are enabled
Comments
Please sign in to comment. Don't have a profile? Join now! Joining is absolutely free and no personal information is required.