title: VBA Printing ranges from different sheets and prompting the user only once
body: <p>I have 2 ranges (fixed) in 2 different sheets which I want to print in a single file in different pages, prompting the user by the Print dialogue box only once.</p>
  
  <p>I am so far doing this:</p>
  
  <pre><code>Sheets("Sheet1").Select
  ActiveSheet.PageSetup.PrintArea = "$A$1:$D$47"
  ActiveWindow.SelectedSheets.PrintOut
  Sheets("Sheet2").Select
  ActiveSheet.PageSetup.PrintArea = "$A$1:$D$94"
  ActiveWindow.SelectedSheets.PrintOut
  </code></pre>
  
  <p>But it doesn't even prompts the user even once.</p>