Добрый день.
Совместима ли надстройка PLEX с какими-нибудь другими офисами: MS Office 2011 (Mac), OpenOffice, LibreOffice, iWork?

Есть лист с большой базой данных: до 500 000 строк и до 10 столбцов. Надо разнести эту базу по листам, чтоб в каждом листе было не более 50 000 строк.  
 
Пример: имеем базу 430 000 строк и 7 столбцов на одном листе. После обработки получаем книгу, где на 1-ом листе находится эта база в оригинале, на листах с 2 по 9 эта база по 50 000 строк и 10 лист с остатком в 30000 строк.  
Желательно макрос сделать с кнопкой, чтоб при нажатии на открытом листе запускался этот процесс.  
 
Помогите, пожалуйста макросом. Если это сложная задача - напишите на мыло свои условия.

Да, лист один. Формул не будет. Форматы сохранять, но никаких рамочек, жирных форматов не будет. Обычно я прохожусь функцией из Плекса (Очистка диапазона ячеек), а если есть формулы, то "Конвертация формул в значения".  
 
А как вашим макросом пользоваться? Ну.., те.е куда этот текст ввести, чтоб он сработал?

Есть файл *xlsx с таблицей на листе состоящей из нескольких столбцов (1-7) и большого количества строк (от 100 до 600000).  
Цель: получить файл *xls с листами, в каждом из которых будет не более 50000 строк той самой таблицы. Естественно, что количество этих листов зависит от размеров исходной таблицы.  
Подскажите, пожалуйста, варианты этого решения. Может есть уже такие конвертеры или макросы?    
 
P.S. Сам в макросах не разбираюсь. В Плексе подобного решения не нашел.

Да, действительно, этот файл теперь работает. :-))  
Спасибо большое. Сейчас погоняю еще с разными диапазонами.

Простите, но он не работает.  
Файл разъархивировал, запустил. Нажал кнопку, ввожу диапазоны, например 10000-10009 или любой другой.  
Выходит окно с ошибкой: "Subscript out of range"

Здравствуйте, гуру Екселя.  
Возникает иногда такая необходимость в обработке диапазона данных... Хотелось бы как то это воплотить в удобную форму макроса, который можно было бы запускать кнопкой.  
Представляется это так. Нажимается кнопка, появляется окно с возможностью введения двух цифр - диапазонов номеров("от" и "до"). Например: 2000000-2500000  
Сами цифры могут быть от 5 до 12 значными. Но меняются обычно последнии 3-7 цифр.    
И вот, при нажатии "Старт" или "Ок" начинается заполнение столбцов чистого листа с  ячейки A1 и вниз цифрами от 2000000 до 2500000. В каждом столбце не более 50000 цифр. Т.е. в итоге получаем на листе столбец A состоит из цифр с 2000000 до 2049999, столбец B с 2050000 до 2099999 и т.д пока на последнем столбце не останется цифра 2500000.  
Файл прикладывать не стал - вроде все понятно написал, но если потребуется - выложу.  
 
Заранее благодарен.

Дело не в этом. Есть мобильные городские номера - на них при добавлении кода города смс не доходят. Например у Теле2  
Вообщем, надо как в 1 посте

Здравствуйте.  
Есть макрос (см. ниже). Его надо доделать и добавить в него такие моменты.  
 
1) Тот модуль с окошком, где я вносил диапазоны городских номеров и код, который к ним добавлялся должен выглядеть по другому. Дело в том, что не ко всем коротким городским номерам добавив код города можно отправить смс.  
Например: 7259838 (МТС), добавив к нему просто код город 8351 - смс к нему не дойдет. Надо заменять его приписанным к нему федеральным номером 89127939838.  
Я решение этого вижу так: ячейка номера должна состоять из 2-х частей. в первую я вношу цифры из номера, которые потом заменяются на указанные мной цифры (код), а 2 часть номера цифры которой не будут в дальнейшем заменяться. Причем количество цифр и в 1 и во 2 части номера может быть разное. пример: номер 7259838 я записываю так. в 1 ячейку вношу /725/, во вторую /9838/, а в ячейку кода /8912793/  
Если говорить о диапазоне, куда попадает нужный номер, то выглядит это где то так.  
от /725/-/0000/ и до /725/-/9999/ добавлять /8912793/  
Тогда твой макрос при запуске сканирует указанный мною столбец и если находит номера в диапазоне от 7250000 до 7259999, то конвертирует его в 8912793хххх  
Причем диапазоны номеров могут выглядеть и так: от /7259/-/000/ и до /7259/-/999/ и код /89127939/  
Если придумаете лучше решение - буду только рад.  
 
2) Далее, надо добавить возможность галочками в чекбоксах включать данные диапазоны при сканировании и обработке или не включать. Дело в том, что есть клиенты кто рассылает по России и к примеру номера городских телефонов некоторых городов могут совпадать и тогда еще потребуется создать дополнительный столбец к "от", "до" и "код" - "город" где я бы указывал телефоны какого города входят в этот диапазон

