Es posible que desee una forma de realizar un seguimiento de cuántas veces se utiliza una hoja de trabajo en particular. Hay muchas formas de lograrlo. Una forma sencilla es almacenar el recuento en la propia hoja de trabajo.

Haga clic con el botón derecho en una pestaña de la hoja de trabajo, luego elija Ver código en el menú contextual. Excel muestra el Editor de Visual Basic, donde debe pegar el siguiente código:

Private Sub Worksheet_Activate()

Range("A1").Select 'customize Range     ActiveCell = ActiveCell + 1     Range("B1") = "times opened" 'customize Range End Sub

Este código incrementa el valor en la celda A1 cada vez que se activa la hoja de trabajo. Puede modificar las ubicaciones de las celdas donde la macro escribe su información, de acuerdo con sus necesidades.

Un enfoque más completo es crear una macro que incremente las referencias con nombre dentro del libro de trabajo. Considere la siguiente macro:

Function IncrementEventCounter(sName As String, sht As Object)

On Error Resume Next     If sht.Names(sName) Is Nothing Then _       ThisWorkbook.Names.Add "'" & sht.Name & "'!" & sName, "1", False     On Error GoTo 0     With ThisWorkbook.Names("'" & sht.Name & "'!" & sName)

.RefersTo = Val(Mid(.Value, 2)) + 1     End With End Function

Esta función está diseñada para ser llamada desde una macro diferente, una activada por el evento que debería hacer que el contador de uso se incremente.

Por ejemplo, si desea realizar un seguimiento de cada vez que se activa la hoja de trabajo, entonces usaría la siguiente macro como parte del objeto ThisWorkbook:

Private Sub Workbook_SheetActivate(ByVal sh As Object)

IncrementEventCounter "Activated", sh End Sub

La macro incrementa un contador llamado «Activado» para la hoja de trabajo. Lo hace llamando a la macro IncrementEventCounter, con el nombre del contador y el nombre de la hoja de trabajo. Si, en cambio, quisiera contar la cantidad de veces que se cambió una hoja de trabajo, podría usar la siguiente macro como parte del objeto ThisWorkbook:

Private Sub Workbook_SheetChange(ByVal sh As Object, _   ByVal Target As Excel.Range)

IncrementEventCounter "Changed", sh End Sub

La única diferencia entre esta macro y la anterior es que incrementa un contador llamado «Cambiado». Para ver los valores de los contadores, simplemente ingrese una fórmula en una celda que haga referencia al contador. Por ejemplo, puede ingresar = Cambiado para ver el valor del contador Cambiado, o = Activado para ver el valor del contador Activado. El valor de cada contador será diferente de una hoja a otra, ya que los contadores se mantienen hoja por hoja.

_Nota: _

Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios ExcelTips), he preparado una página especial que incluye información útil.

link: / excelribbon-ExcelTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador].

ExcelTips es su fuente de formación rentable en Microsoft Excel.

Este consejo (2497) se aplica a Microsoft Excel 97, 2000, 2002 y 2003. Puede encontrar una versión de este consejo para la interfaz de cinta de Excel (Excel 2007 y posterior) aquí:

link: / excelribbon-Counting_the_Times_a_Worksheet_is_Used [Contando las veces que se usa una hoja de trabajo].