Se trata de algo tan habitual como resetear un campo autonumerico, a cero o de llevarlo
a otro numero determinado.
En el caso de quiera que la siguiente introduccion le asigne el numero 1, anexo un cero al 
campo autonumerico a traves de una consulta de datos anexados, por el procedimiento mas basico.

El procedimiento funciona perfectamente en una de las maquinas con windows98, pero cuando la 
misma base de datos la ejecuto bajo Windows XP, el procedimiento no funciona, no resetea el 
contador, sino que se va incrementando siempre.
Posteo el problema y tu me facilitas una instruccion SQL que aun siendo correcta tampoco
funciona bajo "mi" Windows XP.Que raro. Nunca me habia ocurrido.
Solucion:
Instruccion SQL haciendo referencia a las propiedades ALTER TABLE y ALTER COLUMN Identity de
los campos autonumericos.
Supongamos que quiero que el siguiente valor que introduzca en  el campo MiCampo de la tabla
Mitabla, sea el 1, y que el campo autonumerico se incremente de dos en dos:
 
        Dim cnn1 As ADODB.Connection
        Dim strSQL
        'referencia a la conexion
        Set cnn1 = CurrentProject.Connection
        'creacion de una cadena SQL que refencia los argumentos suministrados
        strSQL = "ALTER TABLE MiTabla" & _
        "ALTER COLUMN MiCampo identity" & _
        "(" & 1 & " , " & 2 & ")"
        'ejecucion de la orden SQL para actualizar el contador
        cnn1.Execute strSQL
 
Asunto solucionado. Funciona tambien en "mi" Windows XP. 
Gracias Buho una vez mas.
Un saludo. Pardillo