ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   permanently add reference to ADO library (https://www.excelbanter.com/excel-programming/348077-permanently-add-reference-ado-library.html)

Loane Sharp[_2_]

permanently add reference to ADO library
 
Hi there
I find it a bit irritating that, every time I create a new procedure in a
new workbook, I need to add a reference to the ADO object library. Is there
any way that I can have this reference added permanently?
Best regards
Loane



DM Unseen

permanently add reference to ADO library
 
This is not possible, because references are handled per workbook.

I would suggest the following workaround:
Create a new workbook, add all your references, and save as a template
to your template folder. Now create a new workbook based on your new
template

Dm Unseen


keepITcool

permanently add reference to ADO library
 

Create an addin that does it for you...
following will setup an application event monitor
and add the reference when a NewWorkbook event is detected.


'<<code for THISWORKBOOK module
Option Explicit

Dim WithEvents xlApp As Application

Private Sub Workbook_Open()
Set xlApp = Application
End Sub

Private Sub xlApp_NewWorkbook(ByVal wb As Workbook)
Call AddAdoReference(wb)
End Sub

Sub AddAdoReference(ByVal wb As Workbook)
wb.VBProject.References.AddFromFile _
"C:\Program Files\Common Files\System\ado\msado15.dll"
End Sub



--
keepITcool
| www.XLsupport.com | keepITcool chello nl | amsterdam


Loane Sharp wrote :

Hi there
I find it a bit irritating that, every time I create a new procedure
in a new workbook, I need to add a reference to the ADO object
library. Is there any way that I can have this reference added
permanently? Best regards Loane



All times are GMT +1. The time now is 09:35 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com