Search results

Pass the date to your function along with the ID Public Function MonthlyAmt(FLNo As Integer, dt as date) As Currency MonthlyAmt = DSum("matchamount", "tbmatchamount", " EmployeeID=" & FLNo & " And Month(matchmonth)=" & Month(dt)) End Function

So, I decided to have a look at record highlighting. (mostly because I never used conditional formatting before and wanted to know how it was done.) The highlight is a single locked textbox. It uses similar conditional formatting as the other versions, except the condition value comes from a...

The structure of your code helps too. If you split your code up into separate functions that return true if they pass or false if they fail your 'main' procedure is easy to read. So instead of sub ImportFile() on error goto error_handler 'stuff to check if file exists ... 'stuff to open...

See. Even Microsoft can't get it to work. :p edit: added record highlighting and fixed error 2105

:) 1) Home Ascending / Descending. It's there whatever type of form you are using. No? 2) I have no idea! It's only using the table and controls should make no difference. I like picky. It means you care. That's quite rare. a) Yeah I had that a first. doesn't seem to do it now. ? This is...

1) By clicking sort in the menu. 2) This uses one form, one recordset.

And I think while ever you are trying to work with 2 instances of the same recordset you will always have these problems. If you build the continuous form and then put the single form controls in the header/footer you'd only have one form and one recordset. Or make the single form the sub and...

I had a few issues. (2010) - If I click continuously (quickly) on the next record I get error 2105 : you can't go to the specified record. (same on back) - If I edit a record in the single view and click on the continuous view it selects a random record. - Can only sort by one field. - Clicking...

I can't get it to work now either. :rolleyes: I must've cocked something up somewhere. At least you have something you're happy with. :p

Works fine here. make sure set f = is after the other bits of code. All code is in frmSplitter. It's bad enough having three forms. If you wanted more split forms you wouldn't want to create a container for each so all splitter related code should be kept in that one form. You could then create...

So I guess sorting recreates the recordset and essentially orphans the 'clone'. Trap the error and reassign the new rs. Dim WithEvents f As Form Private Sub Form_Load() Child1.SourceObject = "frmArchivedClasses" Child2.SourceObject = "fsubArchivedClasses" Set Child2.Form.Recordset...

docmd.openform "form2" forms.form2!NameofYourCombo = NameofComboOnForm1 forms.form2.Recordset.FindFirst "[Category_ID]=" & NameofComboOnForm1 docmd.Close acform ,me.name edited based on other thread

That's a lot of code. Did you try httprequest?

In design view, select the button On the property sheet select [event procedure] + click the ellipsis. In the procedure paste. docmd.openform "form2" forms.form2!NameofYourCombo = NameofComboOnForm1 docmd.Close acform ,me.name edit the stuff in bold

Hey. I don't really get 'coffeeprice'. Where is the 'coffee' table? How does price relate to types of coffee? At the risk of sounding flippant, wouldn't it always be 'free'? I'd just have one preferences table, one to many. Add a DateAdded field with default = date() For coffee you can get...

Good spot. That's because nav buttons on the sub are turned off, but I didn't turn them on the container form ;) Should be the other way around. I got an error when sorting the continuous form. Dunno what's causing that.

If you use a dedicated form as the splitter updates seem to work for both forms and you can add a resizer.

I had to google refreshrecord. 'In a client database, the RefreshRecord method is equivalent to the Refresh method of the Form object. In a web database, see the RefreshRecord macro action.' It seems to be a macro command, so I'm unsure if you are using a macro or VBA or VBA generated from a...

@Exi: It was an image of your form based on my form that you uploaded in a zip. @linux: Links to the original files are in post #5, page one of this thread.

I guess it isn't saying those other programs are better, it's just saying if you aren't on Windows or want something free, alternatives are available. After asking 'Why are MS Access alternatives needed?' it gives a wall of text describing what Access is with 'However, it is only available for...