Asignar nombres a mas de 200 celdas en excel
Como puedo asignar nombres a mas de 200 celdas de una hoja de excel en una columna asi, img1, img2, img3... Img200. Como hacerlo de forma normal seria muy demorado, ¿hay una macro que me permita hacer esto?
1 respuesta
Respuesta de Dante Amor
1
Te anexo la macro, cambia "A" por la columna en donde quieres los nombre
Las celdas nombradas serán desde A1 hasta A200
Los nombres de las celdas serán img_001, img_002 hasta img_200, hay que utilizar el guión bajo ya que no se puede utilizar img1, ya que existe una celda con esa dirección.
Sub AsignarNombre() 'Por.Dante Amor col = "A" n = 1 For i = 1 To 200 nm = Format(n, "000") ActiveWorkbook.Names.Add Name:="img_" & nm, RefersTo:=Cells(i, "A") n = n + 1 Next End Sub
S a l u d o s . D a n t e A m o r
Recuerda valorar la respuesta.
