title: Printing "x" number of sheets based on cell value on master sheet
body: <p>I am attempting to use vba to print a certain number of copies of different sheets in my workbook by adding a number to column D.  I have the following code for this but i can't get it to work.
  I have screen grabbed a picture of an example workbook for this.</p>
  <pre><code>Sub PrintSheets()
      Dim mysheets As Range
      For Each mysheets In Sheet1.Range(&quot;A5:A100&quot;)
      If mysheets.Offset(0, 3).Value &lt;&gt; &quot;&quot; Then Sheets(mysheets.Value).PrintOut Copies:=mysheets.Offset(0, 3).Value
      Next mysheets
  End Sub
  </code></pre>
  <p><img src="https://i.stack.imgur.com/0z7TB.png" alt="enter image description here" /></p>
  <p>Any help would greatly be appreciated!</p>