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)
|