Crear una función en excel

Necesito ayuda para crear una función que realice un calculo en una hoja. Aqui les muestro una imagen para que me entiendan mejor:

Atenta a sus comentarios...

1 respuesta

Respuesta
1 
Function preciofinal(precio, descuento As Double)
pf = precio * (1 - descuento)
preciofinal = pf
End Function

Me comentas y valoras la respuesta para finalizar

Primero que nada gracias por contestar...

El problema que tengo es hacer que la función sepa el tramo y la demanda del Conductor para que calcule según el precio y descuento correspondiente....

Atento a sus comentarios y gracias nuevamente

Hola...quería saber si no te habías olvidado de mi....disculpa mi patudes...jejejejeje...

Atenta a tus comentarios....

Function preciofinal(tramo, demanda As String)
If tramo = "Norte" And demanda = "Alta" Then
    pf = 500 * (1 - 0.1)
    preciofinal = pf
    ElseIf tramo = "Norte" And demanda = "Media" Then
    pf = 450 * (1 - 0.1)
    preciofinal = pf
    ElseIf tramo = "Norte" And demanda = "Baja" Then
    pf = 400 * (1 - 0.1)
    preciofinal = pf
    ElseIf tramo = "Norte" And demanda = "Normal" Then
    pf = 420 * (1 - 0.1)
    preciofinal = pf
End If
'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
If tramo = "Centro" Or demanda = "Alta" Then
    pf = 500 * (1 - 0.15)
    preciofinal = pf
    ElseIf tramo = "Centro" Or demanda = "Media" Then
    pf = 450 * (1 - 0.15)
    preciofinal = pf
    ElseIf tramo = "Centro" Or demanda = "Baja" Then
    pf = 400 * (1 - 0.15)
    preciofinal = pf
    ElseIf tramo = "Centro" Or demanda = "Normal" Then
    pf = 420 * (1 - 0.15)
    preciofinal = pf
End If
'-------------------------------------------------------------
If tramo = "Sur" And demanda = "Alta" Then
    pf = 500 * (1 - 0.2)
    preciofinal = pf
    ElseIf tramo = "Sur" And demanda = "Media" Then
    pf = 450 * (1 - 0.2)
    preciofinal = pf
    ElseIf tramo = "Sur" And demanda = "Baja" Then
    pf = 400 * (1 - 0.2)
    preciofinal = pf
    ElseIf tramo = "Sur" And demanda = "Normal" Then
    pf = 420 * (1 - 0.2)
    preciofinal = pf
End If
End Function

Me comentas y valoras para finalizar saludos!!!

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Trabajando por primera vez con código vba en formulario de Access.

Estoy aplicando con ayuda de otras personas un código vba a un formulario y a pesar de todo no me funciona como lo esperaba. ¿Alguien en esta plataforma que por favor me revise esta tarea y oriente al respecto?
1 respuesta

Como pasar una importaciones guardada en Access a vba

Estoy trabajando con datos que provienen desde una base de datos de SQL server, hago los pasos de importación y los guardo en importaciones guardadas, funciona de maravilla, pero cuando no hay conectividad con el servidor falla, ya que previa a la...
2 respuestas

¿Porque se ejecuta alternamente UserForm_Activate ?

A tod@s! Tengo un formulario ProgramarTrabajoEnSemana que al activarse actualiza un listbox del mismo formulario. Desde este ListBox al elegir un registro llamo a otro formulario (emergente) ModificarOTsSemana, con varios campos que puedo modificar....
3 respuestas

Código VBA para archivo SEPA bancario

Como siempre agradecer de antemano tremendamente la ayuda de los expertos... Llevo meses peleando con este módulo y no consigo dar con la solución. Tengo un formulario access con los siguientes datos: - FechaRemesa - NumeroRemesa - Cliente -...
2 respuestas

Macro de excel, para buscar celda con fecha y posicionarlas en un lugar determinado de la hoja

A to@s. Estoy trabajando en una hoja de Excel en la que, a modo de agenda, voy anotando distinta información en una tabla, debajo de unas celdas dispuestas en filas que tienen asignados los días según los meses del curso, desde el 1 al 30 de...
1 respuesta

Cómo hacer un filtro múltiple en formulario Excel?

Tengo un formulario en Excel con 5 combos combinado(Tipo, Año, Mes, servicio y Especialidad) y un cuadro de lista. La idea es que al seleccionar un valor en el cuadro combinado Tipo, en el cuadro de lista se me filtren los registros con ese valor,...
4 respuestas

Averiguar la fecha de el Lunes y el Domingo con el numero de semana en VBA Excel

A tod@s! Si doy el numero de semana del año como puedo averiguar la fecha de esa semana del Lunes y del Domingo. Atentamente: Valerio
3 respuestas

Error código 2296 el mensaje no fue enviado

Alguien me podría indicar a que se debe el error 2296, mensaje no enviado, a veces no pero la mayoría de veces lo hace cada vez que le doy enviar el registro en cuestión. En mi base de datos en access 2019
1 respuesta

Sub totales de columnas con macros excel

Si alguien puede ayudarme a resolver este problema. Tengo una hoja en (Hoja2) que tiene los datos de orden y pesos en la columna Ay B 40 datos Salta una columna libre y en la DE aparecen los siguientes 40.. Salta otra columna y en la G y H ...
2 respuestas

Cómo colocar un consecutivo en informe Access ?

Espero que estén muy bien ! Tengo un informe en Access con dos páginas, en cada página debo indicarle desde el formulario el consecutivo que va a llevar cada página. Ejemplo: el formulario tiene 2 campos de texto( Consecutivo 1 y Consecutivo 2),...
3 respuestas