I am trying to create a drop down selection list to a command button based from a formula. Please see below for what I have so far.
Private Sub CommandButton2_Click()<o
></o
>
For X = 1 To Selection.Rows.Count<o
></o
>
n = Selection.Row + X - 1<o
></o
>
Selection.Range(Cells(X, 1), Cells(X,Selection.Columns.Count)) = "=M" & n &"*.012*(1+K2)"<o
></o
>
Next X<o
></o
>
<o
> </o
>
End Sub
My main goal is to be able to select an option from a drop down list, and post that information to a specific selected cell.
Private Sub CommandButton2_Click()<o
![Stick out tongue :p :p](https://cdn.jsdelivr.net/joypixels/assets/8.0/png/unicode/64/1f61b.png)
![Stick out tongue :p :p](https://cdn.jsdelivr.net/joypixels/assets/8.0/png/unicode/64/1f61b.png)
For X = 1 To Selection.Rows.Count<o
![Stick out tongue :p :p](https://cdn.jsdelivr.net/joypixels/assets/8.0/png/unicode/64/1f61b.png)
![Stick out tongue :p :p](https://cdn.jsdelivr.net/joypixels/assets/8.0/png/unicode/64/1f61b.png)
n = Selection.Row + X - 1<o
![Stick out tongue :p :p](https://cdn.jsdelivr.net/joypixels/assets/8.0/png/unicode/64/1f61b.png)
![Stick out tongue :p :p](https://cdn.jsdelivr.net/joypixels/assets/8.0/png/unicode/64/1f61b.png)
Selection.Range(Cells(X, 1), Cells(X,Selection.Columns.Count)) = "=M" & n &"*.012*(1+K2)"<o
![Stick out tongue :p :p](https://cdn.jsdelivr.net/joypixels/assets/8.0/png/unicode/64/1f61b.png)
![Stick out tongue :p :p](https://cdn.jsdelivr.net/joypixels/assets/8.0/png/unicode/64/1f61b.png)
Next X<o
![Stick out tongue :p :p](https://cdn.jsdelivr.net/joypixels/assets/8.0/png/unicode/64/1f61b.png)
![Stick out tongue :p :p](https://cdn.jsdelivr.net/joypixels/assets/8.0/png/unicode/64/1f61b.png)
<o
![Stick out tongue :p :p](https://cdn.jsdelivr.net/joypixels/assets/8.0/png/unicode/64/1f61b.png)
![Stick out tongue :p :p](https://cdn.jsdelivr.net/joypixels/assets/8.0/png/unicode/64/1f61b.png)
End Sub
My main goal is to be able to select an option from a drop down list, and post that information to a specific selected cell.