Cómo añado a este código letra en negrita
Lo primero felices fiestas a tod@s.
Tengo una pregunta no doy colocado negrita en este código.
Sub estado ()
Dim i As Integer
For i = 4 to 20
If Cells (i, 2).Value = "Ausente" Then
Cells (i, 1).Resize (1, 8).Interior.ColorIndex = 6
End If
Next i
End Sub
El código me busca Ausente en esa columna y me lo marca en amarillo toda la fila pero no soy capaz de poner negrita también. Por otro lado puedo poner más valores en ese mismo código por ejemplo Ausente y No disponible o debería de copiar ese código y añadir valores independientes.
