Sveinbjorn El Rojo respondió:
Prueba este código: Dim vAutonum As Variant, vUltimo As Variant Dim vAño As Long 'Le damos a la var. vAño el valor del año actual vAño = Right(Year(Date),2) 'Cogemos el valor del campo cve_folio vAutonum = Me.cve_folio.Value 'Si vAutonum no es nulo,...