{quote}{login=}{date=30.08.2011 02:34}{thema=}{post}Здравствуйте!  
переместите в сводной "месяц" в область "фильтр отчета". Укажите "выбирать несколько значений". Выделите первые 6 месяцев с января по июнь.{/post}{/quote}  
 
М-да, до этого я как-то не додумался. Как оказывается все просто.  
Спасибо Инкогнито!

Добрый день всем!  
Прошу прощения, ничего другого для названия темы не придумал.  
Вопрос во вложении.

{quote}{login=webley}{date=11.07.2011 01:43}{thema=}{post}попробуйте так  
=ТЕКСТ(B4;"ММММ"){/post}{/quote}  
Спасибо, то что нужно  
 
{quote}{login=Z}{date=11.07.2011 01:43}{thema=}{post}Без месяцев, просто поле дата, группировка в сводной по месяцам, кол-во по датам...{/post}{/quote}  
 
Спасибо, нужна была именно формула.

Доброго всем дня!  
Подскажите пжл по следующему вопросу. Описание в примере. Спасибо.

{quote}{login=The_Prist}{date=29.03.2011 11:57}{thema=}{post}Если надо именно формулу вписать, то и вписывайте формулу. Запишите макрорекордером вставку данной формулы в ячейку. И эту запись используйте в макрсое.    
 
А вообще что это такое?    
Range("h:h").Formula = Proper(x)  
 
Вы идете циклом и каждый раз в столбец H вписываете чего-то. Зачем? Вообще без цикла можно:  
Sub Isp_Prop()  
With Range(Cells(1, 8), Cells(Range("H65536").End(xlUp).Row, 8))  
.Value = Application.Proper(.Value)  
End With  
End Sub{/post}{/quote}  
 
Спасибо Дмитрий, буду разбираться. Через макрорекордер я как-раз и пытался, но видимо не то выдернул чтобы укоротить код.

{quote}{login=}{date=29.03.2011 11:51}{thema=}{post}{quote}{login=}{date=29.03.2011 11:50}{thema=}{post}так у вас Proper от целого числа берется :){/post}{/quote}  
МСН, это было не Вам, а автору темы.{/post}{/quote}  
 
Инкогнито, можно сказать впервые сам написал кодик, чисто логически, ну чуток не получилось...  
Спасибо MCH, работает как надо!!!  
А если мне применить на несколько несвязанных столбцов, допустим H, L, N, R, как изменится код???

{quote}{login=The_Prist}{date=29.03.2011 11:41}{thema=}{post}Application.Proper{/post}{/quote}  
Дмитрий, что-то не получается. Код работать, работает, но делает совсем не то что мне требовалось ((

{quote}{login=pch@koff}{date=29.03.2011 11:38}{thema=функция =Пропнач() в макросе}{post}Добрый день!  
Подскажите пжл где я ошибся!!!  
 
Необходимо к столбцу "H" применить формулу =ПРОПНАЧ() до последней заполненной ячейки:  
 
Sub Isp_Prop()  
   Lcell = app.Cells.SpecialCells(xlCellTypeLastCell).Row  
   For x = 1 To Lcell  
       Range("h:h").Formula = Proper(x)  
   Next x  
End Sub  
 
Спасибо{/post}{/quote}  
 
то есть так:  
Sub Isp_Case2()  
   Lcell = Application.Cells.SpecialCells(xlCellTypeLastCell).Row  
   For x = 1 To Lcell  
       Range("h:h").Formula = Proper(x)  
   Next x  
End Sub  
 
Ругается на Proper(x)

Добрый день!  
Подскажите пжл где я ошибся!!!  
 
Необходимо к столбцу "H" применить формулу =ПРОПНАЧ() до последней заполненной ячейки:  
 
Sub Isp_Prop()  
   Lcell = app.Cells.SpecialCells(xlCellTypeLastCell).Row  
   For x = 1 To Lcell  
       Range("h:h").Formula = Proper(x)  
   Next x  
End Sub  
 
Спасибо

Всем спасибо, теперь все работает :)

Не наверное не так выразился, растягиваю - имеется ввиду копирую вниз.  
Например нужно ооо "топливомер" скопировать напротив одинаковых ОКПО.  
см. пример

Прошу прощения немного поспешил...  
Когда растягиваю ячейку вниз на более 1 ячейки или копирую, выдает ошибку в Target = UCase(Target)  
Как исправить?  
Дополнения в примере!  
Спасибо.

Спасибо всем, все работает!

Добрый день!  
Условие в файле.  
Спасибо :)

{quote}{login=alex404}{date=28.10.2010 11:39}{thema=как в макросе задать параметры страницы}{post}Подскажите как в макросе задать параметры создаваемого листа, ориентацию, поля?  
Заранее спасибо.  
ПС. если такая тема была, то простите. по поиску выдало несколько десятков страниц, каждую проверять время нехватит.{/post}{/quote}  
Вклюючайте макрорекордер и вперед!

Чуть исправил!

так?

Спасибо Serge 007 & Useful, вроде б то что нужно!!!

Вот, вроде сам оригинал не много весит, поэтому выкладываю.  
код ОКПО может иметь разную длину, чот не пойму даже за что прицепиться.

Доброе утро!  
Подскажите пжл, как данный список преобразовать в таблицу. Более подробное описание в файле.  
Спасибо!

{quote}{login=The_Prist}{date=20.05.2010 09:46}{thema=}{post}Наверное так:  
Найти: ~*  
Заменить на: "{/post}{/quote}  
Спасибо Дмитрий, не знал!

Всем доброе утро!  
Собственно сам вопрос в теме.  
Excel не хочет заменять * на ". Как заменить * на " в файле?  
Спасибо

Вот 2003Оф

Добрый день!  
Подскажите пжл, как сделать диаграмму следующего вида.  
Диаграмма в файле.  
Или подскажите какой вид диаграммы использовать!  
Заранее спасибо!  
В примере попытался набросать то что хотелось бы получить, с помощью "рисования".

{quote}{login=The_Prist}{date=02.03.2010 11:12}{thema=}{post}Здравствуйте.    
Оч.интересный файл. Скажите, Pch@koff, а почему нельзя листы называть так же, как и в Вып списках? Если все же нельзя - создавайте список соответствия и на его основании сопоставляйте и отображайте выбранный лист. Это самый простой способ.  
Именно так сделано в примере. Список соответствия на лите "DATA".{/post}{/quote}  
 
Спасибо Дмитрий, именно то что нужно. А про названия листов, ... , это не так принципиально, главное чтоб в выпадающих списках было понятно!

Доброе утро уважаемые!  
Помогите с макросом пжл. Условие в примере.  
Спасибо!

И синтаксис формулы не правильный  
=СУММПРОИЗВ((($A$2:$A$36)=$E$3)*(($B$2:$B$36)=$F$2)*($C$2:$C$36))

Присоединяюсь :)

{quote}{login=Владимир}{date=19.02.2010 04:15}{thema=}{post}А я только что выпил, но потому что сегодня пятница. Так я стресс снимаю после трудовой недели. Я служил на Дальнем Востоке в тайге под Комсомольском-на Амуре с мастерком и лопатой с 1987-89, т.к. нахамил в военкомате... Но я не об этом. Считаю, что ЗАЩИТНИК - это тот, кто в нужное время встанет на защиту Родины, семьи, девущки, чести, справедливости и совершенно неважно сжужил человек или нет. С Праздником Вас Уважаемые Защитники.{/post}{/quote}  
+ "стопицот".  
Присоединяюсь, всех мужчин, с наступающим!  
 
(84444) :)