{quote}{login=EducatedFool}{date=03.04.2010 12:17}{thema=}{post}Поглядите на пример макроса в этом файле: http://excelvba.ru/XL_Files/Sample__03-04-2010__14-17-12.zip  
 
 
Вот весь код:  
..................  
{/quote}  
 
Да, вроде все так как задумывалось! Немного неудобно заходить постоянно в макрос и редактировать "Set ra = Range([A3]" если номера расположены в других столбцах.
Можете дописать в макрос строку, чтобы при старте команды появлялось окно с предложением ввести номер столбца, который требуется обработать?  
 
После теста на большой базе с разными номерами, отпишусь, как все работает.

{quote}{login=vikttur}{date=03.04.2010 10:29}{thema=Re: Обработка городских сотовых телеф.номеров в федеральный формат}{post}{quote}{login=dimas}{date=03.04.2010 10:08}{thema=Обработка городских сотовых телеф.номеров в федеральный формат}{post}Например диапазон: 2350000-2359999 код 8351 или диапазон 460000–479999 код 83519 или т.д.{/post}{/quote}  
Нужны диапазоны , иначе откуда макросу знать "или т.д.".  
Формулой (не VBA) принимается?{/post}{/quote}  
 
Под " и т.д." я имел ввиду что можно будет войти в макрос и при необходимости дописать новые диапазоны номеров с кодами.

Есть изменяемый(пополняемый) список диапазонов телефонных номеров, и есть приписанные к этим диапазонам коды городов. Например диапазон: 2350000-2359999 код 8351 или диапазон 460000–479999 код 83519 или т.д.    
Нужен макрос, который бы находил в базе телефонов номера входящие в эти диапазоны и дописывал к ним принадлежащий им код. Причем в базе номера могут быть как в формате 2350000, так и 235-00-00 или 235 00 00, а результат должен получится такой 83512350000.  
Номера же в базе, не входящие в прописанные диапазоны, оставались без изменений или удалялись.  
 
Желательно, чтобы была возможность в САМОМ макросе пополнять список диапазонов и кодов к ним.

Вот такая еще ситуация.  
Есть изменяемый(пополняемый) список диапазонов телефонных номеров, и есть приписанные к этим диапазонам коды городов. Например диапазон: 2350000-2359999 код 8351 или диапазон 460000–479999 код 83519 или  т.д.    
Нужен макрос, который бы находил в базе телефонов номера входящие в эти диапазоны и дописывал к ним принадлежащий им код. Причем в базе номера могут быть как в формате 2350000, так и 235-00-00 или 235 00 00, а результат нужен такой 83512350000  
Желательно, чтобы была возможность в САМОМ макросе пополнять список диапазонов и кодов к ним.

Отлично, вроде все работает как надо.  
На днях проверю еще на большом объеме, так сказать в "боевых" условиях.  
 
Большое спасибо этому форуму и особенно The_Prist и webley! Вы молодцы!

{quote}{login=The_Prist}{date=07.03.2010 08:00}{thema=}{post}Держите с выбором столбца.{/post}{/quote}  
 
Да, сейчас есть выбор столбца, но зачем вы убрали удаление "некорректных" номеров, и добавили подсветку исправленных номеров. Теперь их надо будет удалять вручную.  
В прежней вашей версии этого не было.  
Подправьте, пожалуйста, этот момент. Оставьте в этом макросе все как есть, только добавьте удаление "неправильного" номера.  
Спасибо.

{quote}{login=webley}{date=06.03.2010 07:41}{thema=}{post}Строго говоря, пробел тут вообще ни при чем - все символы определяются как цифра или не цифра. Логика следующая - если после 11 цифр + любое количество других символов следующий символ не цифра, то берется левая часть с этими 11 цифрами (отсюда и получается 73588568903).    
Сейчас сообразил как реализовать через пробел: надо строку    
If cc = 11 And c < Len(TelNum) And (Mid(TelNum, c + 1, 1) Like "#") = False Then Exit For    
надо заменить на    
If cc = 11 And c < Len(TelNum) And Mid(TelNum, c + 1, 1) =  " " Then Exit For  
Должно работать...{/post}{/quote}  
 
Почему то обрабатывает только первые где-то 11 строчек, несмотря на то что при запросе вводим номер столбца. Ниже добавил несколько телефонов - макрос их не обрабатывает. И не распознает номера Дмитриева и Сергеева.  
 
Я так полагаю, если к макросу от "The_Prist" добавить возможность выбора диапазона ячеек или номер столбца - то это будет то что надо!!!

{quote}{login=The_Prist}{date=06.03.2010 09:33}{thema=}{post}Вот, попробуйте. Возможно покажется мудрено, но работать должно лучше и быстрее чем обычное сравнение.{/post}{/quote}  
 
Да, вроде все обрабатывает. Здорово!  
Один ньюанс, я выше уже писал, сделайте пожалуйста: при запуске макроса, чтоб выдавался запрос - какой столбец обрабатывать. И чтобы данные после обработки остались в том же столбце.  
А так почти идеально!!

Цитата: "Этот вариант применим и к таким номерам как у Сергеева, но будут некоректно обрабатываться некоторые другие номера. Например, такой номер "735-88-56 (дом), 8-903-258-78-65" преобразуется к виду "73588568903", что естественно не правильно"  
Не понял почему должен получиться такой вид "73588568903".    
 
