У меня есть макрос, который обновляет заголовок авторских прав с самой последней датой редактирования.
Проблема, с которой я столкнулся, заключается в том, что макрос в настоящее время читает весь файл, а не только первые 6 строк (чтоэто все, что нужно).
Есть ли способ заставить макрос читать только первые строки "X", а не весь файл?
Private selection As EnvDTE.TextSelection = DTE.ActiveDocument.Selection
Private Sub UpdateCopyrightHeader()
selection.StartOfDocument()
selection.EndOfDocument(True)
Dim content As String = selection.Text
Dim result = System.Text.RegularExpressions.Regex.Replace(content, regex, "<lastedit>" & FormatDateTime(Date.Now, vbLongDate) & "</lastedit>")
selection.Delete()
selection.Collapse()
Dim ed As EditPoint = selection.TopPoint.CreateEditPoint()
ed.Insert(result)
End Sub