[Resolvido]Abrir formulário no último número registado

Bom dia,
Estou a precisar de uma ajuda, pois estou a fazer registo manual em que a sequência é registo, 01/2020; 02/2020..., quando chegar a 2021 quero que volte a 01/2021, o meu problema é que quero que quando abrir o formulário abra não o último registo mas sim o último número que introduzi manual, que pode não ser o último registo, ou seja posso introduzir primeiro o 02/2020 e depois o 01/2020, mas quero que quando abrir o formulário aparece sempre o 02/2020.

Aguardo ajuda
Obrigado

Bom dia RLeal,

Tente este código ao abrir o formulário:

Código:

Dim MaxReg As String
Dim MaxAno As String
Dim MaxNum As String

MaxAno = DMax("Right([SeuCampoNaTabela],4)", "SuaTabela")

MaxNum = DMax("Left([SeuCampoNaTabela],2)", "SuaTabela", "Right([SeuCampoNaTabela],4) = '" & MaxAno & "'")

MaxReg = MaxNum & "/" & MaxAno

Me.SeuCampoNoFormulario.SetFocus

DoCmd.FindRecord (MaxReg)

Boa tarde,
Obrigado zcarloslopes, por tentares ajudar mas não resultou.

Bom dia RLeal,

Fiz uma demo com o código que sugeri e funcionou perfeitamente..

Pergunto:

Alterou o nome dos campos do código sugerido para os da sua DB?

Ao abrir o formulário tem mais algum código a seguir ao que sugeri?

Que erro é que está a dar?

Obrigado

Não estou a conseguir, podes me enviar a demo para eu ver o que estou a fazer mal na minha base de dados.
Obrigado pela ajuda

Boa tarde,

Veja esta demo.

Obrigado zcarloslopes

Resolvido