Pasta de trabalho do checkout no VBA
Eu tenho alguns VBA que estou tentando verificar uma pasta de trabalho antes de fazer alterações. O código VBA fica em sua própria pasta de trabalho e é ativado por um usuário abrindo a outra pasta de trabalho e selecionando um botão que executa o código para modificar a pasta de trabalho. No começo, quero verificar se o livro de trabalho está com check-out. O problema que estou recebendo é Workbooks.CanCheckOut (ActiveWorkbook.FullName) sempre retorna false, mesmo se o livro de trabalho não estiver com check-out.
If Workbooks.CanCheckOut(ActiveWorkbook.FullName) = True Then
Workbooks.CheckOut (ActiveWorkbook.FullName)
MsgBox "This workbook has been checked out"
Process = True
ElseIf ActiveWorkbook.CanCheckIn = False Then 'if not checked out
Process = False
MsgBox ("The Document may not be checked out, Import Process is ending.")
Else
Process = True
End If 'If CanCheckin = False
Agradeço antecipadamente por sua ajuda.