Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default formula for stock quote

I want to have my stock quotes updated to show the highest price th
stock has reached. I input the daily stock price in column A and I wan
that checked against column B which shows the highest past price. I
the new input in column A is higher, I want that column B change
automatically to reflect the new higher price. If the input price i
column A is not higher, I want column B to remain the same, reflectin
the older and higher price.
Everything I've tried on my own results in a circular error, even whe
I change the number of iterations and their parameters.
Answer to please
Thanks to any in advance
Edgar Couda

--
Message posted from
http://www.ExcelForum.com

  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 27,285
Default formula for stock quote

If you check iteration (check the checkbox) and change the max to 1, you
shouldn't get a circular reference error.

in B1
=if(B1<A1,A1,B1)

--
Regards,
Tom Ogilvy

edgarc wrote in message
...
I want to have my stock quotes updated to show the highest price the
stock has reached. I input the daily stock price in column A and I want
that checked against column B which shows the highest past price. If
the new input in column A is higher, I want that column B changed
automatically to reflect the new higher price. If the input price in
column A is not higher, I want column B to remain the same, reflecting
the older and higher price.
Everything I've tried on my own results in a circular error, even when
I change the number of iterations and their parameters.
Answer to please
Thanks to any in advance
Edgar Coudal


---
Message posted from
http://www.ExcelForum.com/



  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 3,885
Default formula for stock quote

Hi
another way using VBA would be the use of the worksheet_change event.
Try the following code in your worksheet module:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Intersect(Target, Me.Range("A:A")) Is Nothing Then Exit Sub
If Target.Cells.Count 1 Then Exit Sub
On Error GoTo CleanUp
With Target
If .Value Me.Range("B1").value Then
Application.EnableEvents = False
Me.Range("B1").value = .value
end If
End With

CleanUp:
Application.EnableEvents = True
End Sub

Frank

I want to have my stock quotes updated to show the highest price the
stock has reached. I input the daily stock price in column A and I
want that checked against column B which shows the highest past
price. If the new input in column A is higher, I want that column B
changed automatically to reflect the new higher price. If the input
price in column A is not higher, I want column B to remain the same,
reflecting the older and higher price.
Everything I've tried on my own results in a circular error, even

when
I change the number of iterations and their parameters.
Answer to please
Thanks to any in advance
Edgar Coudal


---
Message posted from
http://www.ExcelForum.com/



Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
MSN Stock Quote Wendy Hoffman Excel Worksheet Functions 1 April 27th 10 07:12 PM
MSN Stock Quote Addin Dennis M Excel Discussion (Misc queries) 10 December 4th 07 12:37 AM
stock quote not working dazboy Excel Discussion (Misc queries) 0 October 5th 06 04:09 PM
stock quote add in Digitaldrz Excel Discussion (Misc queries) 0 March 12th 06 07:13 PM
stock quote computation [email protected] Excel Discussion (Misc queries) 1 February 8th 06 06:13 PM


All times are GMT +1. The time now is 07:18 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"