Цитата: "В принципе можно для преобразования брать левую часть ячейки, в которой есть 11 цифр, а потом уже удалять все лишние символы"  
Макрос же удаляет после пробела все, а потом уже преобразует по вашему первому варианту.

Ок, в любом случае, надежда только пока на вас. Так что буду ждать.  
Веселого уикэнда!

Мне рассказали про макрос, который удаляет в выделенных ячейках все что написано после пробела. Не могу найти его. Может есть у кого?  
Тогда может получилось бы его переделать, чтобы он удалял все, что расположено после 11 цифр. Ну, а если, так нельзя, тогда можно его оставить и в первосданном виде.  
И после этого уже запускать ваш макрос. По-моему, цель была бы достигнута.  
Что думаете?

Сорри, но в этом варианте что то не так.  
Да, он удаляет "левые" знаки в "правильных" номерах и подсвечивает исправленные номера, но он не удаляет "ошибочные" номера, как было в вашей первой версии.    
И еще, я так понял, макрос работает если номера введены в первую колонку. На практике они могут быть в любой из колонок. В посте от Igor67 при запуске макроса, тот просил выделить ячейки с данными, которые требовалось обработать.  
Можно ли применить и здесь такой принцип? Это было бы намного удобнее.

Да, и еще. Сразу не написал,виноват, полагал что подразумевается само собой.    
Надо, чтобы отредактированные макросом номера оставались в тех же ячейках (на своих местах), а не в соседних.

Что то не так.  
Пишет "Syntax error"  
 
Вариант от "webley 04.03.2010, 11:42" - работает, но к сожалению без Сергеева.

Спасибо огромное,  
Я правильно понял? Окончательный текст должен быть такой:  
 
Sub ConvertTel()  
Dim r As Long 'номер строки  
Dim c As Integer 'номер символа в строке телефона  
Dim TelNum As String 'номер телефона  
 
r = 3  
While IsEmpty(Cells(r, 1)) = False  
TelNum = Cells(r, 1)  
If TelNum <> "" Then  
For c = 1 To Len(TelNum)  
'посимвольно заменяем все НЕ цифры на произвольный знак, например @  
TelNum = Cells(r, 1: sNewNum = ""  
If TelNum <> "" Then  
For c = 1 To Len(TelNum)  
If Mid(TelNum, c, 1) Like "#" Then sNewNum = sNewNum & Mid(TelNum, c, 1)  
Next c  
End if  
 
'если полученный после преобразований номер начинается с 7 или 8,  
'и содержит 11 цифр, вносим его в первый столбец после таблицы  
If TelNum Like "7##########" Or TelNum Like "8##########" Then  
Cells(r, 5) = TelNum  
End If  
End If  
r = r + 1  
Wend  
End Sub

Нет, спама не будет. Я работаю оффициально. Внедряю сервис смс рассылок в компаниях, которые информируют ТОЛЬКО своих клиентов, давших на то свое согласие.  
Могу выложить наш адрес сайта в личку.  
 
Что касается Дмитриева, то в идеале если бы можно было и в такой ситуации вычленить мобильный номер из данного текста - то было бы просто СУПЕР!!!  
Просто я не предполагаю, как это возможно сделать.

Требуется создать макрос по корректировке сотовых телефонных номеров в файле *xls.  
Описание приложенного файла: имеется база клиентов в екселе. Собранная для СМС рассылки. Создавали и вносили в нее данные все кому не лень. Поэтому формат записанных телефонных номеров разнообразный. Часто вместо мобильных номеров внесены городские. База до 50000 человек.  
Задача: по максимуму отсортировать и скорректировать все номера приведя их к формату сотового номера.  
Номера должны начинаться на "7", "8" или "+7".    
В номере должно быть 11 цифр.  
Надо избавиться от таких знаков: "-", ".", "(" и ")" и от всех других "левых" знаков.  
Номера, не соответствующие требуемым критериям, должны удаляться.  
 
Сам макросы не писал. имеется небольшой опыт по написанию формул.  
Очень рассчитываю на любую помощь (от подсказок по написанию данного макроса и ссылок на соответствующие ресурсы до готового макроса) в этом вопросе.  
 
Заранее благодарен.

{quote}{login=Clansy}{date=03.04.2008 01:41}{thema=}{post}Жесть...а че в одно теме нельзя было сделать ?{/post}{/quote} В первой теме видимо из за размера не прикрепился... сжал раром и ок.

{quote}{login=Clansy}{date=03.04.2008 12:57}{thema=}{post}А хде файло то ?{/post}{/quote} Ниже тема Приложение !

Приложение в архиве

Помогите написать функцию чтобы по двум значениям ячеек(лист "легковые" А9- (№ в листе "Основа Л") и (В9-Год в листе "Основа Л"), из каталога лист "Основа Л" вставлялась стоимость в ячейку (I9- лист "легковые").  
Заранее спасибо огромное оч. выручили ... в ручную работать оч. долго и нудно....  
В приложении файл excel - Pac4eT Beta 7