mandei pro seu email , o codigo autonum nao precisa mexer com insert into, esse projeto que te mandei se vc quiser eu faço uma atualizacao nele depois que vc aprender esse aew .....

na autonumeração vc omite a informação isto é controlado pela auto numeração.

Rcset("Razao") = TXTRAZAO.Text
           Rcset("Cnpj") = TXTCNPJ.Text
           Rcset("Cpf") = TXTCPF.Text
           Rcset("Codigo") = TXTCODIGO.Text

Este              Rcset("Codigo") = TXTCODIGO.Text é autonumeração .. então apague esta linha e tente