............ Foro Excel
Si no lo has hecho aún: REGISTRATE!!!

Estruturar mejor funciòn (VBA)

Ver el tema anterior Ver el tema siguiente Ir abajo

Estruturar mejor funciòn (VBA)

Mensaje por juanfrisancho el Mar Mar 23, 2010 1:09 am

Hola, pueden ayudarme a estructurar mejor la siguiente función que esta en VBA.

'Dim VAR1, VAR2 As Double
'Dim MOM, FC, FY, D, B As Double
'Function ACERO(MOM, FC, FY, D, B)
'VAR1 = 1
'ETIQ1: ACERO = MOM / 0.9 / FY / (D - VAR1 / 2)
' VAR2 = ACERO * FY / 0.85 / FC / B
' If Abs(VAR1 - VAR2) > 0.0001 Then
' VAR1 = VAR2
' GoTo ETIQ1' Else
' Exit Function
' End If
'End Function

juanfrisancho

Masculino Cantidad de envíos : 8
Edad : 57
Ciudad - Pais : Cusco - Perú
Version de Excel : XP 2007
Fecha de inscripción : 20/03/2010

Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba


 
Permisos de este foro:
No puedes responder a temas en este foro.