Ashish Sir,
Thank you.
This is working. You have solved my big problem.
With Regards,
*Suyog*
On Wednesday, 3 July 2013 20:23:41 UTC+5:30, ashish wrote:
>
> try this macro see if it helps
>
> Sub add_comboboxes()
>
> Dim rng As Range
> Dim cl As Range
> Dim shp As Shape
>
> For Each shp In A
try this macro see if it helps
Sub add_comboboxes()
Dim rng As Range
Dim cl As Range
Dim shp As Shape
For Each shp In ActiveSheet.Shapes
If shp.Type = msoFormControl Then shp.Delete
Next
Set rng = Range("b3:b10")
For Each cl In rng
ActiveSheet.DropDowns.Add(cl.Left,
Hello All,
I've created one form control & copy and paste them all the way down the
column, hoping that the linked cell will get auto update like normally
happens while copy-pasting of any normal formula. Now I've to set all
individually set up the cell link for each one.
Is there anyway of c