Setting zoom without select in Excel VBA
<p>Is it possible to set up zoom level based on screen resolution without <code>Select</code>?</p>

<p>I have followed the code:</p>

<pre><code>Sheets(1).Range("A1:AC1").Select
ActiveWindow.Zoom = True
</code></pre>

<p>taken from <a href="https://stackoverflow.com/a/19439177/1903793">https://stackoverflow.com/a/19439177/1903793</a></p>

<p>Desired code would be something like:</p>

<pre><code>Range("A1:AC1").Width.Zoom=True
</code></pre>

<p><strong>Update. Why do I want to avoid Select?</strong></p>

<ol>
<li>My sheet has hidden columns based on user settings. So some columns of the range A1:AC1 are hidden. I cannot select single column because this particular column may be hidden.</li>
<li>Selection triggers events. Of course I can disable the events but disabling the events has some side effects which I want to avoid.</li>
</ol>