Cuando muestra la pestaña Buscar del cuadro de diálogo Buscar y reemplazar (presionar Ctrl + F es la forma más fácil), Excel hace ciertas suposiciones sobre qué es exactamente lo que desea buscar. (Consulte la Figura 1.) Lo que desea buscar lo dicta la configuración de la lista desplegable Dentro. Cuando muestra por primera vez el cuadro de diálogo Buscar y reemplazar, Dentro está configurado en Hoja, de forma predeterminada. Esta configuración es verdadera independientemente de si selecciona una hoja de trabajo o varias hojas de trabajo antes de mostrar el cuadro de diálogo.

image

Figura 1. La pestaña Buscar del cuadro de diálogo Buscar y reemplazar.

Si desea que la lista desplegable Dentro de la opción predeterminada sea Libro de trabajo (en lugar de Hoja), no hay forma de especificar esto en Excel. Puede consolarse con el hecho de que la configuración de la lista desplegable Dentro es persistente para la sesión actual con Excel. En otras palabras, si lo configura como Libro de trabajo, completa su búsqueda y luego muestra la pestaña Buscar del cuadro de diálogo Buscar y reemplazar, el cuadro Dentro todavía está configurado como Libro de trabajo.

Es interesante que, a primera vista, no parece haber forma de abordar este problema utilizando una macro. Esto se debe a que Excel no proporciona una forma para que una macro muestre y modifique fácilmente la configuración en el cuadro de diálogo Buscar y reemplazar. Se pueden mostrar muchos cuadros de diálogo con la colección Diálogos, pero no con Buscar y reemplazar. En su lugar, VBA le permite mostrar una versión anterior del cuadro de diálogo Buscar, usando este código:

Sub ShowFind1()

Application.Dialogs(xlDialogFormulaFind).Show End Sub

Desafortunadamente, esta versión del cuadro de diálogo Buscar no tiene un control que le permita especificar el alcance de la búsqueda, como se puede hacer con la lista desplegable Dentro de la pestaña Buscar del cuadro de diálogo Buscar y reemplazar.

Hay una forma de mostrar el cuadro de diálogo Buscar y reemplazar correcto, pero no es mediante el uso de la colección Diálogos. En su lugar, debe abrir el cuadro de diálogo usando la colección CommandBars, que esencialmente muestra el cuadro de diálogo usando un comando de menú. He aquí cómo hacerlo:

Sub ShowFind2()

ActiveSheet.Cells.Find What:="", LookAt:=xlWhole     Application.CommandBars("Worksheet Menu Bar").FindControl( _       ID:=1849, recursive:=True).Execute End Sub

El método Find le permite establecer los diferentes parámetros en el cuadro de diálogo Buscar y reemplazar, y luego se accede al objeto CommandBars para mostrar el cuadro de diálogo.

_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 (3170) 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-Searching_a_Workbook_by_Default [Buscando un libro de trabajo por defecto].