View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
[email protected] anapaulags92@gmail.com is offline
external usenet poster
 
Posts: 6
Default My macro doesn't work if sheet is protected but it works if not protected

I tried your code but the error is now he


Set c = Cells.Find(What:=Replace(imagen, ".jpg", ""))

Label3 = c.Offset(0, 1) <<<--- ERROR HERE
Label2 = c.Offset(0, 2)
Label12 = c.Offset(0, 10)
Label13 = c.Offset(0, 11)
Label14 = c.Offset(0, 12)
Label15 = c.Offset(0, 13)
Label16 = c.Offset(0, 14)