{quote}{login=АБВ}{date=07.01.2012 02:24}{thema=}{post}Макрос хороший всё работает.  
Почему-то при выводе на просмотр невидно некоторых строк.  
Приходится подгонять ячейку.  
Это не только в этом макросе, это наверно особенность Excel, когда много текста вставлено в ячейку.{/post}{/quote}  
Да, это особенность excel, Вы правы. А когда совсем много текста - он еще и переносить по словам перестает. И ширина строки - имеет весьма осязаемые ограничения.

Здравствуйте. Возникла дополнительные вопросы.  
1. Что значит "переключить порядок фильтров"?  
2. В данном примере у вас отобраны все документы с 15 счетом, а потом отображены общие суммы по этим документам.  
3. Почему, если в реальной таблице документов тысячи, то их нельзя отфильтровать и запомнить? Что значит отфильтровать и где (или кому?) запомнить?  
 
Заранее спасибо.  
PS может Вам нужно просто поменять местами столбцы сводной таблицы Документ и счет и не ставить фильтра?

Прочитал сообщение несколько раз... Не понял... Открыл файл, посмотрел. Не понял... Перечитал еще раз сообщение... Всё равно не понял... Извините, я не понял... Что надо в итоге?

Определите последнюю заполненную ячейку, до нее растяните макросом так же, как и заполнили А3 В3 С3 (каков вопрос - таков ответ)

{quote}{login=годофвар}{date=03.01.2012 04:40}{thema=хитрый макрос}{post}Доброго времени суток. С наступившим вас новым годом.  
Нужен макрос который перезагружал систему, если такое не возможно , то всячески вводил юзверя в заблуждение и затруднение. Заранее благодарен{/post}{/quote}  
Хитрый ГодОфВар (БогВойны, наверно?)

Ну, как самое простое, открыть таблицу, найти нужного студента и поменять его номер на новый. Чем плох вариант?

А м.б. сводную применить? И всего 2 листа?  
На одном данные, а на другом - сводная.

шаг 1 сортируем лист с деталями и машинами по деталям  
шаг 2 на лист, в который будут вноситься номера деталей вешаем обработчик события  
 
Private Sub Worksheet_Change(ByVal Target As Range)  
End Sub    
 
шаг 3 по таргету определяем в нужном ли нам диапазоне произошел ввод данных  
шаг 4 ищем в листе с деталями номер детали  
шаг 5 пробегаем вниз в цикле до тех пор пока не наткнемся на новый номер детали и заполняем данными машин нужный нам диапазон

{quote}{login=MCH}{date=28.09.2011 02:09}{thema=}{post}Формула массива (вводится нажатием ctrl+shift+enter):  
=--ИЛИ(А1:А25<>0){/post}{/quote}  
Ввел как массив, выдала #ИМЯ?

Речь идет о зашифрованных данных? Пример есть?

{quote}{login=AKSENOV048}{date=28.09.2011 02:18}{thema="Как говорят программисты, любой код можно сократить как минимум на одну строчку."}{post}))) никак не сократиться?  
Private Sub CommandButton1_Click()    'OK  
   Dim iLastRow As Long  
   ... и т.д. ...  
   Unload Me  
End Sub{/post}{/quote}  
Да, вот именно.  
МОжно сократить как минимум на 1 строчку.  
Очевидно, что это - всего лишь шутка. Но Ваш код - точно можно сократить какминимум на несколько строчек. Читабельнее он от этого, ессно, не станет. Но, повторюсь, это - всего лишь шутка. А краткость - сестра таланта, но дочка лени и часто мать неразберихи.  
 
НАПРИМЕР (sheets(8), строка где-то 12):  
 
If Val(Me.TextBox33) > 0 Then  
.Cells(iLastRow, 12) = "ВОЗВРАТ " & Val(Me.TextBox33) 'возврат  
Else  
End If  
 
сокращаем на 1 строку  
 
If Val(Me.TextBox33) > 0 Then  
.Cells(iLastRow, 12) = "ВОЗВРАТ " & Val(Me.TextBox33) 'возврат  
End If  
 
сокращаем еще на 1 строку  
 
If Val(Me.TextBox33) > 0 Then .Cells(iLastRow, 12) = "ВОЗВРАТ " & Val(Me.TextBox33) 'возврат

Как говорят программисты, любой код можно сократить как минимум на одну строчку.

... или в глубинах microsoft...  
Вот и пожелание в раздел "Чего вам не хватает в Excel?"

1. А где сам esulima? (главное - тему замутить)  
2. А чем плохи сводные таблицы?  
(...эээ... риторические вопросы...)

Прикольно...

{quote}{login=Bas}{date=21.09.2010 12:05}{thema=Re: }{post}{quote}{login=}{date=21.09.2010 11:59}{thema=}{post}Выведите список на лист Excel и распечатайте{/post}{/quote}  
 
А как это сделать?{/post}{/quote}  
 
Например вот так...

М.б. попробовать... автоматический пересчет... ячеек отключить...

{quote}Юрий, я сделал сводной, но мне кажется здесь скорее тебе работа :-)  
Сводные до 2007 фиговы с выбором периода. Фактически его вручную задавать надо. Наверное макросом проще, тебе виднее.  
 
45 Кб{/post}{/quote}  
 
Уважаемый Serge 007,  
взял на себя смелость чуть доделать вашу сводную. Вы, наверно, именно это имели в виду, когда говорили про задавание периода вручную?  
Я добавил в исходную таблицу "логический" столбец и по нему выбираю записи, которые попадают (1) или нет (0) в заданный период.

Большое всем спасибо!!  
При замене 24 на 1, все действительно заработало лучше!!!

{quote}{login=слэн}{date=20.05.2008 10:34}{thema=Re: Re: Re: Re: Re: }{post}post}{/quote}  
а как проверялось - есть ли? :){/post}{/quote}  
Может и смешно. Но сочувствую нашим "мужчинам", которым приходит в голову задавать такие вопросы... Если природа обделила мужским половым признаком и что-то мешает причислить себя к женщинам, может, имеет смысл полечить голову?