Borde de celda en VBA

Resuelto
Grobibi34 Mensajes publicados 83 Estado Miembro -  
 seb -
Hola a todos.

Estoy desarrollando una pequeña herramienta de planificación automática, por lo que mis filas y columnas son variables.

Me gustaría que todas las celdas que he editado tengan un borde.

Imagino que el problema sería revisar todas las celdas fila por fila o columna por columna para ver si hay algo escrito dentro; si es el caso, se debería enmarcar la celda en cuestión.

¿Estoy en lo cierto en el principio? Si es así, ¿cómo lograrlo? Si no, ¿cómo hacerlo?

Atentamente,

Grobibi34
Configuración: Windows XP Internet Explorer 6.0

7 respuestas

michel_m Mensajes publicados 18903 Fecha de registro   Estado Colaborador Última intervención   3 320
 
Hola

tu tabla está en el área B2:H25 por ejemplo

Sub encuadrar_si() Dim celda As Range For Each celda In Range("B2:H25") If celda <> "" Then celda.Borders.Weight = xlThin Next End Sub


--
:-x
37
altec
 
¡Muchas gracias!
0