{quote}{login=}{date=26.07.2011 10:27}{thema=}{post}=ВПР(C5;{0;0,6:8;0,8:12;1};2)  
=ПРОСМОТР(C5;{0:8:12};{0,6:0,8:1})  
 
формат ячейки процентный{/post}{/quote}  
 
ребята спасибо! работает :)

Доброе утро всем, Почему не работает не пойму помогите плизз, надо следуещее если меняется стаж:  
до 8 - 60%  
8-12 80%  
12-100%  
 
СПАСИБО ВСЕМ ЗАРАНЕЕ

{quote}{login=Микки}{date=16.02.2010 09:53}{thema=}{post}С полом так будет{/post}{/quote}  
 
Спасибо вам Огромное!!!Вы меня просто спасли от гибели!!!! :)

{quote}{login=The_Prist}{date=16.02.2010 09:51}{thema=}{post}Вот Вам одна формула на все ячейки.{/post}{/quote}  
 
Ничего себе формула :)))))))    
Спасибо большое!!!

{quote}{login=Микки}{date=16.02.2010 09:47}{thema=}{post}Честно говоря необходимости таблицы не вижу пол можно и в две строки посчитать{/post}{/quote}  
 
дело в том что, пол да еще и по возврасту,Статисты издеваются :(

{quote}{login=Микки}{date=16.02.2010 09:41}{thema=Re: Re: }{post}{quote}{login=nika}{date=16.02.2010 09:38}{thema=Re: }{post}{quote}{login=Микки}{date=16.02.2010 09:35}{thema=}{post}Так-что-ли?{/post}{/quote}  
 
Ну вроде да,СПАСИБКИ Ща попробую :){/post}{/quote}  
Вам нужна одна строка или таблица? если таблица то формула проще...{/post}{/quote}  
 
да,да,да Таблица...

{quote}{login=Микки}{date=16.02.2010 09:35}{thema=}{post}Так-что-ли?{/post}{/quote}  
 
Формула супер,спасибо! а нельзя сделать так но по-строчно напротив каждой даты,а то мне еще надо будет считать сколько из них Мужчин и женщин...  
:)

{quote}{login=Микки}{date=16.02.2010 09:35}{thema=}{post}Так-что-ли?{/post}{/quote}  
 
Ну вроде да,СПАСИБКИ Ща попробую :)

{quote}{login=Serge 007}{date=16.02.2010 09:30}{thema=}{post}А как надо?  
Примерчик поясней давайте.{/post}{/quote}  
 
Ну мне нужно посчитать сколько человек по возврастным категориям,а эта формула дает не совсем то.Нуно чтобы в итоге получилось так...

{quote}{login=Serge 007}{date=16.02.2010 09:24}{thema=}{post}Для Е2 =ЕСЛИ(И(C2<19;C2>15);C2;"")  
Так?{/post}{/quote}  
 
ну что-то не совсем так..

Доброе утро,  
Помогите пожалуйсто,что можно придумать если нужно сделать статист.отчет по возврасту если от 15 до 19 в одни столбик 20-24 в другой ну и тд.Фаил прикрепляю.Помагите плиз,очень нужно :)

{quote}{login=Dophin}{date=15.02.2010 09:35}{thema=}{post}=ЕСЛИ(age<25;1;2){/post}{/quote}  
 
 
СПАСИБКИ Разобралась!!!

ну и что >25 показывает 2 а нужно 1 а если > 30 то 2

Доброе время суток!  
Ребята,плиз помогите разобраться,нужно используя формулу IF <> если возвраст больше 25 то значение 1 если меньше то 2,у меня почему-то FALSE получается.  
Прикрепляю фаил.Спасибки всем заранее....

{quote}{login=Serge 007}{date=19.01.2010 04:03}{thema=}{post}Слушайте советы :-){/post}{/  
 
Спасибо ВСЕМ!!!!

{quote}{login=nika}{date=19.01.2010 03:30}{thema=Re: Вот с примером}{post}{quote}{login=Alexander_V}{date=19.01.2010 12:11}{thema=Вот с примером}{post}см приложение{/post}{/quote}  
 
 
Спасибо Огромное...работает :){/post}{/quote}  
 
 
:( не все работает...  
 
Просидела весь день вот пример... может кто нибудь сжалится.

{quote}{login=Alexander_V}{date=19.01.2010 12:11}{thema=Вот с примером}{post}см приложение{/post}{/quote}  
 
 
Спасибо Огромное...работает :)

Всем привет,  
Люди!!! помагите пожалуйсто, делаю репорт при выгрузке с программы в Exell суммы, скажем тысячные от сот отделяются пробелом (например 1 200,35) Подскажите как убрать пробел автоматически т.к. их много...

