Go Back  Xtreme Visual Basic Talk > Legacy Visual Basic (VB 4/5/6) > VBA / Office Integration > Excel > create a button to seach documents contains "x" in a certain directory


Reply
 
Thread Tools Display Modes
  #1  
Old 07-27-2010, 01:19 PM
gogoaaron gogoaaron is offline
Newcomer
 
Join Date: Jul 2010
Posts: 1
Default create a button to seach documents contains "x" in a certain directory


Hi, anyone can help me to write a code for
creating a button in Excel.
By clicking the button to start search files in certain directory?
and also files' name should contain the characters in activecell.
in other words, the contents in ACtivecell is the searching criteria for file name.
I start with
code:
Sub Button1_Click()


End sub

---------------------------------------------
and I have no clues any more
Thanks for helping me out!!!!!!!!!!
Reply With Quote
  #2  
Old 07-27-2010, 02:48 PM
Bob Phillips's Avatar
Bob Phillips Bob Phillips is offline
Contributor
 
Join Date: Jul 2009
Posts: 506
Default

Code:
Dim Filename As String
Dim Filepath As String

    Filepath = "C:\Test\"
    Filename = Dir(Filepath & "*" & ActiveCell.Value & "*")
    Do While Filename <> ""
    
        Workbooks.Open Filepath & Filename
        'do something with activeworkbook
        Filename = Dir
    Loop
Reply With Quote
Reply


Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
 
Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is Off
HTML code is Off

Forum Jump

Advertisement:





Free Publications
The ASP.NET 2.0 Anthology
101 Essential Tips, Tricks & Hacks - Free 156 Page Preview. Learn the most practical features and best approaches for ASP.NET.
subscribe
Programmers Heaven C# School Book -Free 338 Page eBook
The Programmers Heaven C# School book covers the .NET framework and the C# language.
subscribe
Build Your Own ASP.NET 3.5 Web Site Using C# & VB, 3rd Edition - Free 219 Page Preview!
This comprehensive step-by-step guide will help get your database-driven ASP.NET web site up and running in no time..
subscribe
 
 
-->