Simulate double click for each cell in range

[Milos]

Hi,

I am wanting to simulate double clicking in a selected range as I have an 'almost complete macro' that only seems to work when I have double clicked in the specific cells.

I have come up with this code but it does not seem to work compared to when i physically double click each cell. Can somebody please help me fix this up so that it will simulate a double click in the selected range?

Sub Double_Click_Selected_Cells()


Dim rng As Range, cell As Range
   Set rng = Selection
   For Each cell In rng
        ActiveSheet.Activate
        Application.DoubleClick
   Next cell


End Sub

Cheers,
Milos

 

[DanteAmor]

Do you have a double click event?
You can put your macro "'almost complete macro'"
You must execute your "'almost complete macro'" by sending as a parameter each of the cells of the selection, not necessarily by double clicking on the cell.

 

[Milos]

Yes I was playing around with a double click event also but I have removed it now as I no longer need it. I was trying to cheat by going for the lazy option rather than thinking for a while and actually fixing my macro. Turns out simulating a double-click is rather difficult from the (lack of) threads on the internet.

But I spent a day thinking and researching to turn my "almost complete macro" into a "complete macro" so I am all sorted, no double click required.

Cheers DanteAmor,

 

[DanteAmor]

I'm glad now you have your complete macro