[Resolvido]Invalid Use of Null na linha OrgFile

Mestre:

Após ter marcado com a palavra Entregue documentos no primeiro processo de exemplo, criei um segundo processo e passoua dar este erro e nesta linha:
OrgFile = Me.Lista.Value. Ora verifiquei que os documentos foram criados direitinho na Pasta ao criar o processo, a lista abre e mostra os documentos, clico sobre um documento e depois sobre a caixa de verificação e lá vem o erro. Fui verificar no processo anterior que nºao dava erro e passou a dar. Não mexi no código;
Private Sub Verificação88_AfterUpdate()
Dim OrgFile As String
Dim DestFile As String
OrgFile = ("C:\Processos\" & Me.NProcesso.Value & "\" & Me.Lista.Value & ".doc")
DestFile = ("C:\Processos\" & Me.NProcesso.Value & "\" & "Entregue_" & Me.Lista.Value & ".doc")
OrgFile = Me.Lista.Value
DestFile = Me.Lista.Value & "Entregue" & ".doc"
Name OrgFile As DestFile
End Sub

Como deu tudo certinho e agora de um momento para o outro virou?

Amigão eu não acredito naquilo que estou a ver.

Apague o que está a vermelho e deixe o resto;

Private Sub Verificação88_AfterUpdate()
Dim OrgFile As String
Dim DestFile As String
OrgFile = ("C:\Processos\" & Me.NProcesso.Value & "\" & Me.Lista.Value & ".doc")
DestFile = ("C:\Processos\" & Me.NProcesso.Value & "\" & "Entregue_" & Me.Lista.Value & ".doc")
OrgFile = Me.Lista.Value
DestFile = Me.Lista.Value & "Entregue" & ".doc"
Name OrgFile As DestFile
End Sub


Fica somente assim, pois a Me.Lista.Value já tem o caminho completo;

Private Sub Verificação88_AfterUpdate()
Dim OrgFile As String
Dim DestFile As String
OrgFile = Me.Lista.Value
DestFile = Me.Lista.Value & "Entregue" & ".doc"
Name OrgFile As DestFile
End Sub

Mestre:

Tem coisas que só um BRUXO saberia explicar. Fechei a base de dados e criei 5 processos e o erro desapareceu??????? Espero que não volte de novo!!!. Não tenho explicação para isto pois a lista estava preenchida não havia razão para dar o erro, inclusive encostando o ponteiro à linha amarela em debug dava a seguinte mensagem:OrgFile = Nule

E agora? Tudo passou novamente a funcionar bem??????

Só pode ficar assim;

Private Sub Verificação88_AfterUpdate()
Dim OrgFile As String
Dim DestFile As String
OrgFile = Me.Lista.Value
DestFile = Me.Lista.Value & "Entregue" & ".doc"
Name OrgFile As DestFile
End Sub

Não pode ter dois OrgFiles e dois DestFile com a mesma coisa, OK ?

Certo Mestre já alterei, mas curiosamente com a mescla anterior já não estava a dar erro, o que não signifiva que voltasse de novo.

Mais uma vez obrigado