Recent content by BradC

Thanks apr pillai I will give that a try. Did get it working using the following: =IIf([ClosingQuantity]>0 And [SumOfAmount]<0,[SumOfAmount]*-1,(IIf([ClosingQuantity]=0,[SumOfAmount]*-1,0)))

I have set up a simple database to track stock market portfolios. I have everything set up, but I am having trouble with a report. It currently lists trade date, type (buy or sell), quantity, amount and cost per share. I then total each individual stock so that I can see what my current...

Thanks for that - what a shame :( I'm new to Access, so can I push the freindship and ask how I use Abs(<<number>>) Expression in my formula

I have a report grouped by PortfolioName then by the StockMarketCode. In the Footer for StockMarketCode I have a text box [ProfitLoss] with the formula =IIf([ClosingQuantity]>0 And [SumOfAmount]<0,[SumOfAmount]*-1,(IIf([ClosingQuantity]=0,[SumOfAmount]*-1,0))) I'd like to be able to take...

Hi David Still get an error with your code sorry

Hi It's actually both I'm after, one for display in the combo box 2009/10 and the others to generate a financial yeary report

I would like to use David's because 2006/07 looks nicer than 1/7/2006 - 30/6/2007, but I get Compile error: Argument not optional Private Sub Form_Load() Dim fYr As Integer fYr = Year(DateAdd("yyyy", -1, Date)) fYr = fYr & "/" & Right(fYr, 2) + 1 Me.SelectYear.AddItem For x = 1 To 4 fYr =...

oops Forgot to include the years - edited above

It's 2011/12 Or 1st July 2011 to 30th June 2012

I'd like to set up a form to generate a report base on a selection in a combo box. The combo box needs to auto populate with the last 4 financial years plus current. Example: 2006/07 2007/08 2008/09 2009/10 2010/11 But I need the report to pick up the full start and end dates like this...

My Son found some code and modified to work for me. Public Function fncSharePrice(strSymbol) Dim strURL As String strURL = "h t t p : / / download.finance.yahoo.com/d/quotes.csv?s=" & strSymbol & ".AX&f=sl1&e=.csv" Dim oXHTTP As Object Set oXHTTP = CreateObject("MSXML2.XMLHTTP") oXHTTP.Open...

Is it possible to pull a stock price from say finance.yahoo.com or google.com/finance and insert it into a field called MarketPrice based on a selection in a combo box called StockCode ? Any help appreciated