Я хочу выбрать много строк в Excel, чтобы удалить их, и это вручную буквально занимает несколько часов. У меня есть конкретные номера строк в файле .txt с номером в каждой строке. Как это:

1
5
8
9

Есть ли какой-нибудь классный способ сказать Excel, чтобы автоматически выбирать / удалять эти строки?

Пример:
http://i.imgur.com/ccQegoC.png

1 ответ1

0

Вот пример того, как начать работать с VBA. Я создал рабочую книгу с двумя полями:«Поставщик» и «Расположение файла». Я также создал подпроцедуру VBA, которая откроет текстовый файл и заменит любую строку, которая = номер поставщика, на конец возвращает возврат каретки и заменит ее ничем (""):

Sub Remove_line_item()
Dim myFile As String, text As String, textline As String, posLat As Integer, posLong As Integer
myFile = Range("B2").Value
myFile = Application.GetOpenFilename()
Open myFile For Input As #1
Do Until EOF(1)
Line Input #1, textline
text = text & textline
Loop
text = Replace(text, Range("A2").Value & ChrW(14), "")

myFile.Write text
myFile.Close
End Sub

Я использовал только один путь к файлу за раз, но вы могли бы пойти еще дальше и просмотреть все текстовые файлы в каталоге. Это может быть хорошим началом для вас, хотя, надеюсь,.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .