Jump to content

nombres de rango con macro

Posted

Buenas, tengo una inquietud, alguien me podria ayudar con un macro para asignar nombres de rango desde valores de celda segun el archivo que adjunto espero su comentario.

Salu2

Esto lo consegui con esta macro, genera una hoja con los nombre definidos de los rangos del libro.

Sub List_All_Defined_Names()

Set NewSheet = ActiveWorkbook.Worksheets.Add

i = 1

For Each nm In ActiveWorkbook.Names

    NewSheet.Cells(i, 1).Value = nm.NameLocal

    NewSheet.Cells(i, 2).Value = "'" & nm.RefersToR1C1Local

    i = i + 1

Next

End Sub[/CODE]

Ejemplo nombres de rango.rar

Featured Replies

  • Author

Excelente Jose71, muy buen trabajo es exacto lo que necesito.

muchas gracias !!!!! :drunk:

un fuerte abrazo.

:worked_till_5am:

salu2.xlsx

Archived

This topic is now archived and is closed to further replies.

Go to topic listing