Register for free to join our community of investors and share your ideas. You will also get access to streaming quotes, interactive charts, trades, portfolio, live options flow and more tools.
Register for free to join our community of investors and share your ideas. You will also get access to streaming quotes, interactive charts, trades, portfolio, live options flow and more tools.
<<<I take it you have > 3000 lines of data?>>>
Um. Yeah. Closing in on 5000 now. Why? Do you think that's a bit excessive? {g}
Here's another general type question for you. Is it possible to run more than one completely different macro on the same set of data on the same sheet?
Hi Warp,
I did what you said, (even before asking the question). My confusion arose from the fact that the buttons and input boxes that you had put into your RSI5-thingie didn't automatically show up. But I think I may have figured that one out by reading "VBA 101" and some of the other VBA intro stuff from the MSFT web site. I'm guessing that the buttons etc don't show up because they are part of the sheet object, rather than part of the VBA object, and thus I have to put them in via Excel itself, rather than through the VBE?
Second question:
I just dumped all of my data into your ADX Calculator, ran the macro, and it cooked along great for a while, but then it stopped on line 3004, (after the first 3000 lines of data). Did I give it indigestion or something?
Re: Taking a class in VBA
I think that's a great idea, but it'll have to wait until we're settled in Florida.
(:
augie
Hi Warp,
Remember the RSI5 tester you showed me last year? Well, that and your ADX-thingie inspired me to stop being such a piker and start learning this VBA stuff. So I went back to your posts on the RSI5 thingie to brush up on the tiny bit I had learned.
PROBLEM!
I can't even remember what to do once I've pasted the code into the VB editor -- I mean, so that it shows up in the spread sheet and all. I feel really lame having to ask this, but could you just remind me what to do next? (I pasted in your code down below, just in case you forget what I'm talking about.)
TIA,
augie
p.s. I found some interesting links with pre-made (free) VBA thingies. Here are a few of them:
This guy has a lot of free VBA code for Excel. http://www.xl-logic.com/menu.html
This guy has multivariate analysis, Monte Carlo Simulations and the like. http://www.geocities.com/WallStreet/9245/
ASAP Utilities is a free add-in for Excel. http://www.asap-utilities.com/index.php?page=/p_ho.php
Warp's RSI5 Tester
*************************************************************
Sub RSI5_Tester()
Dim RSI_Buy_Level As Double
Dim RSI_Sell_Level As Double
Dim Starting_Capital As Double
Dim Current_Capital As Double
Dim Todays_NDX, Todays_RSI As Double
Dim Yesterdays_NDX, Daily_NDX_Change As Double
Dim Active_Row As Integer
Dim Long_Active As Boolean
Range("C10: C1000 ").Select
Selection.ClearFormats
Range("D10: G1000 ").Select
Selection.ClearContents
Selection.ClearFormats
Long_Active = False
RSI_Buy_Level = Cells(2, 5).Value
RSI_Sell_Level = Cells(3, 5).Value
Yesterdays_NDX = Cells(10, 2).Value
Starting_Capital = Cells(4, 5)
Current_Capital = Cells(4, 5)
Cells(10, 7) = Starting_Capital
Cells(10, 7).NumberFormat = "$0"
Active_Row = 11
Do Until Todays_NDX < 0
Todays_NDX = Cells(Active_Row, 2).Value
Todays_RSI = Cells(Active_Row, 3).Value
Daily_NDX_Change = (Todays_NDX - Yesterdays_NDX) / Yesterdays_NDX
Cells(Active_Row, 4).Value = Daily_NDX_Change
Cells(Active_Row, 4).Select
Selection.NumberFormat = "0.0%"
If Long_Active = True Then
Daily_Capital_Change = Daily_NDX_Change * Current_Capital
Cells(Active_Row, 6) = Daily_Capital_Change
Cells(Active_Row, 6).NumberFormat = "$0"
Else
Daily_Capital_Change = 0
End If
Current_Capital = Current_Capital + Daily_Capital_Change
Cells(Active_Row, 7) = Current_Capital
Cells(Active_Row, 7).NumberFormat = "$0"
Cells(5, 5) = Current_Capital
Cells(5, 5).NumberFormat = "$0"
If Todays_RSI < RSI_Buy_Level Then
Cells(Active_Row, 3).Interior.ColorIndex = 46
Cells(Active_Row, 3).Font.Bold = True
Long_Active = True
End If
If Long_Active = True Then
If Todays_RSI > RSI_Sell_Level Then
Long_Active = False
End If
End If
If Long_Active = True Then
Cells(Active_Row + 1, 5) = "Active"
End If
Active_Row = Active_Row + 1
Yesterdays_NDX = Todays_NDX
Todays_NDX = Cells(Active_Row, 2).Value
Loop
End Sub
Ah-Ha! Found it! (:
Thanks.
Gonna go offline and check out the master's work for a while.
Hi Warp,
You're right. Anyone using my model is stuck with the 37 EMA unless they want to rework them, which is not difficult, but is a bit time consuming. Unfortunately, until I break down and upgrade my version of Excel, (which is when I tell myself I'll start learning to program VBA), I'm stuck with this.
BTW, I have not received your email. Did it bounce back?
Hi Warp,
Would you please send me a copy of your Excel ADX tool? I want to try to compare it with my non-VBA version and see if I got it right. (augieboo@earthlink.net)
Speaking of my non-VBA version, I've uploaded it to my webspace so anybody who wants to check it out can do so.
Here's the link: http://home.earthlink.net/~augiebooboo/ADX-share.xls
I have the flu, so I am not posting much these days. ):
BTW, here's a picture of the new Casa-Boo, taken about ten days ago, just as the walls started going up.
HI LG! Welcome home. {g}
Sorry for being AWOL, I've been busy with stuff connected to selling the homestead, making sure the new one is done on time, and the like. I'm sure you can relate. {ng}
Also, MS Market has been kicking my assets lately, and you know the old saying: If you don't have anything nice to say...
Re: Your PMs
That's fine by me, and an option that's LONG overdue.
(:
augie
Bits, today really sucked too. eom
<<<when do you move to FLA?>>>
Whenever our new Casa-boo {g} is finished, which should be mid-May if things stay on schedule. Here's what it looked like about a week ago when my human's sister drove Kelly over to take a look.
ROFLMAO!!!!!!!!!! You guys gotta check this out! No farting around!
Yeah, but you gotta admit, it "sounds" more impressive the way I put it. {GGGGGGGGGG}
<<Of all my positions these are flat or positive from price I paid>>
I can relate.
I really wish wahz had shared all his ideas with us while these things were still cheap, instead of keeping it secret for like a year. {GGGGGGGG} JUST KIDDING WAHZ! DON'T SHOOT ME!
(:
Marc,
My model uses multivariate analysis and a fuzzy logic algorithm to assess 47 different variables before making a trading recommendation.
(:
augie
BULL, WTF is in your port???????????????
<<<200% long for moi per model.>>>
Same here.
Not feeling good about it, but then I never do. {g/ng}
Where I grew up, we used to say "It's always darkest just before some homey hits you upside the back of the head with a baseball bat."
This is starting to look ugly ... as in the down we saw from Jan 27 thru Feb 5 may have been just phase one, with the little rise we've had since then as merely a respit between down moves.
Bits, you took the words right out of my mouth. ):
<<<this all also means that the aftermath of the Fed’s latest—and arguably grandest—moves to postpone the inevitable will be that much worse for the central bank to have to deal with.>>>
Why?
I resemble that remark! {G}
ITXC pre-earnings TA analysis
Tonight, ITXC will report.
The news will be good, and/or bad, and/or indifferent -- in some combination.
The market will interpret the news to be good, and/or bad, and/or indifferent -- in some combination.
The stock will then go up and/or down and/or sideways -- in some combination.
I look at my charts and all I see is squiggles on the screen.
In other words...
I've lost that Mo-Jo feeling,
Whoa-oh that mo-jo feeling,
I've lost that Mo-Jo feeling,
And it's gone, gone, gone...
):
mjk,
I know barely enough about wireless to allow me to dial a cell phone, so I cannot comment on any of that stuff.
On the other paw, I for one would be much happier to partake in your course in "basic wireless" if you did not seem to feel the need to be condescending about it.
JMDO,
(:
augie
wahz, BULL just pointed out to me in a PM that the links to my LT Comp charts in the BB thread header are bad. Here are the corrected URLs if anybody wants them.
(:
http://stockcharts.com/def/servlet/SharpChartv05.ServletDriver?chart=%24COMPQ%2Cuu%5Ba%2Ca%5Dmaclyna...
http://stockcharts.com/def/servlet/SharpChartv05.ServletDriver?chart=%24COMPQ%2Cuu%5Ba%2Ca%5Dmaclyia...
<<<You took it too literal!>>>
Always remember what Abner Doubleday said ...
Don't take the World Serious!
{G}
Note to selves, the next time a big IPO brags about how many shares are being allocated to individual investors, it probably means the top is near. {ng}
<<<I am in Scalp #3 at 64%.>>>
Nice scalp. (:
I missed this one, darn it. My model said wait one more day...
<<<What ever happened to LG?>>>
He said over and over and over and over and over until he was blue in the face that this thread was not about gurus or "attaboys" -- but about collaboration.
But most folks around here don't contribute anything to the collaboration, so he sees no reason to waste his time on it.
Thanks Jim,
That analysis makes a lot of sense.
Sorry about your poots though. ):
15 min charts have bottomed, so a bit of a bounce is probably a decent bet. JMDO etc....
You toasted my board? You meanie! <GGGGGGGGGGG>
.
Bear, that sounds about right. (: eom
WAVX -- what's it at now?
wahz, unless they've changed the rules, a thread owner/moderator can only remove posts for the first few days after they are posted. I forget what it is exactly, but it's something in the line of 3-5 days. Beyond that you'd need to get Matt or Bob to do it.
YEAH WAHZ!!!!!!!!!!!!!!!!!!! (: eom