UniversoExcelForo

Respuesta a consultas.
Fecha de creación: 09.Abril.2012

Fundadores: Wibly,Tyno,Servando,Sakkar,Rosendo2,RMaximo,Railar,Mcoronel,Ioyama,Igtelo,Hugotron,Drochar,Dedos,Alberto,Adolfo

No se pueden hacer consultas de Excel o VBA por mensaje privado.
Utiliza el botón buscar del foro y te ahorras tiempo para obtener "ayuda".

No estás conectado. Conéctate o registrate

Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje [Página 1 de 1.]

1RESUELTO Suma condicionada con vba en excel el 11/06/14, 08:28 pm

aprendo


Hola a todos!

quería pedirles un favor, he estado dándole vueltas a esta macro, pero no obtengo el resultado deseado. se trata de sumar una columna a la derecha condicionada por el contenido de otra columna y este resultado lo debo colocar en otra hoja del mismo libro.
adjunto un archivo como ejemplo, ya que los reales son pesados.

de antemano muchísimas gracias por su tiempo!
Archivos
construyendo cubicaje automatico.xlsm
No tienes los permisos para descargar los archivos.
(16 KB)

tyno


Hola aprendo, bien venido al foro.

Prueba con tu código de esta manera:

Sub TOTAL_DC()

Dim fila As Integer

Dim suma As Long


Sheets("Hoja1").Range("E3").Select
Final = Range("E3").End(xlDown).Row

For fila = 3 To Final
   
    If Trim(Cells(fila, 5)) = "DC" Then
                 
        suma = suma + Cells(fila, 19).Value
        
    End If
Next


Sheets("Hoja2").Cells(6, 1) = suma


   MsgBox suma
      

End Sub


Creo que no te daba ningún resultado por que en la columna E de la Hoja 1 no existe el dato "DC" si no "DC ", o sea DC con un espacio adelante, por eso la macro no encontraba la referencia. Por otro lado hay que modificar el destino del resultado es: Sheets("Hoja2").Cells(6, 1) = suma

Saludos

3RESUELTO Gracias!!! el 12/06/14, 05:43 pm

aprendo


Tyno muchísimas gracias por tu tiempo y valiosa ayuda.

Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje [Página 1 de 1.]

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