Макросы Excel 2007 - извлечение данных

Question

Я пытаюсь извлечь определенные данные из ячейки и пытаюсь поместить их в другое место в той же ячейке. Какие-либо предложения?

РЕДАКТИРОВАТЬ

У меня есть несколько текстовых строк в одной ячейке (дата, номер детали и цвет). Формат выглядит следующим образом: 100906 PBO5 BLUE. Дата всегда состоит из одинакового количества символов, но номер детали может быть 2, 3 или 4 символа.

Я хочу переместить дату в позицию после цвета, чтобы она выглядела как PBO5 BLUE 100906. У меня более 1000 записей, поэтому я не хочу делать это вручную.

Answer 1

Мартин,

Вот альтернативный метод, использующий функции MID и LEFT.

Только для этого примера давайте предположим, что ваши данные находятся в столбце A. Если вы реализуете следующую формулу в соседнем столбце B:

 = MID(A1,8,100) & " " & LEFT(A1,6)

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

Надеюсь, это поможет.

Answer 2

Вы не упоминаете, всегда ли цвет 4 буквы. Предполагая, что это так, следующая формула даст желаемый результат, независимо от того, является ли номер детали 2, 3 или 4 (вход находится в ячейке A1).

=RIGHT(A1,LEN(A1)-FIND(" ",A1))&" "&LEFT(A1,6)

Вот примеры ввода и вывода:

Input              Output
100906 PBO5 BLUE    PBO5 BLUE 100906
100906 PB5 BLUE  PB5 BLUE 100906
100906 P5 BLUE    P5 BLUE 100906

Answer 3

Вы можете вставить новые столбцы рядом со столбцом, содержащим ваши данные, и разделить ячейку, используя правило. Смотрите функцию:

Data > Text to column

в строке меню и выберите «пробел» в качестве разделителя. Затем вы можете просто соединить ячейки в нужном вам порядке, используя функцию сцепления

 =CONCATENATE(E2,"-",F2)

Чтобы узнать, как сделать это с помощью макроса, нажмите кнопку «Записать макрос», а затем изучите сгенерированный код.