1

У меня есть очень длинная таблица с тысячами строк, например:

новый отдел / Налоги / Компаньоны / журналы / Final //////

Из-за некоторого текста в столбцы у меня появилось несколько косых черт в конце каждой строки, у некоторых только 3, у некоторых целых 7.

Я не могу найти и заменить для "/////", так как он ничего не возвращает. Любые идеи о том, как удалить все косые черты в конце каждой строки?

1 ответ1

1

Не ясно, все ли у вас в порядке с одним / в конце или нет.

Я собираюсь предположить, что все в порядке.

Это взломать это для быстрого ответа, просто найти и заменить несколько раз

Итак, найдите /////// (7 слешей) и замените ничем. Сделать весь документ

Затем найдите ////// (6 косых черт) и замените ничем весь документ.

Продолжайте, пока не закончите с new-dept/Tax/Affiliate/logs/Final/


Я не знаю, почему ваш Excel не может найти / , поэтому я написал макрос (больше теста, чтобы увидеть, работает это или нет).

Пожалуйста, используйте этот макрос. На ленте на панели разработчика щелкните Visual Basic, затем дважды щелкните ThisWorkbook и вставьте следующее

Sub RemoveTrailingSlahes()

For Each cell In ActiveSheet.UsedRange.Cells

      If (cell.Value <> "") Then
      Dim content As String
      content = cell.Value

      Dim cellContentSplit() As String

      'split the string
      cellContentSplit = Split(content, "/")

      Dim result As String
      result = ""

      'now rebuild it
      For i = 0 To UBound(cellContentSplit)

      If cellContentSplit(i) <> "" Then

        If (result <> "") Then
        result = result & "/"
        End If

        result = result & cellContentSplit(i)

      End If

      Next i

      cell.Value = result

      End If

Next

End Sub

Он будет читать каждую используемую ячейку и удалит / из конца каждой ячейки.

Перед запуском макроса сначала сделайте резервную копию работы на случай, если она не даст того, на что вы рассчитывали.

Чтобы запустить макрос, нажмите зеленую кнопку воспроизведения.

До

После

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