[Resolvido]Fechar formulários usando o comando DoCmd.Close

Pessoal

tenho um formulário que vai abrindo vários outros.

Porém quando termino a operação eu quero que ele feche os outros e abra um outro.

eu criei o evento no ao clicar

que ficou assim.

Private Sub cod_ch_Click()
On Error GoTo Err_cod_ch_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "Opreracao_cheque"

stLinkCriteria = "[cod_ch]=" & Me![COD_CH]
DoCmd.OpenForm stDocName, , , stLinkCriteria


Exit_cod_ch_Click:
Exit Sub

Err_cod_ch_Click:
MsgBox Err.Description
Resume Exit_cod_ch_Click
End Sub


Onde devo colocar o comando DoCmd.Close e como colocar os nomes dos formulários que quero fechar.

Obrigado pela ajuda

Tente dessa forma:

DoCmd.Close acForm, "SeuFormulario"

Eu sugiro :

Private Sub cod_ch_Click()
On Error GoTo Err_cod_ch_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "Opreracao_cheque"

stLinkCriteria = "[cod_ch]=" & Me![COD_CH]
'-------------inicia aqui
DoCmd.Close acForm, "NomeSeuFormulario1"
DoCmd.Close acForm, "NomeSeuFormulario2"
....
DoCmd.Close acForm, "NomeSeuFormulario9"
'---------------fim fechar forms

DoCmd.OpenForm stDocName, , , stLinkCriteria


Exit_cod_ch_Click:
Exit Sub

Err_cod_ch_Click:
MsgBox Err.Description
Resume Exit_cod_ch_Click
End Sub

Obrigado pessoal

Agradecemos o retorno