{quote}{login=}{date=07.09.2010 06:44}{thema=}{post}=СУММпроизв(--(Рег=$G41);--(ТипКл=$H41);--(МЕСЯЦ(ДатаЗ)=МЕСЯЦ(Q$40));--(год(ДатаЗ)=год(Q$40))){/post}{/quote}  
 
Огромное спасибо!!!!!!!!!!!!

Уважаемые знатоки!  
Помогите проапгрейтить формулу, чтобы проверялся год в ячейке Q40  
 
{=СУММ((Рег=$G41)*(ТипКл=$H41)*(МЕСЯЦ(ДатаЗ)=МЕСЯЦ(Q$40)))}  
 
А то сейчас месяца начали повторятся и сумма, соответсвенно, кривая... :(

Никто не может прокомментировать где что не так?

Получилось!!!  
Маленький только вопрос - как все это действо проводить в фоновом режиме, чтобы листы исходной книги не мелькали?

{quote}{login=The_Prist}{date=12.08.2010 10:58}{thema=Re: Re: }{post}{quote}{login=Koks}{date=12.08.2010 10:55}{thema=Re: }{post}Нужно исключить ручное вмешательство{/post}{/quote}Вы уже забыли как использовать макрорекордер?{/post}{/quote}  
 
Каюсь! Еще раз спасибо! =)  
Обещаю в следующий раз глупых вопросов не задавать.

{quote}{login=Ёксель-моксель}{date=12.08.2010 10:51}{thema=}{post}Копирование / Специальная вставка / Вставить значение{/post}{/quote}  
 
Нужно исключить ручное вмешательство

Уважаемый знатоки Excel!  
 
Есть задача: имеем книгу с несколькими листами. После внесения ряда данных, часть листов копируется в отдельные книги. Однако на этих листах, есть формулы, которые завязаны на другие листы исходной книги.  
Как сделать так, чтобы после копирования, все формылу "убивались", а данные остались?  
 
Например, имеем сумму значений с листа1 на листе2. которая равна 100. Так вот после копирования, сама формула должна пропасть, а значние 100 осталось.  
 
Заранее огромное спасибо!

Да не вопрос.    
Просто мне казалось чем пложить темы, можно все решить в одной, т.к. вопрос относится непосредственно к данному действию...  
 
Ладно, вопрос закрыт, пойду создам новую тему тогда раз такое дело :)

{quote}  
Шикарно! Еще дописал строку, чтобы закрывал созданный файл.  
Вот тольок не получается удалить кнопку, созданную из картинки. :(  
Обычную кнопку он удаляет    
 
ActiveSheet.Shapes("Button 1").Select  
   Selection.Delete  
 
А что нужно прописать для удаление картинки?{/quote}  
 
С удалением картинки разобрался

{quote}{login=The_Prist}{date=12.08.2010 09:30}{thema=Re: }{post}{quote}{login=Koks}{date=12.08.2010 09:17}{thema=}{post}И еще небольшой вопросик - поиском не нашел.{/post}{/quote}Правила почитайте. Какое отношение тот вопрос имеет к данной теме?{/post}{/quote}  
 
Что значит какое отношение? Я ведь  описываю что должно получится в итоге после сохранения активного листа в новую книгу.

И еще небольшой вопросик - поиском не нашел.  
На копируемом листе есть некоторые значения, берущиеся с другого листа данной книги. Соответсвенно, при копировании связь остается. Так вот как сделать так, чтобы данные остались, а связь пропала?  
 
Т.е. к примеру после копирования в ячейке остается дата 01.01.2010, но прописана связь ='лист1'!F4  
Вот и хотелось бы связь убрать, а дату оставить :)  
Такое возможно?  
Заранее, огромное спасибо!

{quote}{login=KuklP}{date=11.08.2010 06:53}{thema=}{post}Так:  
Dim sNewBookName As String, a As String  
a = ThisWorkbook.Path & "\"  
sNewBookName = ActiveSheet.Name  
ActiveSheet.Copy  
ChDir ThisWorkbook.Path  
ActiveWorkbook.SaveAs a & sNewBookName  
End Sub{/post}{/quote}  
 
Шикарно! Еще дописал строку, чтобы закрывал созданный файл.  
Вот тольок не получается удалить кнопку, созданную из картинки. :(  
Обычную кнопку он удаляет    
 
ActiveSheet.Shapes("Button 1").Select  
   Selection.Delete  
 
А что нужно прописать для удаление картинки?

{quote}{login=The_Prist}{date=11.08.2010 06:25}{thema=Re: Re: }{post}{quote}{login=Koks}{date=11.08.2010 06:23}{thema=Re: }{post}что такое макрорекодер?{/post}{/quote}  
<EM>http://excel-vba.ru/Tips_Macros.html</EM>{/post}{/quote}  
 
Спасибо огромное!  
Попробовал сам сделать макрос - получилось :)  
Если позволите у меня пара вопросов:  
1. как запретить ему копироваьт кнопку с листа?  
2. как научить его создаваь новую книгу в тойже дириктории, чтобы на других ПК работало?  
 
