title: Print Screen PDF file with vba
body: <p>I want to open a PDF file and print the subaddress that i specified, but when i use Application.SendKeys "(%{1068})" just print screen Userform. My issue is how print screen just subaddress Rating Changes.</p>
  
  <pre><code>enter code here
  Private Sub AlteraRating_Click()
  Dim strFolde As String, Month As String, Year As String, strFile As String
  
  Month = Format(SalvaData, "mm")
  Year = Format(SalvaData, "yyyy")
  pdfData = Format(SalvaData, "yyyymmdd")
  strFolder = "C:\Report\Report of Investments\" &amp; Year &amp; "\" &amp; Month &amp; "\"
  
  
  strFile = strFolder &amp; "RAI_INFRAPREV PLANO CV_F03148_" &amp; pdfData &amp; ".pdf"
  ThisWorkbook.FollowHyperlink strFile, "Rating Changes"
  
  Application.SendKeys "(%{1068})"
  DoEvents
  
  End Sub
  </code></pre>