<div>
<div class="content wysiwyg-content">
Hi. I was given the VBA code below to add a DropDown to a cell. How do I modify it so that it fits into the cell and what code would I add so that if the user changes the cells size the DropDown automatically changes too<br />
<br />
With ActiveSheet.DropDowns.Add(<wbr />142.5, 38.25, 108.75, 24)<br />
&nbsp; &nbsp; .Top = Range(&quot;C1&quot;).Top<br />
&nbsp; &nbsp; .Left = Range(&quot;C1&quot;).Left<br />
End With
</div>
</div>


Hi. I was given the VBA code below to add a DropDown to a cell. How do I modify it so that it fits into the cell and what code would I add so that if the user changes the cells size the DropDown automatically changes too

With ActiveSheet.DropDowns.Add(142.5, 38.25, 108.75, 24)
    .Top = Range("C1").Top
    .Left = Range("C1").Left
End With

VBA adding a DropDown over a cell that flexes with it

Microsoft Excel topics include formulas, formatting, VBA macros and user-defined functions, and everything else related to the spreadsheet user interface, including error messages.