[RESUELTO] Nombre de una hoja

[eltete]

¿Hay alguna función que te proporcione el nombre de la hoja que está en una cierta posición?
Por ejemplo, Funcion(6) nos diese el nombre de la 6ª hoja del libro

Gracias

[mriosv]

Función directa no hay ninguna, puedes obtenerlo mediante la siguiente formula:
=DERECHA(CELDA("filename";$a$1);LARGO(CELDA("filename";$a$1))-ENCONTRAR("#";CELDA("filename";$a$1);1)) te proporciona como resultado el nombre de la hoja en la que la pongas con el $ delante.
=DERECHA(CELDA("filename";$a$1);LARGO(CELDA("filename";$a$1))-ENCONTRAR("#";CELDA("filename";$a$1)-1;1)) te proporciona el nombre de la hoja sin el $ delante.

Si lo vas usar a menudo puedes definir un nombre de rango con formula para que en cualquier hoja que lo introduzcas te proporcione el nombre de la hoja.
Menú/Insertar/Nombre/Definir
En nombre pones el nombre que le quieras dar, por ejemplo: NombreHoja
En asignar a: DERECHA(CELDA("filename";$a$1);LARGO(CELDA("filename";$a$1))-ENCONTRAR("#";CELDA("filename";$a$1);1))
Picas en Añadir y Aceptar.

Después con introducir en cualquier celda:
=NombreHoja
te proporciona el nombre de la hoja en que lo introduzcas.

=CELDA("sheet";B2) te proporciona el número de la hoja

[eltete]

Muchas gracias por la respuesta.
El problema que tengo, es que esto que me dices me permite saber el nombre de la hoja cuando estoy situado en ella, pero no cuando estoy situado en otra hoja.

[mauricio]

Hola...

Con una sencilla función personalizada lo logras:

Código: Seleccionar todo

Option Explicit

Function NombreHoja(Indice As Integer) As String

	Indice = Abs(Indice) - 1
	If Indice < ThisComponent.getSheets.getCount And Indice >= 0 Then
		NombreHoja = ThisComponent.getSheets.getByIndex(Indice).getName
	Else
		NombreHoja = "#N/A"
	End If
	
End Function

Internamente las hojas empiezan en cero, para esta función considero que empieza en 1:

Código: Seleccionar todo

=NOMBREHOJA(1)

Por favor, si esto responde tu pregunta, edita el primer mensaje de este hilo y agrega al principio del título la etiqueta [RESUELTO], de esta forma conseguiremos un foro más ordenado.

Saludos

[eltete]

Muchas gracias por todo