Leviathan07
Programmer
hello i have writen a utility that converts a WORD file that i have made in my program into a lower format of word, so that it can be imported into WORDPERFECT 8.0. However, occassionally i get an error called Automation error when i fun this code.
Dim conv As FileConverter
Dim i As Integer
For i = 1 To FileConverters.Count
Set conv = FileConverters(i)
If conv.FormatName = "Word 6.0/95" Then
If conv.CanSave = True Then
GetCorrectFileConverter = i
Exit Function
End If
End If
Next i
*The error occurs with the 'FileConverters.Count' and i don't know why. Please help if you can.
Dim conv As FileConverter
Dim i As Integer
For i = 1 To FileConverters.Count
Set conv = FileConverters(i)
If conv.FormatName = "Word 6.0/95" Then
If conv.CanSave = True Then
GetCorrectFileConverter = i
Exit Function
End If
End If
Next i
*The error occurs with the 'FileConverters.Count' and i don't know why. Please help if you can.