ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Open Searched File (https://www.excelbanter.com/excel-programming/271385-open-searched-file.html)

Pedro[_4_]

Open Searched File
 
Hi
What code shoul I write in order for it to search a pre-
defined filename and open that searched file?
Someone already gave a tip to go to vba help. The vba
help for filesearch only explains how to search the file.
Now, how do I open the searched file?

Regards
Pedro


[email protected]

Open Searched File
 
In VBE help, see the Open method of the Workbook class.

HTH
Paul
--------------------------------------------------------------------------------------------------------------
Be advised to back up your WorkBook before attempting to make changes.
--------------------------------------------------------------------------------------------------------------
On Fri, 11 Jul 2003 01:28:21 -0700, "Pedro" wrote:

Hi
What code shoul I write in order for it to search a pre-
defined filename and open that searched file?
Someone already gave a tip to go to vba help. The vba
help for filesearch only explains how to search the file.
Now, how do I open the searched file?

Regards
Pedro



Pedro[_4_]

Open Searched File
 
Can you please be a little more specific
I am new on VBA
Thanks
Pedro

-----Original Message-----
In VBE help, see the Open method of the Workbook class.

HTH
Paul
---------------------------------------------------------

-----------------------------------------------------
Be advised to back up your WorkBook before attempting to

make changes.
---------------------------------------------------------

-----------------------------------------------------
On Fri, 11 Jul 2003 01:28:21 -0700, "Pedro"

wrote:

Hi
What code shoul I write in order for it to search a pre-
defined filename and open that searched file?
Someone already gave a tip to go to vba help. The vba
help for filesearch only explains how to search the

file.
Now, how do I open the searched file?

Regards
Pedro


.


Tom Ogilvy

Open Searched File
 
Sub GatherFiles()
Dim sName As String
Dim sPath As String
Dim sArr() As String
With Application.FileSearch
.NewSearch
.LookIn = "C:\"
.SearchSubFolders = False
.FileName = "MyExcelFile.xls"
'' .FileType = msoFileTypeAllFiles
.FileType = msoFileTypeExcelWorkbooks
If .Execute() 0 Then
For i = 1 To 1 ' .FoundFiles.Count
set wkbk = Workbooks.Open(.Foundfiles(i))
' workbook is now open
Next i
Else
MsgBox "There were no files found."
End If
End With
End Sub

--
Regards,
Tom Ogilvy


"Pedro" wrote in message
...
Can you please be a little more specific
I am new on VBA
Thanks
Pedro

-----Original Message-----
In VBE help, see the Open method of the Workbook class.

HTH
Paul
---------------------------------------------------------

-----------------------------------------------------
Be advised to back up your WorkBook before attempting to

make changes.
---------------------------------------------------------

-----------------------------------------------------
On Fri, 11 Jul 2003 01:28:21 -0700, "Pedro"

wrote:

Hi
What code shoul I write in order for it to search a pre-
defined filename and open that searched file?
Someone already gave a tip to go to vba help. The vba
help for filesearch only explains how to search the

file.
Now, how do I open the searched file?

Regards
Pedro


.




Pedro[_4_]

Open Searched File
 
Hi Tom

What should I add to that if the searched file as links
and I want to update them automatically whenever I open
the file.

Thanks
Pedro



-----Original Message-----
Sub GatherFiles()
Dim sName As String
Dim sPath As String
Dim sArr() As String
With Application.FileSearch
.NewSearch
.LookIn = "C:\"
.SearchSubFolders = False
.FileName = "MyExcelFile.xls"
'' .FileType = msoFileTypeAllFiles
.FileType = msoFileTypeExcelWorkbooks
If .Execute() 0 Then
For i = 1 To 1 ' .FoundFiles.Count
set wkbk = Workbooks.Open(.Foundfiles(i))
' workbook is now open
Next i
Else
MsgBox "There were no files found."
End If
End With
End Sub

--
Regards,
Tom Ogilvy


"Pedro" wrote in message
...
Can you please be a little more specific
I am new on VBA
Thanks
Pedro

-----Original Message-----
In VBE help, see the Open method of the Workbook class.

HTH
Paul
-------------------------------------------------------

--
-----------------------------------------------------
Be advised to back up your WorkBook before attempting

to
make changes.
-------------------------------------------------------

--
-----------------------------------------------------
On Fri, 11 Jul 2003 01:28:21 -0700, "Pedro"

wrote:

Hi
What code shoul I write in order for it to search a

pre-
defined filename and open that searched file?
Someone already gave a tip to go to vba help. The vba
help for filesearch only explains how to search the

file.
Now, how do I open the searched file?

Regards
Pedro

.



.


Tom Ogilvy

Open Searched File
 
Sub GatherFiles()
Dim sName As String
Dim sPath As String
Dim sArr() As String
With Application.FileSearch
.NewSearch
.LookIn = "C:\"
.SearchSubFolders = False
.FileName = "MyExcelFile.xls"
'' .FileType = msoFileTypeAllFiles
.FileType = msoFileTypeExcelWorkbooks
If .Execute() 0 Then
For i = 1 To 1 ' .FoundFiles.Count
set wkbk = Workbooks.Open(.Foundfiles(i), UpdateLinks:=3)
' workbook is now open
Next i
Else
MsgBox "There were no files found."
End If
End With
End Sub

--
Regards,
Tom Ogilvy


"Pedro" wrote in message
...
Hi Tom

What should I add to that if the searched file as links
and I want to update them automatically whenever I open
the file.

Thanks
Pedro



-----Original Message-----
Sub GatherFiles()
Dim sName As String
Dim sPath As String
Dim sArr() As String
With Application.FileSearch
.NewSearch
.LookIn = "C:\"
.SearchSubFolders = False
.FileName = "MyExcelFile.xls"
'' .FileType = msoFileTypeAllFiles
.FileType = msoFileTypeExcelWorkbooks
If .Execute() 0 Then
For i = 1 To 1 ' .FoundFiles.Count
set wkbk = Workbooks.Open(.Foundfiles(i))
' workbook is now open
Next i
Else
MsgBox "There were no files found."
End If
End With
End Sub

--
Regards,
Tom Ogilvy


"Pedro" wrote in message
...
Can you please be a little more specific
I am new on VBA
Thanks
Pedro

-----Original Message-----
In VBE help, see the Open method of the Workbook class.

HTH
Paul
-------------------------------------------------------

--
-----------------------------------------------------
Be advised to back up your WorkBook before attempting

to
make changes.
-------------------------------------------------------

--
-----------------------------------------------------
On Fri, 11 Jul 2003 01:28:21 -0700, "Pedro"
wrote:

Hi
What code shoul I write in order for it to search a

pre-
defined filename and open that searched file?
Someone already gave a tip to go to vba help. The vba
help for filesearch only explains how to search the
file.
Now, how do I open the searched file?

Regards
Pedro

.



.





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

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