<?xml version="1.0" encoding="UTF-8"?><rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	xmlns:sy="http://purl.org/rss/1.0/modules/syndication/"
		>
<channel>
	<title>Comments on: VBA: Test if Workbook is Open, by Workbook Name</title>
	<atom:link href="http://www.automateexcel.com/2005/01/12/excel_vba_test_if_workbook_is_open_by_wo/feed/" rel="self" type="application/rss+xml" />
	<link>http://www.automateexcel.com/2005/01/12/excel_vba_test_if_workbook_is_open_by_wo/</link>
	<description>Hundreds of Excel Tips &#38; Tricks</description>
	<lastBuildDate>Tue, 23 Feb 2010 15:18:21 +0000</lastBuildDate>
	<generator>http://wordpress.org/?v=2.9.1</generator>
	<sy:updatePeriod>hourly</sy:updatePeriod>
	<sy:updateFrequency>1</sy:updateFrequency>
		<item>
		<title>By: mik</title>
		<link>http://www.automateexcel.com/2005/01/12/excel_vba_test_if_workbook_is_open_by_wo/comment-page-1/#comment-1141</link>
		<dc:creator>mik</dc:creator>
		<pubDate>Tue, 03 Feb 2009 17:36:34 +0000</pubDate>
		<guid isPermaLink="false">#comment-1141</guid>
		<description>I&#039;d rather use the code listed first (TestByWorkbookName), but it didn&#039;t work for me.

You didn&#039;t set wb, how will it know what to compare the name to?

How do I set wb to know all currently open workbooks?</description>
		<content:encoded><![CDATA[<p>I&#8217;d rather use the code listed first (TestByWorkbookName), but it didn&#8217;t work for me.</p>
<p>You didn&#8217;t set wb, how will it know what to compare the name to?</p>
<p>How do I set wb to know all currently open workbooks?</p>
]]></content:encoded>
	</item>
	<item>
		<title>By: Mark</title>
		<link>http://www.automateexcel.com/2005/01/12/excel_vba_test_if_workbook_is_open_by_wo/comment-page-1/#comment-69</link>
		<dc:creator>Mark</dc:creator>
		<pubDate>Wed, 12 Jan 2005 01:48:11 +0000</pubDate>
		<guid isPermaLink="false">#comment-69</guid>
		<description>Thanks Rob, that does look better.  &lt;br /&gt;
&lt;br /&gt;
BTW, Nice site!  The 3D model rotate tool is amazing, I&#039;ll link it later today.</description>
		<content:encoded><![CDATA[<p>Thanks Rob, that does look better.  </p>
<p>BTW, Nice site!  The 3D model rotate tool is amazing, I&#8217;ll link it later today.</p>
]]></content:encoded>
	</item>
	<item>
		<title>By: Rob van Gelder</title>
		<link>http://www.automateexcel.com/2005/01/12/excel_vba_test_if_workbook_is_open_by_wo/comment-page-1/#comment-68</link>
		<dc:creator>Rob van Gelder</dc:creator>
		<pubDate>Wed, 12 Jan 2005 01:27:13 +0000</pubDate>
		<guid isPermaLink="false">#comment-68</guid>
		<description>Hi.&lt;br /&gt;
&lt;br /&gt;
The code which I use and the most common on newsgroups is as follows:&lt;br /&gt;
&lt;br /&gt;
Sub test()&lt;br /&gt;
    Dim wkb As Workbook&lt;br /&gt;
&lt;br /&gt;
    On Error Resume Next&lt;br /&gt;
    Set wkb = Workbooks(&quot;New Microsoft Excel Worksheet.xls&quot;)&lt;br /&gt;
    On Error GoTo 0&lt;br /&gt;
&lt;br /&gt;
    If Not wkb Is Nothing Then MsgBox &quot;Found it&quot;&lt;br /&gt;
End Sub&lt;br /&gt;
&lt;br /&gt;
Cheers,&lt;br /&gt;
Rob</description>
		<content:encoded><![CDATA[<p>Hi.</p>
<p>The code which I use and the most common on newsgroups is as follows:</p>
<p>Sub test()<br />
    Dim wkb As Workbook</p>
<p>    On Error Resume Next<br />
    Set wkb = Workbooks(&#8220;New Microsoft Excel Worksheet.xls&#8221;)<br />
    On Error GoTo 0</p>
<p>    If Not wkb Is Nothing Then MsgBox &#8220;Found it&#8221;<br />
End Sub</p>
<p>Cheers,<br />
Rob</p>
]]></content:encoded>
	</item>
</channel>
</rss>
