SRL Archive - General

Hey guys, need to do a mini discussion session and was thinking of using a wheel of fortune concept.

Only problem is I am unable to come up with the wheel?

Was thinking of doing something like what this guy has done.Anyone have an idea how to do it? I would be eternally grateful :)

Link to sample video: https://www.youtube.com/watch?v=XlnUBEFpoZ0

Thank you in advance!

~newb

I dont mind transferring some RSGP to anyone who is able to replicate something like that as well.

From: newb cheater
Hey guys, need to do a mini discussion session and was thinking of using a wheel of fortune concept.

Only problem is I am unable to come up with the wheel?

Was thinking of doing something like what this guy has done.Anyone have an idea how to do it? I would be eternally grateful :)

Link to sample video: https://www.youtube.com/watch?v=XlnUBEFpoZ0

Thank you in advance!

~newb

I dont mind transferring some RSGP to anyone who is able to replicate something like that as well.

I'd do a google search on macros within excel - doesn't look like it'd be difficult once you figure out how the macro alters the wheel.

Anyone able to assist? I did some messing around, and managed to piece together some code as below, but can't figure out what to edit to make it randomly stop at a certain angle instead of going round 360. Secondly, not sure which part of the code i need to edit to make it spin faster. Would be grateful if someone could advice.

Code as below;

Sub Macro1()
'
' Macro1 Macro
' Macro recorded 11/07/2008 by Andy Pope
'
Dim lngLoop As Long
Dim lngDelay As Long
'
With ActiveSheet.ChartObjects("Chart 1").Chart
For lngLoop = 1 To 360
.Rotation = lngLoop
DoEvents
For lngDelay = 360 To 50000
'CRUDE DELAY
Next
Next
End With

End Sub
Sub Spin(ByVal dVal As Double)

Dim i As Double

With ActiveSheet.ChartObjects("Chart 1").Chart
For i = 0 To dVal Step 0.1
.Rotation = i
DoEvents
Next i
End With

End Sub

Sub Spin1()
Spin 200
End Sub

I wonder how many people actually sent him $5 for this.

http://wheeldecide.com/

https://www.youtube.com/watch?v=SFzi0Xs5_vw
[video=youtube;SFzi0Xs5_vw]https://www.youtube.com/watch?v=SFzi0Xs5_vw[/video]

From: Brandon
https://www.youtube.com/watch?v=SFzi0Xs5_vw
[video=youtube;SFzi0Xs5_vw]https://www.youtube.com/watch?v=SFzi0Xs5_vw[/video]

sick man, never knew that was possible!

Hey Bonsai, thanks for that! Will see if I can find something similar to that.

Appreciate the help :)