Label que de mensaje si hay cierto color en celda

Estoy tratando de idar la forma que un label alojado en userform me de caption si se cumple 1 condicion la cual es.

Si en la celda B2 esta rellena de color amarillo entonces el label caption pase a ON y diga "BAJO STOCK"

1 Respuesta

Respuesta
1

No sé a qué te refieres con "pase a ON", puedes explicarlo.

Te paso el código para poner el texto, habilitar el label1 y hacerlo visible.

Private Sub UserForm_Activate()
  If Range("B2").Interior.Color = vbYellow Then
    With Label1
      .Caption = "BAJO STOCK"
      .Enabled = True
      .Visible = True
    End With
  End If
End Sub

Si es lo que necesitas, no olvides valorar.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas