Excel Как заменить значения? ТРАНСПОНИРОВАНИЕ?

Question

У меня есть несколько значений на моем листе excel, которые должны быть заменены другими. Всякий раз, когда есть, например, «Тест 1», мне нужно иметь «Application System 1.0». Я собираюсь выполнить экспорт с данными, содержащими «Тест 1». Затем я хочу иметь во всех своих анализах вместо «Тест 1» «Application System 1.0». Как вы думаете, нужен ли макрос? Или я могу вставить в каждую ячейку, где хочу иметь формулу «Application System 1.0»? Я думал о формуле «TRANSPOSE»? Может быть, я мог бы сделать сопоставление с соответствующими значениями? Проблема заключается в том, что я генерирую значение «Тест 1» с помощью другой формулы.

=IF(ISERROR(VLOOKUP($I11,Export!$B:$AW,MATCH($J$1,Export!$B$4:$AW$4,0),0)),"",VLOOKUP($I11,Export!$B:$AW,MATCH($J$1,Export!$B$4:$AW$4,0),0)) 

Поэтому, когда у меня есть определенное число в ячейке, в ячейке появляется правильный «Тест x». Хотя теперь, я не хочу иметь «Text x» больше, но «Application System 1.0». Кроме того, я не могу работать с «Application System 1.0», потому что я получаю значения «Test x», как я уже говорил, из экспорта. На это я не влияю.

спасибо, что заблаговременно! С наилучшими пожеланиями, вопросом

Answer 1

Перед экспорт данных из Excel, сохраните файл и запустить этот короткий макрос:

Sub FixText() 
    Application.ScreenUpdating = False 
    For Each r In ActiveSheet.UsedRange 
     v = r.Text 
     If v <> "" Then 
      If InStr(1, v, "Test 1") > 0 Then 
       r.Value = Replace(v, "Test 1", "Application System 1.0") 
      End If 
     End If 
    Next r 
    Application.ScreenUpdating = True 
End Sub 

Примечания, что вы должны сохранить первый поскольку макрос будет заменить любого формулы, которые приводят к тексту, содержащему «Тест 1».