Craear Contador Automatico en Excel
Private Sub Workbook_Open()
respuesta = MsgBox("¿Desea autoincrementar?", vbYesNo)
If respuesta = vbYes Then
Range("B9").Value = Range("B9").Value + 1
End If
ThisWorkbook.Save
End Sub
Wandering Wolverine