Cambiar Formato de Celda cuando es un Valor o cuando es una Formula

Inicio Miscelanea Formato condicional Cambiar Formato de Celda cuando es un Valor o cuando es una Formula

Este debate contiene 1 respuesta, tiene 2 mensajes y lo actualizó vichopalacios vichopalacios hace 2 meses .

Viendo 2 publicaciones - del 1 al 2 (de un total de 2)
  • Autor
    Publicaciones

  • Leonardo.Peiretti
    Participant

    Buenos Días!
    Mi consulta es la siguiente:
    Quiero hacer que toda una Columna cada una de las celdas este constituido por una fórmula, pero cuando yo quiera cambiar una celda por un valor valor quede marcado con otro color para que al actualizarla el mes que viene sepa cual es la que debo transformar nuevamente en fórmula.-
    No encuentro una Forma de hacerlo con Formato Condicional.-
    Agradezco sus ayudas.-
    Saludos

    vichopalacios
    vichopalacios
    Moderator

    Hola Leonardo.Peiretti

    No estoy seguro de que encuentres un método por medio de funciones para hacer lo que quieres,
    pero una pequeña macro te lo resuelve al instante.
    Puedes probar este código:

     Code: arbitrary (select
    1.
    2.
    3.
    4.
    5.
    6.
    7.
    8.
    9.
    10.
    11.
    12.
    13.

    Sub PruebaFormula()
    Dim Formu As String
    Dim i As Long
    Dim Col As Integer, Ult As Long
    Col = Application.InputBox(prompt:="Qué número de columna desea evaluar?:", Type:=2)
    Ult = Application.InputBox(prompt:="Cual es la última línea a evaluar?:", Type:=2)
    For i = 1 To Ult
        Formu = Cells(i, Col).Formula
        If Not Left(Formu, 1) = "=" Then
            Cells(i, Col).Interior.ColorIndex = 4
        End If
    Next i
    End Sub

    Saludos

Viendo 2 publicaciones - del 1 al 2 (de un total de 2)

Debes estar registrado para responder a este debate.