Есть готовый вариант базу данных.Создан на 20 страниц.Допустим,внесем новых людей и их будет уже не 20,а 5,10,15...как удалить автоматически оставшиеся пустые строки?  
Вторая проблема.Ка видно.Взависимости от того,сколько человек в списке,столько и создается новых листов.Так что нужно,чтобы автоматически при введении 5,10 и т.д.человек создавалось соответственно столько же листов.  
Третья проблема.Нужно склонять автоматически все фамилии(удостоверение выдается тому-то...)  
Ой...помогите пожалуйста.Только изучаю все это...голова кругомНичего не понятно..:(  
p.s.-снятие блокировки с страниц-KK(на английском)

все это производится программно. проблема в том что не копируются если выбирать xlPasteValuesAndNumberFormats  
и xlPasteFormats. Все встает нормально, НО без диаграмм(((

И снова помогите пожалуйста!!!  
При автоматическом копировании целиком листа в ячейках с формулами типа СУММЕСЛИ и т.п. выходит ошибка #Знач. Убрать эту ошибку можно если "провалиться" в исходный файл (по двойному клику на ячейку). При изменении в листе формата под печать ссылки опять съезжают и все приходится проделывать снова.  
Копировать спец.вставкой - значение, не получается - вылезает та же ошибка. Пробовала на исходный и на этот файл вешать перед копированием запрет на обновление UpdateLinks и на Calculate - ничего.  
Можно ли как то копировать только значение, которое в исходнике, без его обновления?  
спасибо!

Добавила параметр - индекс последнего активного листа книги Print. И заменила .Sheets(.Sheets.Count) на .Sheets(ИндексАктивногоЛиста). Ниже индекс еще раз переприсваивается - уже на только что созданный лист. При след.копировании этот лист уже становится последним.    
По умолчанию - книга Print не является активной и с ней не производится другой работы, кроме как добавление листов.

Всем спасибо! Вопрос решен.

в коде не работает вставка after, если оставить add без after - работает. КАК обойти это момент. Нужно вставлять новые листы только в конец.  
Книга новая, не та в которой запущен макрос.

Помогите пожалуйста! Пытаюсь в цикле создать и скопивать листы. Есть две книги - в копируемой книге (iFile) выделены, например, три листа (группа), их нужно в цикле скопировать в исходную книгу (Print.xls).  
Пытаюсь сделать реализацию через массив листов. Два первых листа - копирует все прекрасно. На третьем выдает ошибку Subscript out of range на второй строке кода. После debug лист добавляется и появляется новая ошибка Метод Select из класса Worksheet завершен неверно. Если этот селект поставить второй строкой, то ошибка тоже вылетит.  
 
While iL(n) <> 0 And n <> m  
 
With Workbooks("Print.xls")  
 .Sheets.Add after:=Sheets(.Sheets.Count)    
 istr = .ActiveSheet.Name  
 Workbooks(iFile).Sheets(iL(n)).Select  
 Workbooks(iFile).Sheets(iL(n)).Cells.Copy  
 .Sheets(istr).Cells.PasteSpecial  
 .Sheets(istr).Name = k + 1 & "_" & iL(n)  
End With  
 
n = n + 1  
Wend  
 
m - кол-во выделенных листов в ifile  
массив iL не динамический, часть элементов нулевые.

Вот СПАСИБО!!! Все работает!

Подскажите пожалуйста, мне нужно программно открыть файл. Таким образом открываю (через Workbook_Open() )- работает как часы.  
Set book = GetObject("C:\Documents and Settings\Nika\название_файла.xls", "Excel.Sheet")  
 
Но мне нужно чтобы в той книге, где записан вызывающий этот файл макрос, был в определенных ячейках прописан по частям путь (потому что он меняется).    
Соединяю директории и название вот таким образом:  
str1 = Worksheets("Лист").Range("b2").Text  
str2 = Worksheets("Лист").Range("b3").Text  
str3 = Chr(34) & str1 & str2 & Chr(34)  
где str-ы это путь и имя файла соответственно.  
 
Потом тупо пишу вот так    
Set book = GetObject(str3, "Excel.Sheet")  
 
и конечно оно не работает, потому что так не правильно...    
А КАК нужно? И можно ли вообще?  
СПАСИБО!

мне очень нужна Ваша помощь. Мне нужно постоянно экспортировать данные из EXCEL в MySql я делаю это вручную больше не могу, катастрофически не хватает времени. Пожалуйста помогите, заранее спасибо.