Comments on: Pentagon Fractal http://www.dailydoseofexcel.com/archives/2005/10/24/pentagon-fractal/ Daily posts of Excel tips…and other stuff Wed, 08 Feb 2012 23:58:05 +0000 hourly 1 http://wordpress.org/?v=3.2.1 By: zeljko http://www.dailydoseofexcel.com/archives/2005/10/24/pentagon-fractal/#comment-17036 zeljko Thu, 27 Oct 2005 05:05:00 +0000 http://www.dailydoseofexcel.com/?p=1267#comment-17036 <p>Sub Tapis()<br> 'Autor?<br> ActiveSheet.Unprotect<br> Randomize<br> couleur = Int(28 * Rnd + 3)<br> For Each fou In Range("Table")<br> If fou.Value 0 And fou.Value Mod 2 = 0 Then fou.Interior.ColorIndex = couleur<br> Next fou<br> Randomize<br> couleur = Int(28 * Rnd + 3)<br> For Each la In Range("Table1?)<br> If la.Value 0 And la.Value Mod 2 = 1 Then la.Interior.ColorIndex = couleur<br> Next la<br> ActiveSheet.Protect<br> End Sub<br> Sub efface()<br> ActiveSheet.Unprotect<br> Range("Table").Interior.ColorIndex = xlNone<br> Range("Table1?).Interior.ColorIndex = xlNone<br> ActiveSheet.Protect<br> End Sub</p> Sub Tapis()
‘Autor?
ActiveSheet.Unprotect
Randomize
couleur = Int(28 * Rnd + 3)
For Each fou In Range(“Table”)
If fou.Value 0 And fou.Value Mod 2 = 0 Then fou.Interior.ColorIndex = couleur
Next fou
Randomize
couleur = Int(28 * Rnd + 3)
For Each la In Range(“Table1?)
If la.Value 0 And la.Value Mod 2 = 1 Then la.Interior.ColorIndex = couleur
Next la
ActiveSheet.Protect
End Sub
Sub efface()
ActiveSheet.Unprotect
Range(“Table”).Interior.ColorIndex = xlNone
Range(“Table1?).Interior.ColorIndex = xlNone
ActiveSheet.Protect
End Sub

]]> By: Jon Peltier http://www.dailydoseofexcel.com/archives/2005/10/24/pentagon-fractal/#comment-17035 Jon Peltier Thu, 27 Oct 2005 04:31:00 +0000 http://www.dailydoseofexcel.com/?p=1267#comment-17035 <p>Alan -</p> <p>Here's how it works, but you have to promise not to tell anyone.</p> <p>It's magic!</p> <p>- Jon</p> Alan -

Here’s how it works, but you have to promise not to tell anyone.

It’s magic!

- Jon

]]> By: Alan http://www.dailydoseofexcel.com/archives/2005/10/24/pentagon-fractal/#comment-17026 Alan Wed, 26 Oct 2005 04:21:00 +0000 http://www.dailydoseofexcel.com/?p=1267#comment-17026 <p>Wow Hui!</p> <p>I am totally blown away by that.</p> <p>If I had a spare day or two, I might have looked into how you did it, but then again, I sometimes think that knowing why a sunset happens actually takes something away from the experience so perhaps I'll just remain in awe.</p> <p>Alan.</p> <p>–<br> The views expressed are my own, and not those of my employer or anyone else associated with me.</p> <p>My current valid email address is:</p> <p><a href="mailto:6f7chu602@sneakemail.com">6f7chu602@sneakemail.com</a></p> <p>This is valid as is. It is not munged, or altered at all.</p> <p>It will be valid for AT LEAST one month from the date of this post.</p> <p>If you are trying to contact me after that time,<br> it MAY still be valid, but may also have been<br> deactivated due to spam. If so, and you want<br> to contact me by email, try searching for a<br> more recent post by me to find my current<br> email address.</p> Wow Hui!

I am totally blown away by that.

If I had a spare day or two, I might have looked into how you did it, but then again, I sometimes think that knowing why a sunset happens actually takes something away from the experience so perhaps I’ll just remain in awe.

Alan.

–
The views expressed are my own, and not those of my employer or anyone else associated with me.

My current valid email address is:

6f7chu602@sneakemail.com

This is valid as is. It is not munged, or altered at all.

It will be valid for AT LEAST one month from the date of this post.

If you are trying to contact me after that time,
it MAY still be valid, but may also have been
deactivated due to spam. If so, and you want
to contact me by email, try searching for a
more recent post by me to find my current
email address.

]]> By: Rob van Gelder http://www.dailydoseofexcel.com/archives/2005/10/24/pentagon-fractal/#comment-17018 Rob van Gelder Tue, 25 Oct 2005 19:42:00 +0000 http://www.dailydoseofexcel.com/?p=1267#comment-17018 <p>Hui,</p> <p>That is amazing! I'm going to waste hours on figuring out how you did it.</p> <p>Rob</p> Hui,

That is amazing! I’m going to waste hours on figuring out how you did it.

Rob

]]> By: Hui http://www.dailydoseofexcel.com/archives/2005/10/24/pentagon-fractal/#comment-17013 Hui Tue, 25 Oct 2005 15:02:00 +0000 http://www.dailydoseofexcel.com/?p=1267#comment-17013 <p>I have been playing with Fractals for many years and was recently given a challenge at a meeting where I had stated "Why don't we do that in Excel? You can do everything in Excel".<br> "You Can't make Mandelbrots without using code" came the response.</p> <p>So 1 Hr later here is Excel_Madlbrot.xls with a graphics output and no VBA code. </p> <p><a href="http://www.ianeva.info/Excel_Mandelbrot/Excel_Mandelbrot.html" rel="nofollow">http://www.ianeva.info/Excel_Mandelbrot/Excel_Mandelbrot.html</a></p> <p>Hui...</p> I have been playing with Fractals for many years and was recently given a challenge at a meeting where I had stated “Why don’t we do that in Excel? You can do everything in Excel”.
“You Can’t make Mandelbrots without using code” came the response.

So 1 Hr later here is Excel_Madlbrot.xls with a graphics output and no VBA code.

http://www.ianeva.info/Excel_Mandelbrot/Excel_Mandelbrot.html

Hui…

]]>