Here is a link to a useful page with an example of how to use the LDB Viewer in an MS Access 2000 form.
http://www.mvps.org/access/modules/mdl0055.htm
Hope it helps ...
Tiny
Perfection is Everything
If it worked first time we wont be here!
What version of Access are you using?
In Access 97 ...
I use this depending on what I am looking for:
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70
I ask the user to click in the column and then click a button with this line of code in it.
This brings up the Find prompt box and...
Jaydeebe, There is no easy way around this - You may butcher this code as you see fit !!
I used this for a booking system. My requirement was to ensure that if any of the previous agreed appointments clashed flag it to the user.
I created four small module to test the start time and finish...
damn ... I will get it right ...
Excel.ActiveCell.Formula = "=blp(""XYZ equity"", ""Long_comp_name"")"
Perfection is Everything
If it worked first time we wont be here!
Correction ...
Excel.Range("A1").Select
Excel.ActiveCell.Formula = "blp("XYZ equity", "Long_comp_name")"
Perfection is Everything
If it worked first time we wont be here!
Guessing you are using the Excel via access and are coding through access ...
Select the cell where you want the formula and enter the type of value you are passing ...
EG:
Excel.Range("A1").Select
Excel.ActiveCell.Formula = ="blp("XYZ equity"...
Hi jphelps
This is how I do it!
- Create a new module
- click on Tools > References
This will bring up the References dialog
From this select Browse, find the mde file and click on OK
Now this MDE file is associated to this database
You should now be able to CALL any of the...
In a module declare a public variable
EG
Public project_name_str as string
When the user has selected a project from the list use this after the on update or on click if you have a button ...
me.combobox.value = project_name_str
Tiny
Perfection is Everything
If it worked first time we...
Try this in the subform after update event ...
Private Sub Form_AfterUpdate()
DoCmd.GoToRecord acDataForm, , acFirst
End Sub
Tiny
Perfection is Everything
If it worked first time we wont be here!
tweek
I also got the images controls to work. View, Zoom, Move several Pages in Tiff docs and all controlled via buttons on an Access97 form ... it does the job ..
tweek/vb5prgrmr
Just a little note ... If you thinking of using OCR text recognition systems I would recommend Kofax Ascent &...
Try this strsql
strsql = "UPDATE tblLogs SET ApprovedDate = #" & Me.txtApprDate1 & "# WHERE LogRef = " & TempRef
Tiny
Perfection is Everything
If it worked first time we wont be here!
Try ...
txtversion = "Last Update " & FileDateTime([Forms]![User Details]![txtserverdirectory] & "\global.mdb")
Tiny
Perfection is Everything
If it worked first time we wont be here!
Gimme 5 Minutes and I will get you a working sample that I will email to you ... but I need you email address!
Tiny
Perfection is Everything
If it worked first time we wont be here!
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.