|
Access Object Model
I have been gradually getting into using VBA in Access for quite a while. I
use VBA in Excel a fair amount. In the help for Excel VBA, I stumbled across
a tree-type diargram that shows the Excel VBA Object Model. I tried
searching for a similar diagram for Access VBA Help, but could not find one.
The Excel one helped me understand what was going on so much I wanted to find
one for Ac...
|
4 |
16.05.2006 20:24:02 |
|
DisableAskAQuestionDropdown in Access 2000
I have the following code
If Val(SysCmd(acSysCmdAccessVer)) >= 10 Then
Application.CommandBars.DisableAskAQuestionDropdown = True
End If
The problem is that when I run it in Access 2000 the
application.commandbars.disalbeaskaquestiondropdown doesn't exist and the
code stops. I tried on error resume next but nothing happened how can I run
this code in Access 2000 too thank...
|
2 |
24.05.2006 15:38:11 |
|
Mouse Issues in Modules
I am coding in an MS Access Module and my mouse scroll button does not work.
I juat migrated from Windows 2000 to Windows XP, but everything worked fine
in Windows 2000. Does anyone know how to fix this annoying problem?
Thanks,
David Blandford...
|
2 |
23.05.2006 17:44:53 |
|
Coding Record Names
I have rs.NV which contains field names 1 through 9. I want to use a For loop
to call the contents of rsNV.[1] by replacing the number 1 with I and assign
this to a variable (MyField). When I call for the contents of the field
(debug.pring MyField) all I get is the NAME of the field, not the contents.
How do I call the CONTENTS???...
|
6 |
23.05.2006 14:45:02 |
|
Import new record error
Hi,
Using Win and Access 2000. Running the code below doesn't always work and
when it fails, the error reports that the table is locked. Is the code
correct or is there another way that might avoid an error when importing
records from one table to another.
Thanks, Rob
Public Function ImportSales()
On Error GoTo ImportSales_Err
Dim strSQL As String
DoCmd.Transfer...
|
6 |
23.05.2006 05:52:19 |
|
Database keep losing references
I have a several year old database, Access 2000, FE/BE used by two people,
one mostly.
Suddenly the database will show errors and the code highlighted will be Dim
db as database, or .findfirst. In either case, if I look at Tools,
References, it has fewer references listed than it should. I put the others
back, all is well, but within a day it happens again.
I have decompiled, recom...
|
5 |
22.05.2006 18:32:04 |
|
How to pass input table name to append query?
Greetings! Am unknowledgeable in Access, and am fumbling through a setting
up a VBA Sub to automate a simple data consolidation process. Have an
append query that needs to be applied to ten linked tables, with the data
being appended to a single file. Would like to find a way to execute one
query from VBA, passing it the source table name each time. Can this be
done via a QueryDef structu...
|
8 |
22.05.2006 05:22:54 |
|
Function to calculate hours not working
Hi folks,
Can you give me some pointers as to what I've done wrong here...knowing me
I'm making a meal of something that could be done simpler but my main
question is what's wrong with the code?
I'm building a small database to keep a log of hours worked. The time sheet
table has a record of the time (to the nearest quarter of an hour) that I
commenced or finished work. There are three...
|
3 |
19.05.2006 15:52:02 |
|
Word Merge - and MS Word Application Close
I am using the following code from the MS KB
Article ID : 209976
Last Review : August 6, 2004
Revision : 1.0
Word seems to hang - I don't want to save the document - I just want to
print it in the background and exit MS Word altogether.
Any thoughts ?
Thanks
Function MergeIt()
Dim objWord As Word.Document
Set objWord = GetObject("C:\MyMerge.doc", "Word.Document")
'...
|
2 |
17.05.2006 22:58:54 |
|
sending mail by outlook or outlook express
some of my clients are useing outlook express and others are useing outlook
for sending mail
i cann't control their default settings but i want to control from access
witch application will run for emails
1. how can i do it?
2. can i use CreateObject("Outlook.Application") for outlook express ?
thanks
...
|
2 |
17.05.2006 17:27:12 |
|
SQL Query Error
Hello,
I'm working with a customer's DB and they've done something I believe is
causing me a problem. I was trying to is this: I have a listbox in a form.
The user selects multiple items in the listbox. A For Next Loop puts the
selected items in an array. And last an SQL query is created and run with
the arrayed items being the criteria. The following code is example I
downloded to...
|
3 |
17.05.2006 13:19:01 |
|
How Do I Suspend VB Code Execution
How do I stop Access VB code from executing when a Word mail Merge function
is called and only have it start running again after Word has been closed?
Below is a code scrap. I want it stop between the “objWord.MailMerge.Execute"
and the Msgbox function. Thanks.
Set objWord = GetObject(strFilepath)
objWord.Application.visible = True
objWord.MailMerge.OpenDataSource Name:=CurrentDb.Name, ...
|
4 |
16.05.2006 13:26:02 |
|
Code pour Module
Dans un module avec la commande "DoCmd.OpenQuery "qrySupprimeUsagers", je
voudrais éviter les deux messages suivants:
« Vous allez exécuter une requête Suppression. »
« Vous allez supprimer 10 ligne(s). »
Merci
...
|
4 |
14.05.2006 15:33:58 |
|
using string functions in a DCount
I am trying to extract the first character in a field then do a domain
count.
Using dcount("id","results","left(apostcode,1)='a'") works.
But I also need to trim leading spaces in the field (it is a survey form and
the field is the postal code - some people have entered spaces before the
code.)
I tried dcount("id","results","ltrim(left(apostcode,1)='a')") and I get the
same count (shoul...
|
2 |
14.05.2006 01:33:22 |
|
Solution : Get and set options to Module Options using VBA
I finally found the proper code to get and to set the Module options. here
is the code to get
Application.GetOption("Error Trapping")
where
Case 0
= "Break on All Errors"
Case 1
= "Break in Class Modules"
Case 2
= "Break on Unhandled Errors"
and to set an option is
for example Break on Unhandled Errors
Application.SetOption "Error trapping", 2
I will publish this code to a new post h...
|
2 |
13.05.2006 09:51:08 |
|
form get's #Deleted on all rows
i have a popup form ,based on a local table, that inculdes customer details
this form open's above another form that includes customers name list .
when user clik's on a customer name the popup form Requeries and show's
relevant details
the problem starts when user add's some data in the popup form and move's
the focus
to the customers name list form , popup form get's #Deleted on all ...
|
2 |
13.05.2006 09:09:45 |
|
On error resume next
I wonder do I have to put some reference because my On error resume next
doesn't work in my modules. That happened suddenly.
Thanks in advance.
...
|
10 |
13.05.2006 07:53:56 |
|
Calling a Word Mail Merge
I want to call a Word Mailmerge from an access 2003.
If I use the wizard to create a Word Button then all I get is :
Set oApp = CreateObject("Word.Application")
oApp.Visible = True
Is it possible to load a Word doc and trigger the mail merge to fill the
fields?
Also, is it possible to end up with a class variable that exposes its
methods?
Using CreateObject as above is ...
|
6 |
12.05.2006 19:19:15 |
|
Get current or other database's file properties (file date etc)
How can I get the file properties for example northwind.mdb that file the
date of the file, the length etc using VBA code ?
...
|
4 |
12.05.2006 15:58:47 |
|
Access XP - DoCmd.TransferSpreadsheet with SP or View
In the Access UI with queries selected I can right-click and export the data
from an SP to an Excel Spreadsheet.
When I try to use DoCmd.TransferSpreadsheet, it tells me it can't find my SP
or View.
What am I doing wrong? Ot what's the best way to get it done?
Kyle!
...
|
3 |
11.05.2006 19:38:35 |
|
Open different database
I am running Access 2003 on Windows XP. I was certain this would be easy to
find in former posts, but I was not able to. Using visual basic, how would
one close the current database and open a different database as the same
user? Thanks in advance. Adam...
|
2 |
11.05.2006 04:54:35 |
|
Add record to rst based on field name
Thanks for taking the time to read my question.
I have a temp table. One field holds the field name the other is the data.
I want to update my main table based on the field name.
I tried .Fields but that doesn't work. The error says Item not found in
this collection.
Not sure what the right procedure is.
Thanks,
Brad
Set dbs2 = CurrentDb
Set rst2 = dbs2.OpenRecords...
|
4 |
10.05.2006 19:48:01 |
|
Can't create Recordset
Thanks for taking the time to read my question.
Ok, I've done this 100's of times I'm sure.
Dim dbs As Database, rst As Recordset
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("tblTemp")
However, this time it gets stuck on the last line and I get error 13, Type
Mismatch.
No idea why. I have DAO 3.6 Object Library in my references enabled, and no
ADO enabled. I've restarte...
|
4 |
10.05.2006 18:35:02 |
|
Retrieve only the path.
I would like to retreive only the path from the application.FileDialog(...).
I mean I want the user to select a path and not a file how can this happen?
A link with a VBA code will be very appreciated.
...
|
2 |
07.05.2006 20:46:14 |
|
#ERROR appears assigning a recordset to a report's Recordset prope
A client wants to send an email of changes to participants but only send the
changed information. The change could be to any of a couple of dozen tables a
couple of which have several hundred fields. (The data is on SQL Server 2000
& the access client is an .ADP file). I plan to create a recordset, assign it
to a report and use SendTo to email the report as an .rtf file. This also
kills ...
|
8 |
06.05.2006 14:42:16 |