Insoweit kannst du das Forum hier schon nutzen.
Suche mal nach MSADO, Connect, Command usw.

Hier die einfache Version:

- VBA-Editor
- Extras->Verweise->Microsoft ActiveX DataObjects 2.8 einbinden

Neues Modul erstellen

Public sub MyMacro()
dim myConnect as new ADODB.Connection
dim myCommand as new ADODB.Command

MyConnect.Connection = "DSN=MyDsn"
MyConenct.Properties("User")="MYUSER"
MyConenct.Properties("Password")="MYPASS"
MyConnect.Open

MyCommand.Commandtext = "update mylib.myfile set f1=?, f2=? where k1=? and k2=?"
set MyCommand.ActiveConnection = MyConnect

MyCommand(0) = ActiveSheet.Range("A1").Value
MyCommand(1) = ActiveSheet.Range("B1").Value
MyCommand(2) = ActiveSheet.Range("C1").Value
MyCommand(3) = ActiveSheet.Range("D1").Value
MyCommand.Execute

end sub

Der DSN-Name "MyDsn" muss über Systemsteuerung->Verwaltung->ODBC-Quellen noch eingerichtet werden.

Dies ist nur ein Grundgerüst und muss natürlich von dir noch wesentlich angepasst werden.