<?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: Zoom&#8230;Zoom</title>
	<atom:link href="http://www.automateexcel.com/2004/11/08/excel_vba_zoom_zoom/feed/" rel="self" type="application/rss+xml" />
	<link>http://www.automateexcel.com/2004/11/08/excel_vba_zoom_zoom/</link>
	<description>Everything Excel. Only Excel.</description>
	<lastBuildDate>Mon, 21 Nov 2011 07:25:47 +0000</lastBuildDate>
	<sy:updatePeriod>hourly</sy:updatePeriod>
	<sy:updateFrequency>1</sy:updateFrequency>
	<generator>http://wordpress.org/?v=3.2.1</generator>
	<item>
		<title>By: Excel &#8211; Set Zoom of the ActiveWindow in VBA &#187; HeelpBook</title>
		<link>http://www.automateexcel.com/2004/11/08/excel_vba_zoom_zoom/comment-page-1/#comment-2369</link>
		<dc:creator>Excel &#8211; Set Zoom of the ActiveWindow in VBA &#187; HeelpBook</dc:creator>
		<pubDate>Fri, 04 Nov 2011 11:40:36 +0000</pubDate>
		<guid isPermaLink="false">#comment-2369</guid>
		<description>[...] TimeValue(&quot;00:00:01&quot;) Next x &#039;restore original zoom ActiveWindow.Zoom = OriginalZoom End SubSOURCE LINK (Automateexcel.com)LANGUAGEENGLISH  &#160; &#160; &#160; &#160; &#160; &#160; &#160; &#160; &#160; &#160; &#160; &#160; [...]</description>
		<content:encoded><![CDATA[<p>[...] TimeValue(&quot;00:00:01&quot;) Next x &#039;restore original zoom ActiveWindow.Zoom = OriginalZoom End SubSOURCE LINK (Automateexcel.com)LANGUAGEENGLISH  &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; [...]</p>
]]></content:encoded>
	</item>
	<item>
		<title>By: Cheryl</title>
		<link>http://www.automateexcel.com/2004/11/08/excel_vba_zoom_zoom/comment-page-1/#comment-1329</link>
		<dc:creator>Cheryl</dc:creator>
		<pubDate>Thu, 24 Sep 2009 11:46:13 +0000</pubDate>
		<guid isPermaLink="false">#comment-1329</guid>
		<description>I had tried. It works by using the following code

ActiveWindow.Zoom = 100%</description>
		<content:encoded><![CDATA[<p>I had tried. It works by using the following code</p>
<p>ActiveWindow.Zoom = 100%</p>
]]></content:encoded>
	</item>
	<item>
		<title>By: Sam</title>
		<link>http://www.automateexcel.com/2004/11/08/excel_vba_zoom_zoom/comment-page-1/#comment-1226</link>
		<dc:creator>Sam</dc:creator>
		<pubDate>Sat, 16 May 2009 10:35:24 +0000</pubDate>
		<guid isPermaLink="false">#comment-1226</guid>
		<description>If you are using Excel 97, you may have to write the zoom size that will be the equivalent ratio of your active zoom. In this case, since you reduced it to 50%, you would now have to increase it by 200% to bring it to normal i.e. 100%. I&#039;m not sure if I&#039;m right, and I didn&#039;t have an IDE environment to check this, but let me know.

For Each ws In Worksheets
ws.Activate
ActiveWindow.Zoom = (100/ActiveWindow.Zoom)*100
Next</description>
		<content:encoded><![CDATA[<p>If you are using Excel 97, you may have to write the zoom size that will be the equivalent ratio of your active zoom. In this case, since you reduced it to 50%, you would now have to increase it by 200% to bring it to normal i.e. 100%. I&#8217;m not sure if I&#8217;m right, and I didn&#8217;t have an IDE environment to check this, but let me know.</p>
<p>For Each ws In Worksheets<br />
ws.Activate<br />
ActiveWindow.Zoom = (100/ActiveWindow.Zoom)*100<br />
Next</p>
]]></content:encoded>
	</item>
	<item>
		<title>By: Ali</title>
		<link>http://www.automateexcel.com/2004/11/08/excel_vba_zoom_zoom/comment-page-1/#comment-1218</link>
		<dc:creator>Ali</dc:creator>
		<pubDate>Sun, 10 May 2009 13:29:31 +0000</pubDate>
		<guid isPermaLink="false">#comment-1218</guid>
		<description>in my vba code, zooming to 50% works fine, but not back to 100% any ideas why?
For Each ws In Worksheets
    ws.Activate
    ActiveWindow.Zoom = 100
Next</description>
		<content:encoded><![CDATA[<p>in my vba code, zooming to 50% works fine, but not back to 100% any ideas why?<br />
For Each ws In Worksheets<br />
    ws.Activate<br />
    ActiveWindow.Zoom = 100<br />
Next</p>
]]></content:encoded>
	</item>
</channel>
</rss>

