Jump to content

Calcular un porcentaje si se cumplen condiciones


Guada

Recommended Posts

Estoy tratando de hacer un calculo que no me sale

Necesito que el valor ingreso, se calcule de acuerdo al parámetro Estado
y que en función del Estado, si se cumple la condición de C, entonces, se multiplique por el porcentaje correspondiente
y el resultado vaya en I4.-

Quiero poder combinar estas formulas, pero no me sale

BUSCARV(G5;A1:D7;1)
SI.ERROR(BUSCARV($H$5;$C$1:$D$7;2;1);"")

H51*I5

adjunto el excel de ejemplo para ver si me pueden orientar

Busqué sobre Si, con condiciones usando Y -. pero no me sale el proceso

gracias

 

 

Ejemplo.xlsx

Link to comment
Share on other sites

Buenos días,

Si, justamente esto es lo que buscaba.-

PREGUNTA

Le quise agregar 2 buscarv mas, y me dice que tiene demasiados argumentos, 

=SI(G6=1;BUSCARV(H6;C4:D8;2;1);BUSCARV(H6;C9:D12;2;1);BUSCARV(H6;C13:D16;2;1);BUSCARV(H6;C17:D120;2;1))*H6

Tendría que combinarlo con otra función para que funcione? porque probé con Y / O  pero no me lo toma-.

 

Gracias por tu ayuda

Link to comment
Share on other sites

Pense que yo estaba bloqueado.

al parecer la pagina desde ayer es de paga.

Se agradece a la gente que ayudaba ,ojala salga otro foro con la misma comunidad amiga de este foro. ya eran conocidos la gente que ayudaba.

Estaba en todo excel pero mi contraseña no me acuerdo y el mail de confirmacion para cambiar de contraseña nunca me llega a mi correo xd xd xd . Mala suerte xd xd xd 

 

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Crear macros Excel

  • Posts

    • Buenos días,    Pues sí, era eso, yo hacía la misma fórmula pero no se me ocurrió poner "/100" al final y es ahí donde estaba el fallo.... 😅   Perdonad, soy un poco novatilla en excel y quitando algunas fórmulas, para el resto no sé mucho más   Mil gracias! 
    • Buenos días,   Tengo una tabla en una hoja y estoy intentando saber cual es la ultima celda vacia por la derecha de cada fila. Puede haber filas que estén completas (con datos en todas sus columnas o no) Estoy utilizando este código que supuestamente me da el numero de columna que no está vacia, pero parece comportarse erroneamente, ya que siempre me lee la ultima celda de la fila aunque esté vacia. Creo que puede ser por la propia definicion de tabla en excel?   UltCol = Datos.Cells(3, Datos.Columns.Count).End(xlToLeft).Column   Siempre me da la posicion 33 que es la columna AG. Alguna idea ?     Gracias
    • el error es que copiaste el codigo dentro del boton , borra la 1º linea  : private sub . . . . para que coja la ruta del directorio actual , cambia .. Ruta = "C:\Excel\" por : Ruta = ActiveWorkbook.Path & "\"
    • Buenas Tardes amigos, aca saludos desde Chile, quisiera vuestra ayuda , tengo este Excel el cual ocupamos cada  5 dias para enviar email masivos, enviamos aprox. 10.000 email, el tema es que cada email no tengo idea el porque, pero pesa entre 500 kg a 1 mega Aprox. y esto demora mucho, no se si se podrá hacer algo, y lo otro,  para cada mensaje debe ser personalizado si es hombre y mujer, habrá alguna forma de dejarlo unido si determina si es mujer u hombre?   le dejo el macros en caso me puedas ayudar para optimizar el macros que tengo por favor.   Se activa el macros, este copia el mensaje que esta en la hoja Datos  y lo pega en un correo nuevo en el Outlook , fue la unica opcion que pude lograr, no se si habra otra forma.     Sub ENVIARCORREONUEVO1211() Application.ScreenUpdating = False ThisWorkbook.Sheets("RS1").Select ActiveSheet.Range("B1:B26").Select x = ThisWorkbook.Sheets("Datos").Range("E5").Value For i = 1 To x ThisWorkbook.Sheets("Datos").Range("E6").Value = i ActiveWorkbook.EnvelopeVisible = True Application.ScreenUpdating = False With ActiveSheet.MailEnvelope    .Item.To = ThisWorkbook.Sheets("Datos").Range("E2").Value    ''.Item.cc = Con Copia a....''    .Item.Subject = ThisWorkbook.Sheets("Datos").Range("E3").Value    ' .Introduction = ThisWorkbook.Sheets("Datos").Range("E4").Value '        .Item.Send End With Next i Application.ScreenUpdating = True End Sub  
  • Recently Browsing

    • No registered users viewing this page.
×
×
  • Create New...

Important Information

Privacy Policy