Busqueda de nombres

04/06/2004 - 11:47 por Adolfo | Informe spam
Hola gente,
Necesito una herramienta que me permita buscar un conjunto de caracteres
dentro del nombre de las diferentes hojas que componen un libro, sería una
herramienta parecida a la opción buscar un valor dentro de una celda.
¿Existe algo así dentro de excel?

¿Desde VBA cómo se hace para saber si los caracteres "PRU" están contenidos
dentro de "prueba54"? Es decir, lo que necesito no es comparar que a=b (eso
si lo se hacer) sino si "a" esta contenido en "b" independientemente de si
son mayusculas o minusculas.

Se agradece cualquier sugerencia y si necesitais mas aclaraciones sobre lo
que necesito no dudeis en preguntar.

Un saludo y gracias por anticipado
Adolfo

Preguntas similare

Leer las respuestas

#1 Fernando Arroyo
04/06/2004 - 13:11 | Informe spam
"Adolfo" escribió en el mensaje news:etLz%
Hola gente,
Necesito una herramienta que me permita buscar un conjunto de caracteres
dentro del nombre de las diferentes hojas que componen un libro, sería una
herramienta parecida a la opción buscar un valor dentro de una celda.
¿Existe algo así dentro de excel?




La siguiente función devuelve un objeto Worksheet que será la primera hoja en cuyo nombre se encuentre la cadena buscada:

Function BuscarEnNombreHojas(strTextoABuscar As String) As Worksheet
Dim wks As Worksheet

For Each wks In Worksheets
If InStr(wks.Name, strTextoABuscar) > 0 Then
Set BuscarEnNombreHojas = wks
Exit Function
End If
Next wks
End Function


y éste es el código para probarla:

Sub prueba()
Dim wksH As Worksheet
Set wksH = BuscarEnNombreHojas("TextoQueSeBusca")
If Not wksH Is Nothing Then MsgBox wksH.Name
End Sub


¿Desde VBA cómo se hace para saber si los caracteres "PRU" están contenidos
dentro de "prueba54"? Es decir, lo que necesito no es comparar que a=b (eso
si lo se hacer) sino si "a" esta contenido en "b" independientemente de si
son mayusculas o minusculas.




Una posibilidad de entre varias:

MsgBox IIf(InStr(UCase("PRUEBA"), UCase("pru")) > 0, True, False)

Un saludo.


Fernando Arroyo
MS MVP - Excel


Se agradece cualquier sugerencia y si necesitais mas aclaraciones sobre lo
que necesito no dudeis en preguntar.

Un saludo y gracias por anticipado
Adolfo



Respuesta Responder a este mensaje
#2 Adolfo
04/06/2004 - 18:07 | Informe spam
Con lo que me has puesto ya tengo para estar entretenido todo el fin de
semana, si tengo algun problema ya te comento.

Un saludo y muchas gracias.

"Fernando Arroyo" escribió en el mensaje
news:
"Adolfo" escribió en el mensaje
news:etLz%
Hola gente,
Necesito una herramienta que me permita buscar un conjunto de caracteres
dentro del nombre de las diferentes hojas que componen un libro, sería una
herramienta parecida a la opción buscar un valor dentro de una celda.
¿Existe algo así dentro de excel?




La siguiente función devuelve un objeto Worksheet que será la primera hoja
en cuyo nombre se encuentre la cadena buscada:

Function BuscarEnNombreHojas(strTextoABuscar As String) As Worksheet
Dim wks As Worksheet

For Each wks In Worksheets
If InStr(wks.Name, strTextoABuscar) > 0 Then
Set BuscarEnNombreHojas = wks
Exit Function
End If
Next wks
End Function


y éste es el código para probarla:

Sub prueba()
Dim wksH As Worksheet
Set wksH = BuscarEnNombreHojas("TextoQueSeBusca")
If Not wksH Is Nothing Then MsgBox wksH.Name
End Sub


¿Desde VBA cómo se hace para saber si los caracteres "PRU" están


contenidos
dentro de "prueba54"? Es decir, lo que necesito no es comparar que a=b


(eso
si lo se hacer) sino si "a" esta contenido en "b" independientemente de si
son mayusculas o minusculas.




Una posibilidad de entre varias:

MsgBox IIf(InStr(UCase("PRUEBA"), UCase("pru")) > 0, True, False)

Un saludo.


Fernando Arroyo
MS MVP - Excel


Se agradece cualquier sugerencia y si necesitais mas aclaraciones sobre lo
que necesito no dudeis en preguntar.

Un saludo y gracias por anticipado
Adolfo



email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida