problems with doublclick

[rutledj]

I'm trying to run some code when a user doubleclicks on a worksheet cell but the BeforeDoubleClick sub never fires. Is there another way to capture doubleclicks?

[BadlySpelledBuoy]

How do you know it never fires? Have you tried putting a pause break in the code and trying it?

Could you attach the file? Desensitize it if necessary.

BSB

[rutledj]

Never mind. I was putting the code in the wrong sheet. Dummy me!

[rutledj]

But I do have another issue. When I doubleclick on a cell, it opens a form loaded with the data from the row. The issue is that the cell is now in edit mode and the form can't be edited unless I click on the worksheet to take the cell out of edit mode. Is there a way to prevent the cells from being edited? I only want data edited within the form.

[BadlySpelledBuoy]

Try adding the below just before the line that opens the form:

Cancel = True

BSB

[rutledj]

Unfortunately, that doesn't work. Any other suggestions?

[bakerman2]

This works fine for me.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Cancel = True
    UserForm1.Show
End Sub

[rutledj]

That is working now. Had the code in the wrong place. Is there a way to lock the sheet so that the data is only editable using the form? I don't want the user prompted for a password (which I think protecting the sheet does).

[BadlySpelledBuoy]

That is working now. Had the code in the wrong place.

Well done to Bakerman2 for stepping in. Much appreciated.

[bakerman2]

You only need to unprotect and protect when writing back to worksheet.

Sheets("whatever").unprotect
'write edited data
Sheets("whatever").protect