Cita:
Iniciado por inGera 
Puedes en lugar de hacer eso utilizar tu hoja de excel como si fuera una tabla de una base de datos he aqui el codigo para hacerlo dentro del cilco puedes poner un contador de registros o puedes de una vez insertarlos en otra DB
Código:
imports System.Data.OleDb
Dim sConnectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=H:\\Calidad\\IQS Team\\Gerardo Hernandez\\sqlPCBA614.xls;Extended Properties=Excel 8.0;"
Dim objConn As New OleDbConnection(sConnectionString)
objConn.Open()
Dim objCmdSelect As New OleDbCommand("SELECT * FROM sqlPCBA", objConn)
Dim sqlDR As OleDbDataReader = objCmdSelect.ExecuteReader()
sqlCon.Open()
Do While sqlDR.Read()
Aqui haces tu insecion
Loop
El tema es que los ficheros xls , me los mandan y no se puede poner lo de atribuir un nombre al total de las registros de la tabla. Por eso tengo que sacar los datos linea a linea