Отправляет email-рассылки с помощью сервиса Sendsay

Профессиональные приемы работы в Microsoft Excel

Подписаться Бесплатная «Серебряная» новостная рассылка . Подписчиков 3.831 RSS
←   Май 2009   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31


За последние 60 дней ни разу не выходила


Сайт рассылки: http://msexcel.ru
Открыта: 17-06-2006
Адрес автора: job.education.exl-owner@subscribe.ru

Автор
serge_007.planetaexcel@mail.ru

Статистика

3.831 подписчиков
0 за неделю
←   Все выпуски   →

Профессиональные приемы работы в Microsoft Excel


Профессиональные приемы работы в Microsoft Excel

Выпуск 18
от 2009-05-08

Подписчиков: 5954

Рассылка сайта "Профессиональные приемы работы в Microsoft Excel"

Основные разделы сайта
Статьи
Форум

Новости сайта в формате RSS
Новые сообщения форума в формате RSS
Читать в Яндекс.Ленте

Порекомендуйте нашу рассылку друзьям

Обратная связь
Поддержка
(форум рассылки)

Наши рассылки:

Рассылки Subscribe.Ru
Православные:
Ежедневные библейские чтения
Смоленский календарь
Для выздоравливающих алкоголиков и наркоманов
Книга "День за днем"
Книга "24 часа в сутки"
Ежедневные размышления анонимного алкоголика
Самообразование:
"Профессиональные приемы работы в Microsoft Excel"

Наши сайты

Профессиональные приемы работы в Microsoft Excel
Excel от новичка до эксперта

bonifatiy.narod.ru
В помощь выздоравливающим алкоголикам и наркоманам

Собор Смоленских святых. Жития, иконы, календарь памятных дат Смоленской епархии.

StudentTools.Narod.Ru Для тех, кто любит учиться

Наши друзья

VBAtips.ru -
подсказки и решения на VBA

wordexpert.ru
Профессиональная работа с текстом

planetaexcel.ru
Когда заешь - все просто

Новые сообщения форума "Профессиональные приемы работы в Microsoft Excel"

Re: ВПР или все-таки макрос?
2009-05-01 03:39
Заново

Re: Переместительный закон у EXCEL'я
2009-05-01 09:25

может быть этому есть какое нибудь объяснение?

(cр)(link): Фактически источником ошибки является ошибка округления. Данная ошибка являет...

Re: Задачка. Этап2.
2009-05-01 12:02
Adar
В столбце К формула должна быть: =ЕСЛИ(ЕОШИБКА(ПОИСКПОЗ($A$2;ДВССЫЛ("XLS!A"&K1+1&":"&"$A$20000");0)+K1);"";ПОИСКПОЗ($A$2;ДВССЫЛ("XLS!A"&K1+1&":"&"$A$20000");0)+K1)
а не
 =ЕСЛИ(ЕОШИБКА(ПОИСКПОЗ($A$2;ДВССЫЛ("XLS!A"&K1+1&":"&"$A$1000")...

Re: формат вывода дробного числа
2009-05-01 16:40
Текст представления (формат) результата вычисления формулы нельзя (ещё раз) форматировать, если только не преобразовать его в значение (читай - текст): см. вложение.

Re: формат вывода дробного числа
2009-05-01 16:58
ничего себе, даже с кнопочкой) спасибо.

Re: Как вставить столбик с формулами сразу на 50 листов?
2009-05-01 17:13
Спасибо! все так просто оказалось)

Перенос цвета с одного листа на другой
2009-05-01 18:14
Не пойму что происходит... Есть каталог товаров в котором некоторые строки раскрашены. На лист накладной пишутся номера товаров и кол-во, туда же автоматом переносится инфа по позициям и цвет, если в каталоге эти товары выкрашены. Все вроде ОК. Но! Поя...

Re: Перенос цвета с одного листа на другой
2009-05-01 18:40
Хм. Однако не только от отрицательных значений...  Обеспокоенный

Автоматическая группировка по условию
2009-05-01 20:36
Возможно я слишком поспешно обращаюсь за помощью и ларчик открывается просто, но что-то даже пока ничего в голову. На протяжении недели качаю файлы на диск, а на выходных записываю их на диски, дабы освободить место. Составляю список файлов программой ...

Re: Автоматическая группировка по условию
2009-05-02 00:04
посмотрите вот эту тему - не совсем то, что Вам нужно, но похоже.

Re: Задачка. Этап2.
2009-05-02 01:08
да спасибо, я уже разобрался я опять про столбик К забывал и там диапазон не менял

Re: Автоматическая группировка по условию
2009-05-02 01:35
Почти все записано макрорекодером. При полном заполнении столбца А (25 значений) думает минут 5. Потому что с использованием надстройки "Поиск решения". В VB нужно поставить галочку в Tools - References - SOLVER и перезапустить Excel.

Своные таблицы Excel 2003
2009-05-02 12:20
Люди помогите Обеспокоенный
Подскажите где можно найти информацыю для курсовой на тему: Сводные таблицы в Excel
Желательно бесплатно и на Украинском языке.
Заране благадарю

Re: Сводные таблицы Excel 2003
2009-05-02 18:08
Может на оф. сайте пошукать?
"Отчеты сводных таблиц и сводных диаграмм"

Re: Автоматическая группировка по условию
2009-05-02 18:57

В VB нужно поставить галочку в Tools - References - SOLVER и перезапустить Excel.

У меня, прежде чем заработало, пришлось отключить ссылку на SOLVER, сохранить, закрыть, от...

Re: Автоматическая группировка по условию
2009-05-02 19:21
Спасибо большое за ответы. В действительности всё не так просто как я предполагал.
_Boroda_ - Т.е. ход моих мыслей был правильный - нужен был Поиск решения? Как я понял алгоритм - он группирует один диск максимально приближённый к размеру, потом из ос...

Re: Автоматическая группировка по условию
2009-05-02 19:32

У меня один раз сработал, а второй раз выдал ошибку в     For i = LBound(v) To UBound(v) - 18 строка...
вы не могли бы немного прокомментировать по возможности алгоритм работы?[/quote...

Re: Автоматическая группировка по условию
2009-05-02 20:07
Хорош примерчик! Вот если бы доделать его немного, например добавить кнопочку СБРОС для очистки результатов, да и сам диапазон вывода результатов сместить куда-нибудь вправо, так как при больших диапазонах данных он их пересекает. Было бы неплохо чтобы...

Re: Автоматическая группировка по условию
2009-05-02 21:29

Вот если бы доделать его немного, например добавить кнопочку СБРОС для очистки результатов, да и сам диапазон вывода результатов сместить куда-нибудь вправо, так как при больших диап...

Re: Взаимосвязь между ячейкой и TextBox
2009-05-02 21:41
Если в свойстве ControlSource TextBox'а прописано Вимога!D4, то ячейка изменится после закрытия формы. Для параллельного отображения можно написать так:
[code]Private Sub TextBox1_Change()
  Sheets("Вимога").[D4] = TextBox1
En...

Re: Автоматическая группировка по условию
2009-05-02 22:00
Круто! Даже лучше чем ожидалось! +1 к карме и без того гигантской  Веселый

...Насчёт пределов отклонений не понял – как они впишутся, если у нас и так неточное совпадение?
...

Re: Взаимосвязь между ячейкой и TextBox
2009-05-02 22:17

Код:
Private Sub TextBox1_Change()
TextBox1.ControlSource = "Вимога!D4"
'Sheets("Вимога").[D4] = TextBox1
End Sub
Данные из ячейки переноситься в TextBox но не изменяются

Re: Взаимосвязь между ячейкой и TextBox
2009-05-02 22:22

Код:
Private Sub TextBox1_Change()
Sheets("Вимога").[D4] = TextBox1
End Sub
Private Sub UserForm_Activate()
TextBox1.ControlSource = "Вимога!D4"
End Sub
Так работает!

О разделе
2009-05-02 23:52
Вопросы, порой одни и те же, ответы, порой F1… но среди них выделяются также целые проекты и удобные инструменты, рождённые совместным творчеством, которые я и решил вынести в отдельный раздел.
А бывает и так: "У меня есть реализованная задача в виде н...

Ширина столбцов
2009-05-03 13:20
Уважаемые ЗНАТОКИ.
Я не смог решить поставленую  перед самим собой  задачу. Есть две-три таблицы расположеные на одном листе,  как задать ширину столбцов в каждой таблице отдельно, чтоб при их изменении ширина менялась только в той таблице которой мне ...

Re: Ширина столбцов
2009-05-03 18:39
Такое возможно только объединением ячеек, хотя могу и ошибаться, с "оформлением" мало работал.

Re: даты и рег.настройки в Excel
2009-05-03 21:08
Ну это какая-то ерунда в экселе самом... если "пробежаться" по полям - они прекрасно воспринимаются как даты, само собой Улыбка Согласен, вероятно, этот столбец воспринялся внутри как-то иначе, не как дата. Просто проблема-то в том, что штатный механизм ук...

Re: Автоматическая группировка по условию
2009-05-03 21:47

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

Подсчитать количество букв "D" в тексте...
2009-05-04 11:31
Здравствуйте...
В ячейке есть текст (WWWLDDWDLWDW), хочу подсчитать количество букв "D" в данном тексте.
Как это сделать...
Если не трудно я прикреплю пример, посмотрите пожалуста и выложите если у кого получиться...

Заранее спасибо...

Re: Подсчитать количество букв "D" в тексте...
2009-05-04 11:49
Банально: =ДЛСТР(B7)-ДЛСТР(ПОДСТАВИТЬ(B7;"D";""))

B7 - это ячейка с текстом, Ваш пример не скачивал, времени нет.

Re: Подсчитать количество букв "D" в тексте...
2009-05-04 14:04
спасибо больщое

Указать в одной ячейке данные из стольбца
2009-05-04 14:10
подскажите как сделать так чтоб в одной ячейке указать данные из столбца.
какую формулу использовать а в ячейку "D1", чтобы записалоась данные с столбца "С"
примерно так:

   | С  |  D
__________________
1 |  W | WWWDLDW
2 |  W |
3 |  W |
4 |  D  |
5 |...

Re: Ширина столбцов
2009-05-04 14:13

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

Сводная таблица
2009-05-04 14:14
Помогите начинающему. Подскажите плиз как сделать сводную таблицу по трем листам. Желательно в Excel 2003. Файл прикладываю. 1_кв это сводная вручную.

Re: Указать в одной ячейке данные из стольбца
2009-05-04 14:24
Лови пользовательскую функцию:

Код:
Function СЦЕПСТОЛБ(Столбец As Range) As String
  СЦЕПСТОЛБ = Join(Application.Transpose(Столбец), "")
End Function

Используем как обычно:
  • =СЦЕПСТОЛБ(C2:C7)

Re: Указать в одной ячейке данные из стольбца
2009-05-04 14:43
я не оч понимаю Excel...
извиняюсь но не могли бы на прикрепленном файле покозать пример?
Заранее спасибо...

Re: Указать в одной ячейке данные из стольбца
2009-05-04 14:47
Ой спасибо, поблучилось, не тратьте время на пример...
огромное спасибо

Re: Указать в одной ячейке данные из стольбца
2009-05-04 15:02
Пожалуйста.
Как вариант, можно просто прописать и протянуть вниз такую сцеплялку:

  • D1: =C1&D2

Поиск слова по ячейкам с предложениями.
2009-05-04 18:35
Опять я :-)
Учу английский язык параллельно с любимым экселем. И вот пришла в голову мысля немного совместить эти вещи.
При изучении отдельных слов очень хороший результат даёт просмотр различных фраз, где это слово задействовано. Примеры в словаре не...

Re: Поиск слова по ячейкам с предложениями.
2009-05-04 18:50

хотел бы сделать такую функцию, чтобы находить предложения в которых ещё встречается интересующее меня слово далее по тексту.

А если фильтрануть как в теме [url=http://forum.m...

Re: Поиск слова по ячейкам с предложениями.
2009-05-04 19:15
Просто к слову... Если искомое сочетание символов, в данном случае англицкое слово, окружить символом "*", то можно использовать ПОИСКПОЗ(), в условном форматировании также Подмигивающий, например =ЕСЛИ(ЕОШИБКА(ПОИСК("*"&$B$2&"*";A11));0;1)=1  и выбрать нужный фо...

Re: Поиск слова по ячейкам с предложениями.
2009-05-04 19:28
Необходимо выделить массив для поиска и в условном форматировании написать формулу =ЕЧИСЛО(ПОИСК($B$2;A11))=ИСТИНА, выбрать нужный формат, ОК

Re: Поиск слова по ячейкам с предложениями.
2009-05-04 19:32
За Китманом не угонисся. Практически то же самое.

СУММЕСЛИ нечувствительна к регистру текстовых данных
2009-05-04 21:09
Добрый вечер.
Возникла проблемка.

Имеется выгруженный из 1С реестр сельхозработ. В нем одна из колонок -название операции, другая - факт(объем) ее выполнения еще одна - название подразделения холдинга.
Пользователи в разных предприятиях холдинга имели ...

Re: СУММЕСЛИ нечувствительна к регистру текстовых данных
2009-05-04 21:17
ЗЫ. "Подкрутить" к СУММЕСЛИМН функцию СОВПАД мне не удалось. Можеь как то можно?

Re: СУММЕСЛИ нечувствительна к регистру текстовых данных
2009-05-04 21:41
Функция =ПОИСК() к регистру нечувствительна, можно обработать данные функциями =ПРОПИСН() и =СТРОЧН(). Честно говоря, без примера, не совсем понятно чего Вы хотите добиться.

Re: СУММЕСЛИ нечувствительна к регистру текстовых данных
2009-05-04 22:10
См. файл. Это "обрезанный" пример

Re: СУММЕСЛИ нечувствительна к регистру текстовых данных
2009-05-04 22:39
Можно использовать 3 варианта формул массива. Если на Лист1 строк много и добавляется каждый день помногу, то нужно делать динамический диапазон, если добавляется не помногу, то можно использовать второй вариант (с ЕСЛИ), если массив статический - то п...

Re: СУММЕСЛИ нечувствительна к регистру текстовых данных
2009-05-04 22:52
Большое спасибо.

А то я с массивами зациклился на той же структуре формулы, как было в СУММЕСЛИ. Типа такого
 {=СУММ((импорт!$G$2:$G$2539='Трансф табл работ'!$A13)*(импорт!$C$2:$C$2539='Трансф табл работ'!G$1)*импорт!$K$2:$K$2539)}

С динамическим масс...

Re: СУММЕСЛИ нечувствительна к регистру текстовых данных
2009-05-04 22:56
_Borroda_
А может =НАЙТИ() на =ПОИСК() заменить? Подмигивающий

Re: СУММЕСЛИ нечувствительна к регистру текстовых данных
2009-05-04 23:00
ПОИСК не реагирует на регистр, а НАЙТИ - реагирует

Re: СУММЕСЛИ нечувствительна к регистру текстовых данных
2009-05-04 23:11
Прошу прощения за оффтопчик, вопрос к автору: чем сельхозоперация "Боронование" отличается от "боронование"? Обеспокоенный

Re: Сводная таблица
2009-05-04 23:35
При создании сводных таблиц на основе данных, находящихся в нескольких диапазонах консолидации, не все обычные функции сводной таблицы работают, поэтому получилось только так. Все завязано на столбце D (скрыт).

Re: Сводная таблица
2009-05-05 09:25
Спасибо _Boroda_ буду разбираться.

Re: Как в функцию передать переменные из макроса?
2009-05-05 10:02
Ваша фраза не лишена смысла.

Re: СУММЕСЛИ нечувствительна к регистру текстовых данных
2009-05-05 10:24

Прошу прощения за оффтопчик, вопрос к автору: чем сельхозоперация "Боронование" отличается от "боронование"? Обеспокоенный

Вообще конечно, как собственно агроприем - ничем. Но в данно...

Re: СУММЕСЛИ нечувствительна к регистру текстовых данных
2009-05-05 11:45
Пришлось вставить еще проверку на длину строки, т.к есть в списке "Боронование" и есть например "Боронование С18".
Итоговая рабочая конструкция получилась {=СУММ(ЕСЛИ(ЕОШ(НАЙТИ($A2;импорт!$G$2:$G$10000));0;ЕСЛИ(импорт!$C$2:$C$10000=H$1;импорт!$K$2:$K$1...

Re: постоянно приходится проверять все формулы.копировать их.
2009-05-05 11:47
все работает. вроде и коды выставляет верно . не могли бы описать что именно делается в этой файле. что как обрабатывается?

Re: постоянно приходится проверять все формулы.копировать их.
2009-05-05 12:33

...не могли бы описать что именно делается в этой файле. что как обрабатывается?

Код находится в [abbr=правой кнопкой мыши по ярлычку листа -> Исходный текст]модуле листа[/abbr].

Выделение коэффициентов из текстового уравнения
2009-05-05 12:34

Добрый день!

Возник вопрос с прогнозами по трендам. С указанной пользовательской функцией VBА:
{Public Function Уравнение() Уравнение = ActiveSheet.ChartObjects(1).Chart.SeriesCollection(1).Trendlines(1).DataLabel.Text End Function} для вывода формул ...

Re: Перенос цвета с одного листа на другой
2009-05-05 12:56
Никто не поможет? Грустный Может как-то по-другому надо скрипт писать?

Почему при сравнении "С" < "р", а при сортировке "р" < "C"?
2009-05-05 13:08
Добрый день!
Подскажите, почему при f1=СТС и f2=Стройтрест следующий код дает ИСТИНУ, т.е. "С" < "р". :

Код:
If f1 < f2 Then
Подозреваю, что дело тут в регистре, причем при сортировке СТС находится ниже чем Стройтрест. Где-то в коде надо про...

Шаблон счета, необходимо автоматическое подтягивание сменных значений
2009-05-05 13:44
есть таблица с данными - дата, номер, сумма
всего строк - 100

есть шаблон счета
нужно сформировать 100 счетов, каждый счет должен подтягивать данные с таблицы (с одной строчки)

новые счета нужно разместить для печати на одной странице один счет.

Спасиб...

Re: Почему при сравнении &quot;С&quot; &lt; &quot;р&quot;, а при сортировке &quot;р&quot; &lt; &quot;C&quot;?
2009-05-05 13:50
Вес спасибо, разобрался сам!
Надо подставить перед макросом "Option Compare Text" для текстового сравнения.

Re: Шаблон счета, необходимо автоматическое подтягивание сменных значений
2009-05-05 15:21
Спасибо! сейчас попробую.

 Улыбка

Re: Шаблон счета, необходимо автоматическое подтягивание сменных значений
2009-05-05 15:25
Пожалуйста.
Если сформированные счета нужно сохранить, то вот ещё очень похожий пример: "Заполнение формы по условию".

Re: постоянно приходится проверять все формулы.копировать их.
2009-05-05 15:47
к моему ужасу я не понимаю его. все времени не хватает попытаться разобраться в этом. мне бы пока на словах

Re: Перенос цвета с одного листа на другой
2009-05-05 16:05
Имеет смысл для каждой Cells прописать название листа:

Код:
Sheets("КЛИЕНТЫ").Cells(i, 2)

Это, кстати, можно сделать через Ctrl+f -> Replace…

Re: постоянно приходится проверять все формулы.копировать их.
2009-05-05 16:29
Процедура Worksheet_Change реагирует на любое изменение в любом диапазоне (Target). Диапазоном может быть одна ячейка. Пока мы не трогаем диапазон "M6:AJ8", реакции не последует: за это отвечает проверка пересечения I...

Re: Перенос цвета с одного листа на другой
2009-05-05 17:18
Блин как все просто! Огромное спасибо! Работает без сбоев!

Re: Поиск слова по ячейкам с предложениями.
2009-05-05 18:24
Спасибо! Не совсем то, что я хотел, но натолкнуло на мысль, правда не очень идеальную, но рабочую.

Selection.Find
2009-05-05 23:40

Возник вопрос: как в определенном столбце (J) можно найти значение из конкретной ячейки (G1), при этом значение в ячейке постоянно меняется.  Пытюсь сделать так:
....
g=Range("G1")                                        'присваиваю переменной ячейку с...

Re: постоянно приходится проверять все формулы.копировать их.
2009-05-06 07:42
действительно абсолютность ссылки была излишней. да и с отображение получаса и часа спасибо - сам определял эти числа путем вычитание одной даты из другой. (как говорится легких путей не ищем).
 вот изменил одновременно значения ячеек "M6" и "AJ6" так ...

Re: Почему при сравнении &quot;С&quot; &lt; &quot;р&quot;, а при сортировке &quot;р&quot; &lt; &quot;C&quot;?
2009-05-06 08:33
Да, перед присваиванием прописал Lcase и тоже работает!
f1 = LCase(Cells(s, st1)): f2 = LCase(Cells(s, st2))

Re: Selection.Find
2009-05-06 09:36

наверное из-за What:=g.value

Либо так:
Код:
Set g = Range("G1")
…What:=g.Value…

Либо так:
Код:
g = Range("G1")
…What:=g,...

Бэкап книги
2009-05-06 10:24
Всем здравствуйте.
Интересует возможность создания бэкапа книги при определенных условиях. Книга редактируется каждый день.
Имеются ввиду такие случаи, когда нечаянно на листе удаляется большая часть данных и потом тупо жмется сохранить. ...

Re: Selection.Find
2009-05-06 16:18
Либо так:

Код:
Set g = Range("G1")
…What:=g.Value…

Либо так:
Код:
g = Range("G1")
…What:=g,...
[/quote]

Set действительно нужно было, это я забыла, но все равно не получается...error 91

Re: Selection.Find
2009-05-06 16:45

все равно не получается...error 91

Это значит "Искомая часть (LookAt:=xlPart) в формулах (LookIn:=xlFormulas) выделенного диапазона не найдена".

Re: Три файла XLS
2009-05-06 19:21
Надеюсь, Вы вынесете из этого кода что-нибудь полезное Подмигивающий

[code]Sub SHD_Образец()
    Application.ScreenUpdating = False 'закрыли глаза
    'создали книгу с одним листом, присвоив ссылку
    Set myBook = Workbooks.Add(xlWBATWorksheet)
    'сохранили в ...

Re: Три файла XLS
2009-05-06 19:41
Да, немного помогло  Улыбка
Вот еще нашел такое :

В VBA нет метода получения значения из закртыго файла рабочей книги. Но можно воспользоваться возможностью управления ссылками на файлы. Функция которая получает значения из закрытой книги, выполняется в ре...

Re: Три файла XLS
2009-05-06 19:52

В VBA нет метода получения значения из закртыго файла рабочей книги.

А как же ADO?

Re: Три файла XLS
2009-05-06 20:05
Никто ж не спорит Улыбка
Только хочется ж красиво

Re: Три файла XLS
2009-05-06 20:46

Но когда пробую вызвать функцию из своей процедуры пишет ошибку
Sub or Function not defined

Потому что опечатка в названии функции Getvalue.

Re: Бэкап книги
2009-05-07 06:33

...
1. Создание копии с нужным именем.
2. Сохранение такого файла под другим именем автоматически
3. Уведомление юзера об возможно произведенных случайно неправильных манипуляция...

Сброс счетчика листов
2009-05-07 13:04
Добрый день/вечер/утро.
Кто-нибудь знает,как сбрасывать счетчик листов, чтобы после многократного добавления/удаления листов новый лист создавался не с именем "лист165" а с именем последний существующий лист+1.Если есть вариант - из VBA

Re: Ячейки одного цвета
2009-05-07 13:18

необходимо подсчитать количество ячеек определенного цвета заливки и отдельно кол-во ячеек определенного цвета текста.

Выделите диапазон, в котором хотите посчитать, заполните...

Суммирование колонки с меняющимся количеством ячеек
2009-05-07 13:41
Такой вот вопрос: использую функцию СУММЕСЛИ(Диапазон1;Критерий;Диапазон2), причём Диапазон1 и Диапазон2 должны каждый день увеличиваться. Как сделать, чтобы не попровлять их вручную?? Как вариант - пусть смотрит всю колонку и в диапазон включает все я...

Re: Суммирование колонки с меняющимся количеством ячеек
2009-05-07 13:48
А что мешает сразу весь столбец прописать в оба диапазона?

Re: Суммирование колонки с меняющимся количеством ячеек
2009-05-07 13:54

А что мешает сразу весь столбец прописать в оба диапазона?
Наверно, щепетильность. Подмигивающий

Если список начинается, например, с пятой строки первого столбца, то формул...

Re: Ячейки одного цвета
2009-05-07 14:13

количество самих ячеек нет.

Так если в каждой ячейке будет по единичке, то сумма и будет количеством. Подмигивающий

Re: Ячейки одного цвета
2009-05-07 14:26
Отлично, только у меня ячейки не пустые, а с некоторыми данными.

Re: Сброс счетчика листов
2009-05-07 14:30
У меня счетчик листов сбрасывается после закрытия-открытия книги (файла).
Т.е. добавил любой кол-во листов, сохранил, закрыл книгу. Открыл, добавляю лист, Excel называет новый лист Листх,
где х минимальный свободный в данный момент номер листа.

Re: Ячейки одного цвета
2009-05-07 15:16

Отлично, ...

А чтоб было совсем отлично, пропишем единичку в коде:
[code]    'If IsNumeric(i) Then Zn = i Else Zn = 0 'вместо этой строки
     Zn = 1                          ...

Re: Ячейки одного цвета
2009-05-07 15:26
Спасибо, друг. Все получилось.

связь двух файлов в Ecel 2007
2009-05-07 17:45
Доброго времени суток!
Есть файл sklad.xls вида (порядка 200 позиций):

A                                 B                  C
код                   наименование       количество           
120.00.01            Деталь 1                 55
120.00.02    ...

На сегодня все. До встречи на следующей неделе.
В избранное