Добрый день Помощи прошу вашей. В столбце 2 начиная с ячейки B6 и ниже до последней заполненной идут фамилии (рассматриваем классический вариант с тремя составляющими без тире и приставок). Некоторые ФИО идут с числами по принципу "ФИО число", и здесь между ФИО и числом могут стоять: пробелы, скобки и прочее, а может слитно быть. В столбце 3 начиная с ячейки C6 и ниже идут числа (их проверять не нужно). Нужно в массиве от B6 до нижней заполненной ячейке в столбце B проверить каждую ячейку на наличие цифры после ФИО, и: 1. Если в одной ячейке нашлось несколько ФИО, то нужно скопировать всю строку и вставить её ниже ровно столько раз, сколько раз ФИО встречается в найденной ячейке. Например в строке 7 встречается три ФИО, значит мы копируем строку 7 и вставляем её ниже 3 раза, т.е. в 8, 9 и 10 строки. Это нужно, чтобы скопировались формулы идущие в данной строке и формат. Далее в 8 строке оставляем первую ФИО без цифр, в 9 строке оставляем вторую ФИО, и в 10 строке оставляем третью ФИО. А цифры, идущие после каждой из ФИО нужно вставить в столбец 3 напротив каждой "оставленной" ФИО. Т.е. другими словами Коул Владимир Анатольевич (53); из 7 строки копируется в 8 строку 2 столбец, а число 53 копируется в 88 строку 3 столбец. Затем строку-"донор" 7 нужно удалить. И перейти к проверке следующих ячеек столбца 2. 2. Если нашлась ячейка, содержащая одну ФИО с числом, или одну ФИО без числа, или одну или несколько ФИО с приставками типа ИП и другими отличными от стандартных трёх слов Имени Фамилии и Отчества (в общем, всё то что мы не сможем идентифицировать как ФИО), то ячейку игнорируем. Признаюсь не искал, но ранее видел нечто похожее с автозапчастями рассмотривали код на каком-то форуме.
Добрый день Помощи прошу вашей. В столбце 2 начиная с ячейки B6 и ниже до последней заполненной идут фамилии (рассматриваем классический вариант с тремя составляющими без тире и приставок). Некоторые ФИО идут с числами по принципу "ФИО число", и здесь между ФИО и числом могут стоять: пробелы, скобки и прочее, а может слитно быть. В столбце 3 начиная с ячейки C6 и ниже идут числа (их проверять не нужно). Нужно в массиве от B6 до нижней заполненной ячейке в столбце B проверить каждую ячейку на наличие цифры после ФИО, и: 1. Если в одной ячейке нашлось несколько ФИО, то нужно скопировать всю строку и вставить её ниже ровно столько раз, сколько раз ФИО встречается в найденной ячейке. Например в строке 7 встречается три ФИО, значит мы копируем строку 7 и вставляем её ниже 3 раза, т.е. в 8, 9 и 10 строки. Это нужно, чтобы скопировались формулы идущие в данной строке и формат. Далее в 8 строке оставляем первую ФИО без цифр, в 9 строке оставляем вторую ФИО, и в 10 строке оставляем третью ФИО. А цифры, идущие после каждой из ФИО нужно вставить в столбец 3 напротив каждой "оставленной" ФИО. Т.е. другими словами Коул Владимир Анатольевич (53); из 7 строки копируется в 8 строку 2 столбец, а число 53 копируется в 88 строку 3 столбец. Затем строку-"донор" 7 нужно удалить. И перейти к проверке следующих ячеек столбца 2. 2. Если нашлась ячейка, содержащая одну ФИО с числом, или одну ФИО без числа, или одну или несколько ФИО с приставками типа ИП и другими отличными от стандартных трёх слов Имени Фамилии и Отчества (в общем, всё то что мы не сможем идентифицировать как ФИО), то ячейку игнорируем. Признаюсь не искал, но ранее видел нечто похожее с автозапчастями рассмотривали код на каком-то форуме.timo64uk
Спасибо огромное. Работает! Изначально выглядело просто, но когда опубликовал, и увидел количество текста, то понял, что очень намудрил. Буду разбивать на подэтапы впредь. Вы очень помогли. Это действительно потрясающе, словно магия.
Я впервые о макросах услышал в 2012г., и до сих пор воспринимаю это как магию и радуюсь искренне, когда задуманное реализуется (благодаря вам).
. Спасибо, что есть возможность обратиться за помощью, спасибо, что помощь оказывается. Всем почёт и уважение!
Спасибо огромное. Работает! Изначально выглядело просто, но когда опубликовал, и увидел количество текста, то понял, что очень намудрил. Буду разбивать на подэтапы впредь. Вы очень помогли. Это действительно потрясающе, словно магия.
Я впервые о макросах услышал в 2012г., и до сих пор воспринимаю это как магию и радуюсь искренне, когда задуманное реализуется (благодаря вам).
. Спасибо, что есть возможность обратиться за помощью, спасибо, что помощь оказывается. Всем почёт и уважение!timo64uk