A volte capita la necessità di dover eseguire dei calcoli con dei dati presi da altri file , in questo esempio vedremo come poter eseguire la somma dei dati di una colonna da un file excel.

Prendiamo in considerazione questo esempio di codice.

 Private Sub Button1Click(sender As Object, e As EventArgs) Handles btnCalcolaSomma.Click
        Const query As String = "SELECT SUM(TOTAL) FROM [Foglio1$]"

        Using myConnection As New OleDbConnection("provider=Microsoft.ACE.OLEDB.12.0; " & _
                 "data source=E:\demo.XLSx; " & _
                 "Extended Properties=Excel 12.0;")
            myConnection.Open()

            Using myCommand As New OleDbCommand(query, myConnection)
                Dim result = myCommand.ExecuteScalar()

                If Not result.Equals(DBNull.Value) Then
                    TextBox1.Text = result.ToString()
                End If
            End Using
        End Using
    End Sub

Prima cosa , creiamo una query Select con il nome della colonna del file excel tra parentesi tonde e il nome del foglio presente nel file excel su cui andare a prelevare le informazioni , assicurarsi che entrambi quindi nome colonna e nome foglio siano uguali a quelli contenuti nel file excel , onde evitare errori a runtime.

Utilizzeremo la classe  OleDbConnection    passando come argomento la stringa di connessione alla fonte dati , in questo esempio E:\demo.xlsx , successivamente la classe  OleDbCommand , la quale dispone del metodo ExecuteScalar , questo metodo restituisce la prima colonna della prima riga nel gruppo di risultati, o un riferimento Null se il gruppo di risultati è vuoto.
 
Poichè il metodo può restituire un valore null e necessario eseguirne un confronto e scartare tutti i valori null ed inoltre per visualizzare il risultato della somma all'interno del controllo TextBox e necessaria una conversione del valore da Object a stringa di caratteri , in quanto il valore restituito dal metodo ExecuteScalar e di tipo Object.

In conclusione supponendo di avere un file chiamato demo.xlsx con all'interno una colonna chiamata TOTAL con 10 righe tutte con valore 1 dobbiamo avere coma risultato della somma 10 come mostrato in figura.




Dopo la somma avremo invece questo risultato nell'applicazione Vb Net.