Elsa Matilde respondió:
Entrá al Editor (con Alt+F11). Seleccioná con doble clic el objeto ThisWorkbook (o Este libro) del panel a tu izquierda. Allí copiá esta rutina, ajustando el nombre de tu hoja y rango inicial. Private Sub Workbook_BeforeSave(ByVal SaveAsUI As...