Мне нужен блок кода Excel VBA, который работает для Mac Excel 2011. Я хочу, чтобы код просматривал все ячейки в столбце A, проверял, содержит ли ячейка определенный шаблон подстроки, а затем вставлял этот шаблон подстроки в столбец. B. Например, скажем, у меня есть ячейка A1 с надписью «Мой офис расположен по адресу HR.205», я хочу вырезать / вставить подстроку «HR.205» в B1. Это применимо ко всем / всем ячейкам в столбце A. Поэтому, если A146 содержит строку «Мой офис находится по адресу HR.567», я хочу вырезать / вставить «HR.567» в ячейку B146 и т. Д.
У меня есть формула, которая работает, но я хочу блок кода VBA, потому что строка, которую я хочу извлечь, может отличаться от "HR.206". Может быть, это «Мой офис TECH.345». Я хочу извлечь "TECH.345" и вырезать / вставить "TECH.345" в столбец B. В любом случае, вот формула, которая работает (просто общая формула Excel):
=RIGHT(A1,LEN(A1)-FIND("HR",A1))
// Example of what I want the VBA macro code to do
If(cell in column A contains search pattern) then
cut/paste search pattern to column B // search pattern is "HR..."
Else (cell in column A contains another search pattern) then
cut/paste new search pattern to column B // search pattern is "TECH..."
End
// Could be a lot of If/Else statements
Извините, что приведенный выше код не является реальным кодом. Я не знаю, как написать код макроса VBA, который бы делал то, что я хочу. Ожидаемый результат от кода VBA (который должен работать на Mac) - HR.206 в ячейке B1. Код должен возвращать все после шаблона подстроки, которое может быть чем угодно. Поэтому, если это «Мой офис находится на HRfirstfloor», я хочу вырезать / вставить «HRfirstfloor» в ячейку B1. Большое спасибо, ребята. Все здесь потрясающие.