title: Paste Data To Range From User Form
body: <p>I am looking for a little assistance with the VBA code in the workbook I have been working on. There is a userform with dependent dropdowns that pulls their values from &quot;Master Sheet&quot; in the workbook. The drop downs are functioning fine. However I have two roadblocks that I have now been able to get past. The first, The dropdowns allow the selection of &quot;Category, Make, Model, and Add To&quot;. In the Master Sheet, &quot;Category, Make, Model&quot; Run from Columns A:C. Columns D:G have the equipment's, &quot;Weight, Length, Width, Depth&quot; information. I have not been able to have the information from columns A:F be copied based off the model selection. I have been trying have it paste in a test are for functionality with no luck. However once that would be functioning the &quot;Add To&quot; combo box selection in the user form would specify the range in the ECA worksheet to place that data. In the combo box selection, selecting &quot;Keep&quot; would place that information in range S3:Y16, &quot;Remove&quot; would be range S18:Y32, and &quot;Final&quot; would be range S35:Y47. Since numerous pieces of equipment would be added into each section when adding a piece of equipment it would place that entry in the next empty row of that range.</p>
  <p><a href="https://drive.google.com/file/d/17FTTvcuPn8J76oTTJX9f2Dy2XTVWEtpo/view?usp=sharing" rel="nofollow noreferrer">Link To Workbook</a></p>
  <p><strong>Picture Of Worksheets</strong>
  <a href="https://i.stack.imgur.com/pInpn.png" rel="nofollow noreferrer">Master Sheet</a>
  <a href="https://i.stack.imgur.com/Yd7Di.jpg" rel="nofollow noreferrer">ECA Sheet</a></p>
  <p><strong>Dependent Drop Down Code</strong></p>
  <pre><code>Private Sub cmbAddTo_Click()
  'code needed to copy and add to selected range
  End Sub
  
  Private Sub cmdCancel_Click()
  frmUser.Hide
  End Sub
  
  Private Sub UserForm_Initialize()
  cmbCategory.RowSource = DynamicList(1, Null, 1, &quot;Master Sheet&quot;, &quot;Drop Down&quot;)
  End Sub
  
  Private Sub cmbCategory_Change()
  cmbMake.RowSource = DynamicList(1, cmbCategory.Value, 2, &quot;Master Sheet&quot;, &quot;Drop Down&quot;)
  End Sub
  
  Private Sub cmbMake_Change()
  cmbModel.RowSource = DynamicList(2, cmbMake.Value, 3, &quot;Master Sheet&quot;, &quot;Drop Down&quot;)  
  End Sub
  </code></pre>