Hi Hanumant,

 

 

Below is the code you can use to find if the workbook is already opened….

 

Sub CheckIfOpen()

Dim Wkbk As Workbook

Dim Filename As String

Filename = InputBox("Type the name of the file you want to check.")

For Each Wkbk In Application.Workbooks

    If Wkbk.Name = Filename Then

        MsgBox (Filename & " is open; changes may result in errors.")

    End If

Next Wkbk

End Sub

 

 

Thanks and Regards,

 

Upendra Singh

+91-9910227325

 

From: excel-macros@googlegroups.com [mailto:excel-mac...@googlegroups.com] On 
Behalf Of hanumant shinde
Sent: Saturday, October 03, 2009 2:15 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ workbook open or not

 

hi guys,

can somebody pls tell me how to find if the workbook is open or not.
lets say i wanna open"hanumant.xlsx" file using macro. but b4 that i wanna 
check if the file is open or not. if the file is already open then i won't open 
it again. and if it is not open then only i will open it.
pls if u have any que abt this let me know





  _____  

>From cricket scores to your friends. Try the Yahoo! India Homepage! 
><http://in.rd.yahoo.com/tagline_metro_4/*http:/in.yahoo.com/trynew> 

 


--~--~---------~--~----~------------~-------~--~----~
----------------------------------------------------------------------------------
Some important links for excel users:
1. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at 
http://www.excelitems.com
2. Excel tutorials at http://www.excel-macros.blogspot.com
3. Learn VBA Macros at http://www.vbamacros.blogspot.com
4. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 

To post to this group, send email to excel-macros@googlegroups.com
If you find any spam message in the group, please send an email to:
Ayush Jain  @ jainayus...@gmail.com or
Ashish Jain @ 26may.1...@gmail.com
<><><><><><><><><><><><><><><><><><><><><><>
HELP US GROW !!

We reach over 6,500 subscribers worldwide and receive many nice notes about the 
learning and support from the group. Our goal is to have 10,000 subscribers by 
the end of 2009. Let friends and co-workers know they can subscribe to group at 
http://groups.google.com/group/excel-macros/subscribe
-~----------~----~----~----~------~----~------~--~---

Reply via email to