Libro de excel con subgrupos y protección de celdas por macro pero no puedo compartir el libro

Como le comentaba, tengo un libro de excel el cual contiene varios subgrupos, adicional deseo bloquerar ciertas columnas y celdas pero la única manera es por medio de una macro, la cual es la siguiente.

Private Sub Workbook_Open()
With Worksheets("01")
.EnableOutlining = True
.Protect Password:="contraseña", _
Contents:=True, UserInterfaceOnly:=True
End With

Pero también deseo compartir el libro con otros usuarios por medio de la red pero al momento de compartirlo me deshabilita la macro.. Que puedo hacer al respecto.