Szafranski
New Member
- Joined
- Aug 5, 2020
- Messages
- 2
- Office Version
- 365
- Platform
- Windows
- Web
Hi.
I use this vba code
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby Extendoffice 20160725
ActiveSheet.Protect Password:="CODE", UserInterfaceOnly:=True
Cancel = True
Target.Offset(1).EntireRow.Insert
Target.EntireRow.Copy Target.Offset(1).EntireRow
On Error Resume Next
Target.Offset(1).EntireRow.SpecialCells(xlConstants).ClearContents
End Sub
But when my colleagues try to add an extra row in the web/browser version, nothing happens, it works fine in the desktop version.
What is wrong and what can i do, to make it work
I use this vba code
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby Extendoffice 20160725
ActiveSheet.Protect Password:="CODE", UserInterfaceOnly:=True
Cancel = True
Target.Offset(1).EntireRow.Insert
Target.EntireRow.Copy Target.Offset(1).EntireRow
On Error Resume Next
Target.Offset(1).EntireRow.SpecialCells(xlConstants).ClearContents
End Sub
But when my colleagues try to add an extra row in the web/browser version, nothing happens, it works fine in the desktop version.
What is wrong and what can i do, to make it work