1а. «2 первые строки» у Вас выглядят совсем не так, как Вы думаете. Включите отображение непечатных символов (в том числе — скрытого текста) и увидите:
1б. Правильнее говорить не «строка», а «абзац».
2а. В начале абзаца не «стоит "точка"», а находится метка многоуровневого списка:
2б. Ничего «удалять» не нужно. В Вашем случае досточно тупо скопировать формат с любой отличной строки и протянуть его на весь текст:
3.
Цитата flev45:
Или отыскал все строки с "Laden der Transaktionsdetails". Как их все удалить, не вручную? »
|
Например, так:
Код:
Option Explicit
Sub Sample()
Dim objParagraph As Paragraph
For Each objParagraph In ThisDocument.Content.Paragraphs
If InStr(1, objParagraph.Range.Text, "Laden der Transaktionsdetails", vbTextCompare) > 0 Then
objParagraph.Range.Delete
End If
Next objParagraph
End Sub