Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Suma VBA

13/02/2008 - 01:20 por Pepito | Informe spam
Tengo el siguiente codigo de para suma con Vba en solo me suma
deteminadas filas
habra alguna manera que sume en la Columna F
sin importar en que linea este posesionado

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("F3") = Application.WorksheetFunction.Sum(Range("A3"),
Range("B3"), Range("C3"), Range("D3"), Range("E3"))
Range("F4") = Application.WorksheetFunction.Sum(Range("A4"),
Range("B4"), Range("C4"), Range("D4"), Range("E4"))

End Sub
 

Leer las respuestas

#1 Juan M
13/02/2008 - 21:42 | Informe spam
Hola Pepito,

¿Te refieres a algo así?

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 6 Then
Range("A1") = Application.WorksheetFunction.Sum(Range("F:F"))
End If
End Sub

Un saludo,
Juan

"Pepito" escribió
Tengo el siguiente codigo de para suma con Vba en solo me suma
deteminadas filas
habra alguna manera que sume en la Columna F
sin importar en que linea este posesionado

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("F3") = Application.WorksheetFunction.Sum(Range("A3"),
Range("B3"), Range("C3"), Range("D3"), Range("E3"))
Range("F4") = Application.WorksheetFunction.Sum(Range("A4"),
Range("B4"), Range("C4"), Range("D4"), Range("E4"))

End Sub

Preguntas similares