Recent content by homesick

My ColIndexes are all fine.....when i have... For R = 0 To grid.Rows - 1....it sums fine but will give me the error when there are no records showing in the grid.....when i change it to... For R = 0 To grid.Rows 0 - 1...it shows "0" when there are no records displayed in the...

I have a function that totals columns from a grid and displays the amounts in a textbox....it works great when there are records found but if the user clicks on the "total" button with no records i get the error "subscript out of range"...i want it to display...

The first issue is solved.....THANKS... as for the second issue....it works but now it won't sum....basically....i have 4 textboxes that grabs totals from a Grid with 4 corresponding buttons....my last button sums all the totals into a grand total into a label...it works with my previous code...

Here is my code that allows user to search for records by Name and Date...records found are displayed in the Grid.....if user enters nothing then it prompts use to enter something....i guess the queston is....How do i let the user know there is no current record found or if that they must enter...

can anyone suggest anything?

Hey...just wonder if anyone new how to use an input box to search for and display information in a Grid? Here is what i'm trying...it worked in the change event, but i thought it might be easier for the user to use a button...so i wanted to use the click event for an input box...here is what i...

It formats it ok.....but now it won't sum the textbox amounts into my label...... here is part my code.....any suggestions? Private Sub Command22_Click() Text1.Text = TotalColumn(MSFlexGrid1, 12) Dim amount As Single amount = Text1.Text Text1.Text = Format(amount, "currency") End...

How do i default a textbox and or Label to show a $ value when a calculation is perofmed? Curretn;y just the number appears but i want it to be shown in dollars. Can anyone suggest anything?

Thanks Will but I already have it grouped by name and date with these sql statements... 'under my combo5_change Select * from tracker where aname = ' " &combo5.text &" ' and date = ' " &text2.text& " ' " 'under my Text2_change Select * from tracker where date = '...

Help....

OK...it works but it's not exactly what i want.....the records are currently appearing grouped by name and date but as each group appears(enabled by a command buton) i want them to appear in alphabetical order...eg. 3 rows of "Mary Dec 12", 4 rows of "John Dec 13" with a list...

i tired to use the ORDER BY aname but it doesn't work.....am i missing something? Here is my code..... Public Function DisplayRSGrid(rs As DAO.Recordset, Grid As MSFlexGrid, Optional Form As Form) Dim fld As DAO.Field On Error Resume Next Screen.MousePointer =...

thanks for the help but it doesn't work....

I have an MSFlexgrid that displays records based on Names and Dates. I was just wondering if there is anyway the user can view or scroll through each set by alphaetical order. Also, does anyone know how the records in MSFlexgrid are arranged? here is my code... Public Function...

working BRILLIANTLY!! thank you... simon