Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Necesito funcion suma

10/04/2004 - 01:27 por Amadeo GOVONI | Informe spam
Ayuda Hacer una pregunta
Estimado grupo
Necesito generar una función suma es VB
No me sirve la que hay en Excel

Necesito sumar un detrminado rango variable

Se que es

Public Function Sumapersonal(byVal Rango as Range)



'Selecciones un rango A1:A5 por ejemplo
'Necesito el código para sumar esas celdas
'Se que hay una manera la hevistoy no me acuerdo.
'les pido ayuda al foro

Rango.Count > me dice cuantas filas tengo
como recorro el rango?

End Function

Gracias y saludos

Amadeo
email Siga el debateRespuesta 3 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Luiz Cláudio
10/04/2004 - 05:25 | Informe spam
Oi Amadeo,

será que é isto que procura?

Public Function Sumapersonal(ByVal Rango As Range)
Dim l As Integer
Dim c As Integer
Dim myValue As Currency

For c = 1 To Rango.Columns.Count
For l = 1 To Rango.Rows.Count
myValue = myValue + Rango.Columns.Cells(l, c)
Next l
Next c

Sumapersonal = myValue
End Function



"Amadeo GOVONI" escreveu na mensagem
news:
Estimado grupo
Necesito generar una función suma es VB
No me sirve la que hay en Excel

Necesito sumar un detrminado rango variable

Se que es

Public Function Sumapersonal(byVal Rango as Range)



'Selecciones un rango A1:A5 por ejemplo
'Necesito el código para sumar esas celdas
'Se que hay una manera la hevistoy no me acuerdo.
'les pido ayuda al foro

Rango.Count > me dice cuantas filas tengo
como recorro el rango?

End Function

Gracias y saludos

Amadeo




Preguntas similares

 

Busqueda sugerida :