Eu faço esta integração entre a planilha e o banco de dados, consequentemente para o VB. O banco de dados é o access, no VB6 uso a referencia dao 3.6 Os comandos do vba na planilha são praticamente os mesmos. Veja exemplo abaixo em que salvo no banco de dados compras,

 

Sub salvar()
Set matprima = OpenDatabase("C:/doidivanas/compras.mdb").OpenRecordset("matprima")

Set matriz = Range("A7:L70")
n = 1
Do Until n = 70
If matriz(n, 1) <> "" Then
    matprima.Index = "codmat"
    matprima.Seek "=", matriz(n, 1), matriz(n, 3)
    If matprima.NoMatch Then
        matprima.AddNew
    Else
        matprima.Edit
    End If
matprima!codmat = matriz(n, 1)
matprima!coditem = matriz(n, 3)
matprima!material = matriz(n, 2)
matprima!Item = matriz(n, 4)
matprima!preço = matriz(n, 5)
matprima!fornecedor = matriz(n, 6)
matprima!nff = matriz(n, 7)
matprima!medida = matriz(n, 8)
matprima!qtde = matriz(n, 9)
matprima!tx_conversao = matriz(n, 10)
matprima!preço2 = matriz(n, 11)
matprima!medida2 = matriz(n, 12)
matprima.Update
End If
n = n + 1
Loop
End Sub

 

Espero que isso ajude de alguma maneira.