Hi MazeWorX,
Installing the fix from the KP has solved my problem and we're now up and running with no crash issues.
Thanks again for your help with this.
Regards, Iain
Nothing running at startup. Not even startup options set. Crash interval is in the order of 2-3 seconds once corrupted, or immediately I try to open any form.
Attemting to import the objects to another db throws the same error.
Hi,
I have an A2010 db front end, linked to a SQL Server 2005 back end. I'm seeing multiple crashes and can't see where the problem lies.
Usual crash point is opening the database with the followign details:
Problem Event Name: APPCRASH
Application Name: MSACCESS.EXE
Application Version...
Hi,
I have a simple data copy operation (running via Access VBA):
appXL.ActiveWorkbook.Sheets(strSourceTab).UsedRange.Select
appXL.Selection.Copy
appXL.Workbooks(strWorkingFileName).Activate
appXL.Workbooks(strWorkingFileName).Worksheets(1).Activate...
Fixed it with some help from this thread.
Slooooow running code below, suggestions for improvements welcome.
intInFileID = FreeFile
Open strFile For Binary As #intInFileID
intOutFileID = FreeFile
Open strFile & ".txt" For Binary As #intOutFileID
Do Until EOF(intInFileID)
Get...
Hi,
I'm trying to process a csv export file but have a bit of a problem. It's been exported in Excel csv format. When I view the file in Excel, it splits into its constituent columns just fine. However, when I look at the file using notepad there dont appear to any row terminators at all...
Hi Skip,
Macro recorder isn't working - or at least isn't picking up shpe operations. Useful.
Anyhow, it seems it's an operation order fernicketiness problem. Changing
.ForeColor.RGB = lngBlendMidColour
.BackColor.RGB = lngBlendEndColour
.TwoColorGradient...
Hi,
Does anyone know how I can set a two colour gradient fill in E2007 VBA?
I output a report that has 2 rectangles as the background. Left rectangle is gradient filled colour 1 to colour 2. Right rectangle is gradient filled colour 2 to colour 3. The shapes are place dnext to each other to...
Hi Max,
Also, be very careful with referencing. VBA has a handy habit of opening a new reference to Excel whn you fail to properly reference an action in your VBA script. E.g.
set appExcel = New Excel.Application
' do something
appExcel.Open <workbook>
appExcel.Range("A1").Select
' note...
Hi BxWill,
How about using a template list?
Set up a sheet with your SearchForInColA---Column B ----Column C--------Column D values listed in sequence.
' *** air code ***
dim varfind
dim intRow as integer
dim i as integer
' Loop through he values on the data sheet.
for i = 2 to...
Hi Lhuffst,
If it's unreliable, why not just work around:
Add a column to your table, say, Update_Key (Double)
Add a couple of lines of code:
dim dblUpdateKey as double
' convert the current time and date to double
set dblUpdateKey = cdbl(now())
ssql = .... & _
"Update_Key = " &...
Hi Lhuffst,
Are your records actually being updated? From the help file:
In a Microsoft Jet workspace, if you provide a syntactically correct SQL statement and have the appropriate permissions, the Execute method won't fail — even if not a single row can be modified or deleted. Therefore...
Hi Jeff,
I think multiple lookups would get ugly *really* quickly.
I'd say a recordset would be a better option for readability - and don't forget that you only read records into your set as you access them, so iterating through would (imo) also perform better.
Regards, Iain
Interesting, I've always used a connection object myself. Changing it doesn't solve my problem, however a bit of further investigation does.
The sproc is throwing an error within a try/catch block that isn't seemingly handled by the block. Because the exec is asynch, interestingly, this isn't...
Hi ardeen,
The problem is that your query isn't executed as part of the SendObject call.
You could try a DLookup with the correct criteria, or alternatively, open the query as a recordset and pull the value from there.
Iain
Oops, forgot to mention - you'll need to add a reference to the Microsoft Visual Basic For Applications Extensibility liberary to enumerate the references collection.
You could try adding the required references by GUID rather than by name or location. The advantage of this approach is that newerr libraries retain the same GUId, so you don't have to worry about later version getting lost.
here's a sample proc:
Public Sub Add_Refs()...
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.