none
Seleccionar celdas llenas es tabla Word RRS feed

  • Pregunta

  • Hola, deseo un macro que seleccione las celdas llenas en una tabla de Word, de una sola vez y luego las coloree.
    Hice una macro que RECORRE TODA la tabla y va pintando cada celda llena, pero quisiera no recorrer toda la tabla.
    En Excel existe: xlCellTypeBlanks . [Empty cells], quiero aplicar algo parecido a este método, aunque se que no existe en Word pero estoy seguro que algo se te puede ocurrir.
    De nuevo mil gracias por su atención.

    Sub ColorearCeldasLlenas()

    With Selection
    NumFilas = 6
        ActiveDocument.Tables(1).Cell(3, 1).Select: .MoveLeft
        For i = 1 To NumFilas * 7
            If Not IsNumeric(Selection) Then .Shading.BackgroundPatternColor = 14540253
            If i = NumFilas * 7 Then Exit Sub Else .MoveRight Unit:=wdCell
        Next
    End With

    End Sub
    martes, 10 de julio de 2018 3:13