[Resolvido]Mensagem SimNão

Não funciona, onde está o erro

Private Sub Texto352_LostFocus()
Dim MSG As String
If Me.Texto195 <> "" Or Me.Texto195 <> Me.Texto352 Then
MSG = MSG & "Deseja vincular/actualizar dados nos campos diretos?"
If MsgBox(MSG, vbYesNo + 32, "INCLUSÃO DE DADOS") = vbYes Then
Me.Texto195 = Me.Texto352
Me.Texto28 = Format(Texto195, "dddd")
Me.Rótulo194 = "Data/Hora dos factos"
Else
End If
End If
End Sub

Amigo, poste seu aplicativo pra testarmos! Pois nao nos informou onde acusa o erro...

Peço desculpa mas não posso tem cerca de 1,400Gb não dá e para extrair só os formulários que queria tenho de cancelár vários códigos vba.

O problema é que mesmo com o código quer tenha um ou ambos os campos preenchidos Me.Texto195 = Me.Texto352 ele continua a perguntar se quero associar, deve ser por um ser campo data e o outro texto. Não faz mal também não me incomoda muito. Obrigado na mesma.