Re: any free upgrde for Metastock 6.51Pro

["Walter Lake" <wlake@xxxxxxxxx>]

List -- Sorry the last post was meant to be a private email.

Anyway ... Here's a sub Lars that it wanted to include ... It can either
accept User Input or can be hard coded for Start and Stop dates. Will tinker
with it and let you know. Sometimes the desired date falls on a weekend and
the sub would then have to loop through to find the Friday date or the
Monday date.

Best regards

Walter

==================================================

from Tommy Flynn's web site.

'///....To find and select a range of dates based on the month and year
only....\\\

Sub FindDates()
On Error GoTo errorHandler
Dim startDate As String
Dim stopDate As String
Dim startRow As Integer
Dim stopRow As Integer
    startDate = InputBox("Enter the Start Date:  (mm/dd/yy)")
        If startDate = "" Then End
    stopDate = InputBox("Enter the Stop Date:  (mm/dd/yy)")
        If stopDate = "" Then End
    startDate = Format(startDate, "mm/??/yy")
    stopDate = Format(stopDate, "mm/??/yy")
    startRow = Worksheets("Table").Columns("A").Find(startDate, _
        lookin:=xlValues, lookat:=xlWhole).Row
    stopRow = Worksheets("Table").Columns("A").Find(stopDate, _
        lookin:=xlValues, lookat:=xlWhole).Row
    Worksheets("Table").Range("A" & startRow & ":A" & stopRow).Copy _
        destination:=Worksheets("Report").Range("A1")
End
errorHandler:
MsgBox "There has been an error:  " & Error() & Chr(13) _
    & "Ending Sub.......Please try again", 48
End Sub



----- Original Message -----
From: "Walter Lake" <wlake@xxxxxxxxx>
To: <metastock@xxxxxxxxxxxxx>
Sent: Thursday, November 25, 1999 9:35 AM
Subject: Re: any free upgrde for Metastock 6.51Pro


| Hi Lars
|
| How are you?
|
| Everything I touch this week turns into a problem. There seem to be only
| hard and harder problems to solve no more easy ones<G>
|
| Best regards
|
| Walter
|
|
| ----- Original Message -----
| From: "Lars Andersson" <Lars.Andersson@xxxxxxxxxxxxxxxxx>
| To: <metastock@xxxxxxxxxxxxx>
| Sent: Thursday, November 25, 1999 2:17 AM
| Subject: Re: any free upgrde for Metastock 6.51Pro
|
|
| | Yes there are a free upgrade to version 6.52 you must check
www.equis.com.
| | Best regards.
| | Lars Andersson
| |
| | "wsb3000@xxxxx" skrev:
| |
| | > i have Metastock 6.51 Pro  but as you know it has the y2k bug.
| | > Is there a free upgrade to 6.52?
| | >
| | > thanx
| | >
| | > wsb
| |
|