Как прочитать одну строку из документа Word - PullRequest
Новая
       15

Как прочитать одну строку из документа Word

0 голосов
/ 29 мая 2019

Метод, который я использовал, был для текстовых файлов и дает тарабарщину, как ожидалось. 

In: John Smith
Out: PK!~8ìz‡­[Content_Types].xml ¢( ´”ÏNÂ@Æï&¾C³WÓ.x0ÆP8•D|€a;…Õvw³;ü{{§´5@UôBRf¾ß÷Ív;½Áº,¢%ú ­IE7鈲™6³T¼Lâ[“Aa
¦bƒAú—½ÉÆaˆXmB*æDîNÊ æXBH¬CÕÜúˆýL:Po0CyÝéÜHe
¡¡˜*†è÷†˜Ã¢ h´æ¿ë$SmDt_÷UV©ç
­€¸,—&KÊÛ<×

Я новичок в VBA, и я пытаюсь читать документ построчно, чтобы в итоге макрос мог автоматически удалять целые строки на основе их содержимого. 

Sub ayaya()
Dim TextLine As String
Open ActiveDocument.Path & "\Doc1.docm" For Input As #1
    Do While Not EOF(1) ' Loop until end of file.
    Line Input #1, TextLine ' Read line into variable.
    Debug.Print TextLine
    Loop
    Close #1


End Sub

Часть меня надеялась, что это даст "Джон Смит". Я видел, как некоторые решения помещают весь документ в текстовый файл. Есть ли способ, где я могу как-то разграничить данные? Я хотел бы иметь возможность выделить одну строку и удалить ее.

1 Ответ

0 голосов
/ 29 мая 2019

Вы пытаетесь прочитать файл docx или docm, который является zip-архивом. Файлы Word не являются текстовыми файлами, поэтому вы не получите ничего осмысленного, рассматривая их как таковые. Вам нужно открыть файл с помощью Word или другого приложения, которое может читать такие файлы.

...