Hello
The following code
Quote
Set AADrpDn = .Shapes.AddFormControl(xlDropDown, 4, 84 + 33, 536, 21)
For i = 1 To 10
TextF = Cells(i, 2) & Cells(i, 3) & Cells(i, 4) & Cells(i, 5) & Cells(i, 6)
AADrpDn.ControlFormat.AddItem TextF
Next i
Unquote
is in a excel macro, which working as follows:
1st...