Radio Aportaciones:  
--:--  | : 20hs-24hs -
Toggle Bar

    Buscar objetivo varias filas

    07 Oct 2010 17:52 #65116 por ByPaco
    Valores de columnas:
    A = S.B.D.
    B = Dias
    C = Percepciones
    D = Deducciones
    E = Neto
    F = Buscar Objetivo

    En la columna A ponemos los salario que tenemos
    En la columna B ponemos los dias laborados
    En la columna C ponemos la fórmula de A×B
    En la columna D ponemos la fórmula de deducciones
    En la columna E ponemos la fórmula de C-D
    En la Columna F ponemos el neto que queremos obtener

    Seleccionamos todos los datos de la columna E , y corremos la siguiente macro
    Sub BuscarObjetivo()
    Dim Dato As Double
    For Each cell In Selection
    Dato = ActiveCell.Offset(0, 1).Value
        ActiveCell.GoalSeek Goal:=Dato, ChangingCell:=ActiveCell.Offset(0, -4).Range("A1")
        ActiveCell.Offset(1, 0).Select
    Next
    End Sub

    « Antes de que los reinos cambien, los hombres deberán cambiar »

    Por favor, Identificarse o Crear cuenta para unirse a la conversación.

    Tiempo de carga de la página: 0.227 segundos

    Ayúdanos a conservar este sitio!

    ¿Quién está en línea?

    Hay 341 invitados y ningún miembro en línea