Porque al ejecutar una macro, una funcion expecifica cambia a "#¡Valor"
Buenas tardes expertos tengo una duda. Realice una funcion en un modulo de VB, dicha funcion trabaja bien.. Pero al ejecutar una macro los datos cambian a "#¡Valor".
Para reestablecer el valor de la funcion debo cambiar alguna de la celdas necesarias para los calculos.
Talvez alguno de ustedes me puede decir porque se genera esto.
aqui el codigo de la funcion
Public Function form_Costo(actividades As Object, subactividades As Range, descripcion As Object)
If actividades <> 0 And subactividades.Value <> 0 Then
form_Costo = ""
ElseIf actividades = 0 And subactividades.Value = 0 Then
form_Costo = ""
ElseIf actividades <> 0 Then
form_Costo = ""
ElseIf descripcion = "Fin del presupuesto" Or descripcion = "" Or descripcion = "Datos invalidos" Then
form_Costo = ""
ElseIf subactividades.Value <> 0 Then
Dim UltLinea As Long
UltLinea = Range("b" & subactividades.Row).End(xlUp).Value
Dim dato As Range
Set dato = Sheets("ACT" & UltLinea).Range("C:C").Find(subactividades.Value, LookIn:=xlValues, LookAt:=xlWhole)
If dato Is Nothing Then
form_Costo = ""
Else
form_Costo = dato.Offset(21, 15).Value
End If
End If
End FunctionEspero su ayuda.
Muchas Gracias
1 Respuesta
Respuesta de Freddy Maihuire
-1
Te agradeceria que indiques cual es la macro que ejecutas, quizas esa macro cambie algun valor de las celdas que este utilizando la funcion.
