find minimum and maximum 1

[limeg95]

hi!
i am trying to figure it out earlist starting time and latest finished time
here is the code. but i could not find out max and min
thanks in advance.
*****************************
If Right(JobName, 1) = "*" Then
For j = 1 To 16 '''

If Right(Trim(MyScreen.GetString(MyRw, 14)), 1) <> "p" Or _
Right(Trim(MyScreen.GetString(MyRw, 14)), 1) <> "z" Then '''
MyScreen.PutString "S", 6, 4
MyScreen.SendKeys ("<Enter>")
MyScreen.WaitHostQuiet (g_HostSettleTimE)
MyScreen.SendKeys ("F")
MyScreen.SendKeys (" '" + "STARTED - TIME" + "'")
MyScreen.SendKeys ("Enter")
MyRw = MyScreen.Row
myarray(j) = Trim(MyScreen.GetString(MyRw, 54, 6))
myarray2(j) = Trim(MyScreen.GetString(MyRw, 54, 6))
End If

Next j

MyStart = WorksheetFunction.Min(myarray2)

MyFinish = WorksheetFunction.Max(myarray)
Myjobloop = True
End If
'''''''''''''''''''''''''''''''''''''''''''''

 

[limeg95]

skip
thanks could you please clarify
first screen shows x = 10.35 (start time)
second screen shows y = 9.25 ( start time)
if x < y then
x = z ( third variable
elseif x > y then
y = z
and 'do i have to check second and third one

 

[SkipVought]

What do you mean by a third?

PrevMaxStart =  10.35 
PrevMinStart =  10.35 
'....
Start = 9.25
If PrevMaxStart < Start  Then
   PrevMaxStart = Start  
End If
If PrevMinStart > Start  Then
   PrevMaxStart = Start  
End If

Skip,
[sub]
Just traded in my old subtlety...
for a NUANCE![/sub]

 

[limeg95]

Oh! thanks skip. will check it tomorrow and let you know

 

[SkipVought]

...oops

PrevMaxStart =  10.35 
PrevMinStart =  10.35 
'....
Start = 9.25
If PrevMaxStart < Start  Then
   PrevMaxStart = Start  
End If
If PrevMinStart > Start  Then
   PrevMinStart = Start  
End If

Skip,
[sub]
Just traded in my old subtlety...
for a NUANCE![/sub]

 

[limeg95]

skip
the same thing i need to do for ending time also ? is it?thansk a lot skip.

 

[limeg95]

Great Great! you have vast knwoledge about Attachmate. Thanks a lot Skip. You are reallly Really Helped me lot. not only me. so many people helped from you. "Without you"
we canot help anywere for Attachmate

 

[vzachin]

did you give Skip a star?