Hola a todos, estoy tratando de armar una consulta, para mi escaso
conocimineto, compleja...
Se compone de una taba donde tengo tres campos... "Origen" "Destino"
"Importe". Hasta la consulta donde separa Buenos Aires contra todos los
destinos llegué, lo que no se hacer es que sume todos los importes por
recorridoaqui va un ejempo de como tendria que quedar
Origen Destino Importe
Bs. As. Sta. Fe 99999 suma total de los registros(ej.)
Bs. As. San Luis 88888 " " " " "
Estoy haciendolo con Excel, gracias por su atencion y tiempo, ahi va la
consulta...
Private Sub Test()
Dim Cnn As ADODB.Connection
Dim Rst As ADODB.Recordset
Dim Ruta As String
Ruta = ThisWorkbook.Path
Set Cnn = New ADODB.Connection
With Cnn
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString = "Data Source=" & Ruta & "\BaseViajes.mdb"
.Open
End With
Set Rst = New ADODB.Recordset
Rst.Open "SELECT DISTINCT Origen,Destino " & _
"FROM Viajes WHERE Origen='Buenos Aires' " & _
"ORDER BY Destino", Cnn, , , adCmdText
With Hoja1.[a1]
.CopyFromRecordset Rst
End With
Rst.Close: Set Rst = Nothing
Cnn.Close: Set Cnn = Nothing
End Sub
Leer las respuestas