Jumat, 29 Januari 2016

RE: [MS_AccessPros] Re: Folder picker debug problem

 

Bingo.

Thanks



---In MS_Access_Professionals@yahoogroups.com, <DEmbrey@...> wrote :

Adam,

Does the database where it doesn't work have a reference to the Microsoft Office object library?

 

Darrell

 

From: MS_Access_Professionals@yahoogroups.com [mailto:MS_Access_Professionals@yahoogroups.com]
Sent: Friday, January 29, 2016 2:28 PM
To: MS_Access_Professionals@yahoogroups.com
Subject: [MS_AccessPros] Re: Folder picker debug problem

 

 

I assume "instead" refers to As String, of which there are several. Didn't work no matter where I tried it. That doesn't explain why the code works in another database.

 

Adam



---In MS_Access_Professionals@yahoogroups.com, <strive4peace2008@...> wrote :

Hi Adam,

use:
As Object

instead

warm regards,
crystal

VBA Tip: Select File or Folder using FileDialog using Access (cc)
by Adrian Bell
http://www.youtube.com/watch?v=rNHLea359p4

~ have an awesome day ~

On 1/29/2016 11:42 AM, runuphillracing@... [MS_Access_Professionals] wrote:

I need help figuring out why I get a Variable not defined compile error on msoFileDialogFolderPicker

 

in the function:

Public Function FSBrowse(Optional strStart As String = "", _
                          Optional lngType As MsoFileDialogType = msoFileDialogFolderPicker, _
                          Optional strPattern As String = "All Files,*.*") As String

 

which is called from strPath = FSBrowse(lngType:=msoFileDialogFolderPicker)

 

The exact same code (in utility module) works in one database but not in another.

 

Adam

 


The information contained in this communication is highly confidential and is intended solely for the use of the individual(s) to whom this communication is directed. If you are not the intended recipient, you are hereby notified that any viewing, copying, disclosure or distribution of this information is prohibited. Please notify the sender, by electronic mail or telephone, of any unintended receipt and delete the original message without making any copies.

Blue Cross Blue Shield of Michigan and Blue Care Network of Michigan are nonprofit corporations and independent licensees of the Blue Cross and Blue Shield Association.

__._,_.___

Posted by: runuphillracing@yahoo.com
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (5)

.

__,_._,___

Tidak ada komentar:

Posting Komentar