Спасибо!

{quote}{login=The_Prist}{date=11.08.2010 06:19}{thema=}{post}Koks, Я это называю элементарной ленью.  
Вы пробовали то, что Вам нужно макрорекордером записать? Попробуйте, помогает.  
В следующей такой же теме помогать не буду -закрою с пометкой - ЛЕНИВЫЙ.  
 
dim sNewBookName as string  
sNewBookName = ActiveSheet.Name  
ActiveSheet.Copy  
activeworkbook.Name = sNewBookName{/post}{/quote}  
 
Я извиняюсь, но что такое макрорекодер? Я как бы не особо в экселе. Просвятите плз! ТОгда можету  меня будет меньше вопросв... :)

{quote}{login=Юрий М}{date=11.08.2010 05:42}{thema=}{post}Всё это уже многократно обсуждалось... Скопируйте название Вашей темы в окошко поиска.{/post}{/quote}  
 
Чет не нашел того, что нужно мне.. :(  
Либо копия в текущую книгу, либо копия всей книги...

{quote}{login=Koks}{date=11.08.2010 05:32}{thema=Создание копии листа в новый файл}{post}Уважаемые знатоки Excel!  
 
Подскажите плз, как реализовать создание копии листа книги в новый файл по нажатию кнопочки.  
 
Заранее спасибо!{/post}{/quote}  
 
Дополнение: копирование должно быть в фоновом режиме, а новая книга называлась именем листа. :)

Уважаемые знатоки Excel!  
 
Подскажите плз, как реализовать создание копии листа книги в новый файл по нажатию кнопочки.  
 
Заранее спасибо!

База с датами и адресами формируется автоматом. Хотелось бы автоматизировать выборку адресов, например, по истечению 7 дней, а уж потом по ним проводить рассылку.  
 
Итоговую базу я так понимаю сразу не запихать в диапазон? В любом случае придется ручками это делать?

Добрый день!  
 
Появилась необходимость сделать следующее:  
имеем книгу с датой и адресом эл.почты. по истечению, например, 7 дней, на адреса необходимо отправить письмо некоого содержания + как-то сделать чтобы фиксировалась дата отправки или типа того, чтобы повторно уже туда ничего не направлялось при следующей рассылке, если данный адрес с той же датой все еще будет фигурировать.  
 
Чета не прикину как отфильтровать нужные даты, а также как воспользоваться почтовой рассылкой в надстройке чтобы все время не вводить диапазон, тему и содердания письма.  
 
Также интеерсен момент с пустыми ячейками в адресе и там, где этих адреса больше чем 1.  
 
Помогите плз!  
Спасибо!

Вопрос про CDO отпал... Как-то сложновато :)

Ось стоит Win 7... И что такое CDO?

{quote}{login=KuklP}{date=28.04.2010 10:39}{thema=Re: Re: }{post}{quote}{login=Koks}{date=28.04.2010 09:00}{thema=Re: }{post}{quote}{login=KuklP}{date=27.04.2010 06:19}{thema=}{post}А есть такие, которым нравится спам?{/post}{/quote}  
Не понял вопроса{/post}{/quote}  
Наверняка понял. Мне в день иногда за сотню из таких рассылок приходит. А идеальных фильтров нет. Приходится перелопачивать. Koks, я заранее прошу прощения, если с Вами другой случай.{/post}{/quote}  
 
Да, случай другой... Речь идет не о спам рассылке, а рассылке не от личного ящика, а ящика для клиентов...  
Так вот - можно это замутить? Чтобы в поле от подставлялось нужное название ящика?

{quote}{login=KuklP}{date=27.04.2010 06:19}{thema=}{post}А есть такие, которым нравится спам?{/post}{/quote}  
 
Не понял вопроса

Щикарна!!!  
Главное чтобы умел еще подставлять в поле от кого :)

Уважаемые знатоки, скажите, а есть ли возможность написания макроса, который будет пулять какое-то письмо (шаблон) на электронные адреса из списка?

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

{quote}{login=Koks}{date=08.12.2009 10:48}{thema=}{post}Хм... Не считает :(  
Пишет 0{/post}{/quote}  
 
Пардон. Ступил

Хм... Не считает :(  
Пишет 0

{quote}{login=vikttur}{date=08.12.2009 10:29}{thema=}{post}Копировать отсюда и вставить:  
=СУММ(($A$2:$A$2000=I$7)*(ИНДЕКС($B$2:$D$2000;;ПОИСКПОЗ($H8;$B$1:$D$1;0))<>""))  
Делаете диапазон с запасом - делов-то :){/post}{/quote}  
 
Да не, все норм. Сделаем с запасом, раз других путей решения нет :)  
В любом случае, спасибо!

Как-то не оч хочется все время добавлять нолики руками... :)