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

Олег*>> UserForm Экселя поверх всех других окон


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

Выпуск 6
от 2011-02-18

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

Рассылка сайта "Профессиональные приемы работы в 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"



Олег*>> UserForm Экселя поверх всех других окон
2011-02-09 20:20 http://forum.msexcel.ru/profiles/oleg-u24862.html
Как добиться такого эффекта в среде VB я знаю. А как это "приспособить" к VBA? Подскажите, пожалуйста.


В VB поступаем вот так:

Пишем перед кодом формы:

Код:
Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Dim iTopMost As Boolean
Public Property Get TopMost() As Boolean
TopMost = iTopMost
End Property
Public Property Let TopMost(ByVal newValue As Boolean)
iTopMost = newValue
If iTopMost Then
Call SetWindowPos(hwnd, -1, 0, 0, 0, 0, 3)
Else
Call SetWindowPos(hwnd, -2, 0, 0, 0, 0, 3)
End If
End Property

Этим мы добавляем у формы свойство TopMost. Если оно True, то форма всегда поверх остальных, если False - то обычная. Просто пишем:
 
Код:
Form1.TopMost = True


FESH66>> Re: Как изменить цвет заливки строки по щелчку мыши
2011-02-09 21:30 http://forum.msexcel.ru/profiles/fesh66-u69293.html
То FESH66.  А почему сразу не описать задачу до конца? Возможно, были бы сразу предложены другие варианты решения Вашей задачи. Ну или конечное решение таким же образом. И не было бы подобных разборок.
Лично я подумал, что этот вопрос не серьезный и задан так, на всякий случай, а вдруг пригодится.  Улыбка

Приношу свои извинения за неконкретную постановку задачи. Впредь постараюсь выражать свои потаенные замыслы более ясно.

OlgaK>> Re: Построение графика функции
2011-02-09 21:34 http://forum.msexcel.ru/profiles/olgak-u64750.html
Спасибо за ответы!
Если я не ошибаюсь, то осью симметрии у параболы будет график функции х=-b/(2a), проходящий через ее вершину. С асимптотами для параболы я погорячилась, но у других графиков они есть.
По поводу надписей я пока не поняла как Вы это делаете?
Чуть позже обязательно отправлю вариант в файле, хотя, мне кажется Вы меня понимаете.
У меня 2003 версия программы.
Заранее спасибо!

Serge 007>> Re: UserForm Экселя поверх всех других окон
2011-02-09 23:43 http://forum.msexcel.ru/profiles/serge_007-u25260.html
См. файл. Так надо?

Олег*>> Re: UserForm Экселя поверх всех других окон
2011-02-10 00:10 http://forum.msexcel.ru/profiles/oleg-u24862.html
См. файл. Так надо?

Отлично! Огромное спасибо!
Единственное, что я подправил - изменил свойство формы ShowModal на False, чтобы можно было и со страницами Экселя работать, перемещая эту формочку туда, где она не мешает.

Serge 007>> Re: UserForm Экселя поверх всех других окон
2011-02-10 00:23 http://forum.msexcel.ru/profiles/serge_007-u25260.html
См. файл. Так надо?
Единственное, что я подправил - изменил свойство формы ShowModal на False, чтобы можно было и со страницами Экселя работать, перемещая эту формочку туда, где она не мешает.
А этого в постановки задачи не было Улыбка
Так что на ваше усмотрение Подмигивающий

Олег*>> Re: UserForm Экселя поверх всех других окон
2011-02-10 01:02 http://forum.msexcel.ru/profiles/oleg-u24862.html
А этого в постановки задачи не было Улыбка
Так что на ваше усмотрение Подмигивающий

Хотелось бы ещё, чтобы при перетаскивании этой формочки над окнами других программ,  не появлялось окно Экселя.  В смысле, чтобы другие окна не исчезали с экрана.
Наверно, для этого надо как-то изменить флаг SWP_NOMOVE?

_Boroda_>> Re: Построение графика функции
2011-02-10 01:43 http://forum.msexcel.ru/profiles/boroda-u12234.html
Посмотрите такой вариант

kimtan>> Re: Суммирование ячеек пo диапазону дат
2011-02-10 02:24 http://forum.msexcel.ru/profiles/kimtan-u12219.html
Попробуйте [abbr=Вводится через Ctrl+Shift+Enter]формулу массива[/abbr]:
=СУММЕСЛИ(ИНДЕКС('Журнал прихода'!$D$10:$D$32;ПОИСКПОЗ(;0/('Журнал прихода'!$B$10:$B$32>=$G$2);)):ИНДЕКС('Журнал прихода'!$D$10:$D$32;ПОИСКПОЗ(1;0/('Журнал прихода'!$B$10:$B$32<=$H$2)));D5;'Журнал прихода'!$E$10:$E$32)
Покажите преподавателю, возможно на него снизойдет озарение, что иногда через СУММПРОИЗВ() решать проще...

GWolf>> Re: Собрать обновляемый отчет из файлов
2011-02-10 07:23 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Доброго дня!

Начнем пожалуй:

Уточнение постановки задачи:
1) В файлах отделов заголовок всегда имеет шесть строк?
2) Поясните размещение файлов отделов и файла Директора?

Yull>> Re: Распределение данных в колонке
2011-02-10 11:35 http://forum.msexcel.ru/profiles/yull-u69361.html
вау!!! прикольно Шокирован
а теперь о насущном -с прав стороны вводим исх значения затем нужно их копировать в соседний столбец, там сортировка по убыванию потом жать галку и результат есть! -примерно так?

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

пысы -паасибки!

maragva>> макрос переноса данных из книги в книгу
2011-02-10 15:42 http://forum.msexcel.ru/profiles/maragva-u30446.html
Одна книга с итоговой таблицей. В другой книге прайс с фурнитурой. Там, где фурнитура, я галочками выбираю позиции.

Как можно сделать так, чтобы выбранные позиции скопировались в книгу с итогами?

MCH>> Re: Распределение данных в колонке
2011-02-10 17:20 http://forum.msexcel.ru/profiles/mch-u48782.html
Цитировать
что за формулы в первом столбце в скобках? -их не отредактировать сразу ошибка...
Это одна [abbr=Вводится через Ctrl+Shift+Enter]формула массива[/abbr] введенная сразу в весь диапазон, поэтому и редактировать ее нужно сразу во всем диапазоне целиком.
Формулы массива вводятся нажатием ctrl+shift+enter. Признаком формулы массива является ее заключение в фигурные скобки.
В столбце "В" также используются формулы массива.

Цитировать
а теперь о насущном -с прав стороны вводим исх значения затем нужно их копировать в соседний столбец, там сортировка по убыванию потом жать галку и результат есть! -примерно так?
Не совсем, я привел два варианта распределения исходных данных, для отсортированного массива и без сортировки, для отсортированного по убыванию массива данные более точно распределяются по группам.

Цитировать
можно ли в формулах в качестве диапазонов поставить весь столбец или придется ввести имена диап и увеличивать уже именной диапазон?
почему нет? можно конечно, см вложение.


maragva>> Re: макрос переноса данных из книги в книгу
2011-02-10 17:50 http://forum.msexcel.ru/profiles/maragva-u30446.html
Я немножко скорректировал.
В книге "фурнитура" выбранные данные макросом переносятся на третий лист.
А мне нужно перенести данные в другую книгу - "Расчет1", в середину итоговой таблицы.
Помогите подправить макрос, пожалуйста - сам не силен в vba.

Antonynsk>> Re: Собрать обновляемый отчет из файлов
2011-02-10 19:40 http://forum.msexcel.ru/profiles/antonynsk-u50298.html
Доброго!

1) Количество _строк_ различно и зависит от числа контрагентов (номеров подпунктов).
Количество столбцов - одинаково.

2) по задумке, файлы должны размещаться на сетевом диске, и стоит следующий вопрос:
- реально ли сделать, чтобы файл директора размещался в корне папки, к примеру G:\ot4eti\ а файлы отделов в месячных подпапках G:\ot4eti\январь(февраль, март и т.д.)\ и при считывании файлов отделов, в файле директора собирался отчет с различными месяцами на различных листах (лист1 - январь, лист2-февраль и т.д.)
- либо гораздо проще сделать, чтобы был свой файл директора в каждой месячной папке (G:\ot4eti\январь и т.д.\) и тогда на первом листе сделать что-то вроде кнопки, по нажатию которой запускался макрос, а на втором листе автособирался отчет.

спасибо.

OlgaK>> Re: Построение графика функции
2011-02-10 20:43 http://forum.msexcel.ru/profiles/olgak-u64750.html
Отлично! То что нужно!
Попробую теперь разобраться, как Вы это делаете.
А можно сделать так, чтобы на мониторах разных размеров лист отображался одинаково, т.е. на маленьких мониторах нужная информация не пряталась за края экрана?

_Boroda_>> Re: Построение графика функции
2011-02-10 22:43 http://forum.msexcel.ru/profiles/boroda-u12234.html
Цитировать
Попробую теперь разобраться, как Вы это делаете.
Будут вопросы - пишите.
Цитировать
А можно сделать так, чтобы на мониторах разных размеров лист отображался одинаково, т.е. на маленьких мониторах нужная информация не пряталась за края экрана?
Конечно можно. Но макросом. И тут возникает другая проблема - эти самые макросы должны быть разрешены. Может просто диаграммку поменьше размером сделать?

fido90>> Re: Заполнение формы сайта с помощь Excel
2011-02-11 00:45 http://forum.msexcel.ru/profiles/fido90-u68936.html
Товарищи ну может есть какая нибудь функция в макросе которая бы копировала данные из ячейки и потом уже выставить координаты в той же функции на каждую форму и так авто[abbr=Сокращённо от Скопировать -> Вставить]копипаст[/abbr]ом копировать в форму. Только как реализовать это.  Рот на замке Оч. нужно.

aTBepTKa>> Работа с двумя таблицами одновременно
2011-02-11 02:01 http://forum.msexcel.ru/profiles/atbeptka-u69896.html
Произвожу в экселе некоторые вычисления. Появилась необходимость создать вторую таблицу, которая имеет много ячеек, зависимых от первой. Поэтому нужно чтобы обе таблицы были перед глазами. Разместить таблицы одну под одной на одном листе не представляется возможным, т.к. нарушиться требуемая ширина ячеек. По этой же причине не получается расположить вторую  таблицу справа или слева от первой (нарушиться высота ячеек), но все же пришлось воспользоваться последним способом, т.к. постоянно переключаться с одного листа на другой совсем не удобно. На вложении 1 видно, что таблицы расположены косо-криво относительно друг друга. Хотелось бы что бы все выглядело аккуратненько.
В идеале было бы обзавестись кнопочкой, которая позволяет видеть перед собой сразу два листа, принадлежащих одной книге. Как во вложении 2, но там, к сожалению, две разные книги, что не позволяет без проблем всё хранить в одном файле. Так же можно было бы как-нибудь по-хитрому расположить таблицы одна под одной в одн...

Aura-AD>> Уравнение циклом и график
2011-02-11 05:45 http://forum.msexcel.ru/profiles/auraad-u69967.html
Привет, проблема следующая, не могу понять как сделать цикл для функции и построить точечный график. Точнее получается тупым методом решить(см. приложение), но о цикле нету и речи, а надо именно им
Задача шаг 0.1 а=-3.1 t=ПИ/2 на интервале x [1;2]

Хотя бы направление , как сделать то так

GWolf>> Re: Собрать обновляемый отчет из файлов
2011-02-11 07:26 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Доброго!

1) Количество _строк_ различно и зависит от числа контрагентов (номеров подпунктов).
Количество столбцов - одинаково.

2) по задумке, файлы должны размещаться на сетевом диске, и стоит следующий вопрос:
- реально ли сделать, чтобы файл директора размещался в корне папки, к примеру G:\ot4eti\ а файлы отделов в месячных подпапках G:\ot4eti\январь(февраль, март и т.д.)\ и при считывании файлов отделов, в файле директора собирался отчет с различными месяцами на различных листах (лист1 - январь, лист2-февраль и т.д.)
- либо гораздо проще сделать, чтобы был свой файл директора в каждой месячной папке (G:\ot4eti\январь и т.д.\) и тогда на первом листе сделать что-то вроде кнопки, по нажатию которой запускался макрос, а на втором листе автособирался отчет.

спасибо.

Уважаемый Antonynsk!

1) пожалуйста обратите внимание, я спрашивал про заголовок, т.е. строки с 1-й по 6-ю! Всегда ли их шесть, ведь там е...

GWolf>> Re: Заполнение формы сайта с помощь Excel
2011-02-11 07:37 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Товарищи ну может есть какая нибудь функция в макросе которая бы копировала данные из ячейки и потом уже выставить координаты в той же функции на каждую форму и так авто[abbr=Сокращённо от Скопировать -> Вставить]копипаст[/abbr]ом копировать в форму. Только как реализовать это.  Рот на замке Оч. нужно.

Если очень надо ... Вот тут \\http://otvety.google.ru/otvety/thread?tid=57c93811315c928b&hl=ru пример реализации. Может подойдет!?

nilem>> Re: Работа с двумя таблицами одновременно
2011-02-11 08:07 http://forum.msexcel.ru/profiles/nilem-u30547.html
Для Е2007(10): вкладка Вид - Новое окно - Упорядочить все - Рядом - Ок.
В новом окне выбрать другой лист. Для 2003 точно не скажу, но примерно также.

nilem>> Re: Уравнение циклом и график
2011-02-11 08:37 http://forum.msexcel.ru/profiles/nilem-u30547.html
Так что ли:
Код:
Sub grafik()
Dim xy(1 To 11, 1 To 2), x As Double, j As Long
Const a As Double = -3.1
Dim t As Double: t = WorksheetFunction.pi / 2
For x = 1 To 2.1 Step 0.1
    j = j + 1
    xy(j, 1) = x
    xy(j, 2) = a * Exp(2 * x * t) * Cos(WorksheetFunction.pi / 2 + t)
Next x
[f13:g13].Resize(j).Value = xy
End Sub


Aura-AD>> Re: Уравнение циклом и график
2011-02-11 09:47 http://forum.msexcel.ru/profiles/auraad-u69967.html
Нет не так, без VBA, макросов или как там их. чисто средствами екселя...

shpakvi>> Re: Снятие пароля с файла стандартным методом
2011-02-11 10:34 http://forum.msexcel.ru/profiles/shpakvi-u11476.html
Большое Спасибо!!!! javascript:void(0);Теперь подобные штуки буду делать и фиксировать как сделал....javascript:void(0);

Виктория Зуева>> Re: Построение графика функции
2011-02-11 11:28 http://forum.msexcel.ru/profiles/buka3-u2668.html
Ольга, на вопросы - постараемся ответить.
По поводу "масштабирования" диаграммы - как вариант: просто вынести ее на отдельный лист. Тогда при просмотре в любом размере окна она будет уменьшаться - увеличиваться. Вот только с "привязкой" названий рядов я не пробовала.

Для _B_ :
Саша, посмотри, плиз, в 2003-м это работает?


_Boroda_>> Re: Построение графика функции
2011-02-11 12:18 http://forum.msexcel.ru/profiles/boroda-u12234.html
Цитировать
Для _B_ :
Саша, посмотри, плиз, в 2003-м это работает?

А я там и делал

Виктория Зуева>> Re: Построение графика функции
2011-02-11 12:25 http://forum.msexcel.ru/profiles/buka3-u2668.html
Для _B_ :
Я вижу, что твой файл формата 2003.
Я спросила про масштабирование и привязку "рисованных" и "сфотографированных" камерой объектов на вынесенной на отдельный лист диаграмме.
У меня в 2010-м всё получается. Надеюсь, что и в 2003-м тоже. Вот и попросила проверить...


_Boroda_>> Re: Построение графика функции
2011-02-11 12:52 http://forum.msexcel.ru/profiles/boroda-u12234.html
А, вот ты про что!
Проверить могу только дома. Там 2003. На работе 2007.
Кстати, обрати внимание, у меня на диаграмме нет посторонних объектов (ни рисованных, ни сфотографированных). Все штатными методами построения.

Hron>> Выделение связанных с ячейкой строк (справа и слева)
2011-02-11 13:00 http://forum.msexcel.ru/profiles/hron-u70010.html
Добрый день, форумчане.
Обращаюсь к Вам за помощью. Я обычный пользователь.

Есть таблица данных. Мне необходимо, чтобы при выделении (просто когда щелкаешь на ячейку мышкой) любой ячейки, все строки, находящиеся справа и слева от неё автоматически закрашивались цветом. Файл прилагается.
Например, я щелкаю на ячейку "Департамент маркетинга" и всё что слева и справа от него, а это 11 строк сами закрасились любым цветом (ну только не черным)).
При этом мне необходимо, чтобы эта возможность сохранялась после удалении каких-либо строк, либо после добавления.

Как это сделать? Можно пошагово? Или в прилагаемом мною файле реализовать эту функцию и выложить:)?

p.s. Я никогда не программировал в Excel.


_Boroda_>> Re: Выделение связанных с ячейкой строк (справа и слева)
2011-02-11 13:38 http://forum.msexcel.ru/profiles/boroda-u12234.html
Так?
Словами:при выделении ячейки снять заливку узором в "A1:AA1000"
считаем с какой строки и сколько строк в выделенном и выделяем узором со строки r вниз h строк
Код
Код:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Range("A1:AA1000").Interior
    .Pattern = xlSolid
    .PatternColorIndex = xlAutomatic
End With
r_ = Target.Row
h_ = Target.Rows.Count
With Range("A" & r_ & ":AA" & r_ + h_ - 1).Interior
    .Pattern = xlLightDown
    .PatternColorIndex = 3
End With
End Sub


Hron>> Re: Выделение связанных с ячейкой строк (справа и слева)
2011-02-11 14:38 http://forum.msexcel.ru/profiles/hron-u70010.html
Так?

Именно! Спасибо огромное.

А как именно это было реализовано? У нас тут коллеги заинтересовались алгоритмом... Всем понравилось...

Antonynsk>> Re: Собрать обновляемый отчет из файлов
2011-02-11 14:40 http://forum.msexcel.ru/profiles/antonynsk-u50298.html
Извините, не сразу понял суть вопроса.

1) да, шапка всегда будет одинаковая.
Если что-то и изменится, я, думаю, смогу разобраться в макросе и поменять диапазон строк.

2) да, он гораздо удобнее, но мне кажется сложнее в реализации. Если такое получится - я только за! Улыбка

Leksa>> В конце каждой ячейки нужно поставить запятую
2011-02-11 15:55 http://forum.msexcel.ru/profiles/leksa-u70031.html
Всем привет. Не пинайте сильно

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

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

Как это сделать не в ручную?

GWolf>> Re: В конце каждой ячейки нужно поставить запятую
2011-02-11 16:04 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Всем привет. Не пинайте сильно

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

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

Как это сделать не в ручную?

Уважаемый Leksa!

Спасибо, что обратились к нам, но ... мы сообщество людей РАБОТАЮЩИХ в Excel, а не медиумов. Может Вы все жже озадачитесь и ощасливите нас ПРИМЕРОМ, вида: Что есть и Что должно быть.
Поймите правильно, - ЭТО НЕ КАПРИЗ! Вы в теме, а мы нет! Увы!

Leksa>> Re: В конце каждой ячейки нужно поставить запятую
2011-02-11 16:23 http://forum.msexcel.ru/profiles/leksa-u70031.html
вот файл. В конце каждой ячейки нужно добавить запятую

iron priest>> Re: В конце каждой ячейки нужно поставить запятую
2011-02-11 16:38 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
см. приложение

GWolf>> Re: В конце каждой ячейки нужно поставить запятую
2011-02-11 16:38 http://forum.msexcel.ru/profiles/gwolf-u4652.html
1) В ячейку В161 пишем формулу: = A161 & ","
2) Затем копируем ее по столбцу В напротив каждой занятой ячейки столбца А.
3) Формула возвратит в ячейках столбца В записи вида: Yagovdik_av@mail.ru,
4) Остается Выделить блок ячеек в колонке В с возвращенными значениями и скопировать в колонку А, как значения

Правка - Копировать
Правка - Специальная вставка - значения.

Надеюсь, понятно объяснил?

Десант>> Перенос данных в другой файл
2011-02-11 16:52 http://forum.msexcel.ru/profiles/desant-u4301.html
Существует два файла: "А" и "В", со списками улиц и номерами. Строки в обоих файлах не совпадают, но расположені в одном столбце. В первом файле "А" напротив соответствующего адреса вносим текстовое значение в строке номер 6. Задание заключается в том, что бы автоматически осуществлялся поиск в другом файле "В" соответствующей улицы и в заданной строке (например в 8-ом) вносились изменения, которые заданы в первом файле.

Спасибо.

GWolf>> Re: Перенос данных в другой файл
2011-02-11 16:58 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Существует два файла: "А" и "В", со списками улиц и номерами. Строки в обоих файлах не совпадают, но расположені в одном столбце. В первом файле "А" напротив соответствующего адреса вносим текстовое значение в строке номер 6. Задание заключается в том, что бы автоматически осуществлялся поиск в другом файле "В" соответствующей улицы и в заданной строке (например в 8-ом) вносились изменения, которые заданы в первом файле.

Спасибо.

А за что Спасибо?
Неуж то нельзя пример приложить: Как есть и Чого трэба? Мы не медиумы. А так хотелось десанту помочь!!!

Десант>> Re: Перенос данных в другой файл
2011-02-11 17:05 http://forum.msexcel.ru/profiles/desant-u4301.html
Существует два файла: "А" и "В", со списками улиц и номерами. Строки в обоих файлах не совпадают, но расположені в одном столбце. В первом файле "А" напротив соответствующего адреса вносим текстовое значение в строке номер 6. Задание заключается в том, что бы автоматически осуществлялся поиск в другом файле "В" соответствующей улицы и в заданной строке (например в 8-ом) вносились изменения, которые заданы в первом файле.

Спасибо.

А за что Спасибо?
Неуж то нельзя пример приложить: Как есть и Чого трэба? Мы не медиумы. А так хотелось десанту помочь!!!
Гаразд, напишу українською, думаю ніхто в подальшому стібатись не буде, пишучи українські речення на російський манер.
Отже є один файл. Список вулиць із номерами будинку. Назва вулиці і номер знаходиться в одній ячейці. Навпроти даної ячейки вносимо назву ЖЕКу у стовбці "N". П...

fe2o3>> Дублирование Скрыть\Отобразить
2011-02-11 17:05 http://forum.msexcel.ru/profiles/fe2o3-u57921.html
Здравствуйте... Есть 2 одинаковых таблицы располагающиеся на листе1 и листе2 подскажите как сделать что бы при использовании команды скрыть\отобразить строку на листе1, скрываемая или отображаемая строка так же скрывалась или отображалась на листе2. извините за каламбур=)

Астроном>> Re: Установка галочек (флажков).
2011-02-11 17:08 http://forum.msexcel.ru/profiles/astronom-u8080.html
Может так?

Десант>> Re: Перенос данных в другой файл
2011-02-11 17:58 http://forum.msexcel.ru/profiles/desant-u4301.html
Ще раз більш детальніше усе опишу.
Отже є файл "Книга 1". В ньому потрібно внести назву ЖЕКУ в ячейці F10. "Бузковий" навпроти адреси Городоцька117. Необхідно, аби назва "Бузковий" генерувалась із файлом "Книга 2" у відповідній ячейці. Себто потрібно, аби в другому файлі по назві "Городоцька117" знайшлася ячейка в стовпчику "Н"

_Boroda_>> Re: Выделение связанных с ячейкой строк (справа и слева)
2011-02-11 18:11 http://forum.msexcel.ru/profiles/boroda-u12234.html
см. в предыдущем сообщении

Wasilic>> Re: Перенос данных в другой файл
2011-02-11 18:13 http://forum.msexcel.ru/profiles/wasilic-u24852.html
 Смеющийся Ув Десант,  Вас просили не язык описания задачи поменять, а приложить файлы для примера.  Нам что, самим составлять
Цитировать
Список вулиць із номерами будинку
для решения Вашей задачи.

PS. Да не картинку, а сами файлы. Оставьте в них только те листы что и на картинках, заархивируйте и приложите.
Или Вам решение тоже в виде катинки выложить?


Десант>> Re: Перенос данных в другой файл
2011-02-11 18:24 http://forum.msexcel.ru/profiles/desant-u4301.html
Вибачаюсь

maragva>> Копирование данных в другую книгу по значению
2011-02-11 20:26 http://forum.msexcel.ru/profiles/maragva-u30446.html
Доброго времени!

Испытываю сложности из-за слабого знания vba.

есть такой код:

Sub Кнопка1()
Dim i As Long
Dim toCopyData As Range

    With Sheets("Ручки")
        For i = 3 To 100
            If Not IsEmpty(.Cells(i, 1)) Then
            Set toCopyData = Union(.Cells(i, 2), .Cells(i, 3), .Cells(i, 4))
             toCopyData.Copy _
            Destination:=Sheets("Лист3").Cells(Sheets("Лист3").Cells(Rows.Count, 3).End(xlUp).Row + 1, 3)
             End If
        Next i
         
    End With
    MsgBox "Отмеченные позиции перенесены", 64, "Конец"
End Sub

То есть, копирование происходит в эту же книгу, а мне необходимо вставить данные в другую. Причем столбцы "В", "С", "D" вставить нужно в столбцы "С", "E", "F", да еще начиная с 15 строки.
Как можно это реализовать?


KuklP>> Re: Дублирование Скрыть\Отобразить
2011-02-11 21:22 http://forum.msexcel.ru/profiles/kuklp-u39713.html
В [abbr=правой кнопкой мыши по ярлычку листа -> Исходный текст]модуль листа[/abbr] 2:

Private Sub Worksheet_Activate()
    Application.ScreenUpdating = False
    Dim a$
    Me.UsedRange.EntireRow.Hidden = True
    a = Sheets("Лист1").UsedRange.SpecialCells(xlCellTypeVisible).Address
    Me.Range(a).EntireRow.Hidden = False
    Application.ScreenUpdating = True
End Sub



Leksa>> Re: В конце каждой ячейки нужно поставить запятую
2011-02-11 21:24 http://forum.msexcel.ru/profiles/leksa-u70031.html
спасибо большое

dolphin-partenit>> Как совместить 2 таблицы
2011-02-11 22:08 http://forum.msexcel.ru/profiles/dolphinpartenit-u70045.html
Здравствуйте.Я новичок.просмотрел кучу видеоуроков по excel, но так и не нашел решения простой задачи. Мне надо сверить 2-3 таблицы с кодом и наименованием товара и свести их в одну без повторения позиций.Если не трудно подскажите решение задачи.Заранее признателен.

С.М.>> Re: Как совместить 2 таблицы
2011-02-11 22:52 http://forum.msexcel.ru/profiles/sm-u19758.html
См. пункт 2.0.
http://forum.msexcel.ru/pravila_foruma/pravila_foruma-t129.0.html

Олег*>> Re: UserForm Экселя поверх всех других окон
2011-02-11 23:16 http://forum.msexcel.ru/profiles/oleg-u24862.html
Никто не пробовал?

dolphin-partenit>> Re: Как совместить 2 таблицы
2011-02-12 00:46 http://forum.msexcel.ru/profiles/dolphinpartenit-u70045.html
Простите.Не дошел до 2.0 пункта.Сознаю ошибку.

IKor>> Re: Как совместить 2 таблицы
2011-02-12 01:57 http://forum.msexcel.ru/profiles/ikor-u6827.html
Правильно ли я понимаю, что требуется найти уникальные значения во втором столбце всех таблиц и соответствующие им значения из первого столбца?

Насколько я знаю в Excel2007 и старше есть более простой путь, но т.к. 2007+ под рукой нет, то напишу инструкцию для Excel 2003 и младше

I. Вариант с ручным выявлением списка уникальных значений:
1. Копируем все таблицы и вставляем их на новый лист друг под другом, начиная со второй строки (нужна шапка таблицы).
2. Сортируем таблицу по второму столбцу (меню ДАННЫЕ / СОРТИРОВКА)
3. в третьем столбце записываем формулу, отделяющую уникальные значения от повторов: =ЕСЛИ(B1=B2;1;"")
4. копируем формулу во все значимые ячейки третьего столбца.
5. выделяем третий столбец целиком (кликнуть на заголовке столбца)
6. переходим в меню ПРАВКА / ПЕРЕЙТИ / выделить и указываем критерий выделения: "формулы", "только числа" => ОК
7. Изо всех ячеек третьего столбца выделяются повторы
8. идем в меню ПРАВКА / УДАЛИТЬ / строки целиком => лишние строки удалены.

...

IKor>> Re: Перенос данных в другой файл
2011-02-12 02:11 http://forum.msexcel.ru/profiles/ikor-u6827.html
По-моему, вам поможет простейшая функция типа [url=http://msexcel.ru/content/view/20/2/]ВПР(_)[/url] или сочетание функций ИНДЕКС(...;ПОИСКПОЗ();...)
Меня смущают только некоторые несовпадения (смотрите условное выделение на Листе7). У Вас точно нет повтором на Листе6?

dolphin-partenit>> Re: Как совместить 2 таблицы
2011-02-12 14:53 http://forum.msexcel.ru/profiles/dolphinpartenit-u70045.html
Спасибо большое - вы мне очень помогли.


smokes>> заполнение строк в таблице по критерию, с выборкой из другой таблицы.
2011-02-12 15:09 http://forum.msexcel.ru/profiles/smokes-u70133.html
Здраствуйте, с екселем работал мало, но теперь возникла необходимость обработать большой объем данных, а как автоматизировать не знаю, может кто подскажет ?

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

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

In4es>> Удаление пустых столбцов в таблице
2011-02-12 15:16 http://forum.msexcel.ru/profiles/in4es-u70134.html
Всем привет!
Очень нужна ваша помощь..
Создала таблицы, в которую учителя будут заносить оценки за контрольную работу. Дальше считается среднее значение.
Максимум может быть 8 столбцов, т.е. у каждого ученика 8 оценок. Но в зависимости от четверти может быть и 2 и 3 оценки.. В результате куча столбцов остается пустыми, и пользоваться такой таблицей становиться очень неудобно. Можно ли сделать так, что бы на другом листе эксел проверял в определенном диапазоне строк заполнена ли хоть одна ячейка, а если все пустые, то в новую таблицу не копировал этот столбец?
Заранее спасибо. Очень жду Вашей помощи)

IKor>> Re: заполнение строк в таблице по критерию, с выборкой из другой таблицы.
2011-02-12 15:29 http://forum.msexcel.ru/profiles/ikor-u6827.html
Определиться с ценой Вам поможет функция =ВПР(текущий_каталожный_номер_1го_файла;таблица_2го_файла_в_левом_столбце_которой_хранятся_каталожные_номера;номер_столбца_с_ценой_таблицы_2го_файла;0). Не уверен, что она будет работать при закрытом втором файле.
Кроме того, рекомендую ознакомиться с работой функций ИНДЕКС(), ПОИСКПОЗ(), ЕОШИБКА().
для удобства работы лучше использовать именованные диапазоны.

IKor>> Re: Удаление пустых столбцов в таблице
2011-02-12 15:48 http://forum.msexcel.ru/profiles/ikor-u6827.html
Будет гораздо проще разобраться, чем Вам помочь, если Вы приложите к сообщению исходные данные (без секретной информации) и желаемый результат

In4es>> Re: Удаление пустых столбцов в таблице
2011-02-12 16:15 http://forum.msexcel.ru/profiles/in4es-u70134.html
Вот)

KuklP>> Re: Удаление пустых столбцов в таблице
2011-02-12 18:21 http://forum.msexcel.ru/profiles/kuklp-u39713.html
М-да, с такой организацией данных... Еще и объединенные ячейки...
Перед тем, как перейти на 2-й лист, нажмите кнопку на 1-м листе.

In4es>> Re: Удаление пустых столбцов в таблице
2011-02-12 21:11 http://forum.msexcel.ru/profiles/in4es-u70134.html
Толи я не поняла что Вы все правильно сделали, то ли Вы не так меня поняли.
Во-первых, кнопку нажала, но на втором листе так и осталось все с пустыми столбцами.
Во-вторых, а почему Вы объединили кучу ячеек перед каждой четвертью? Там так и должно быть по 2 ячейки объеденные... 

In4es>> Re: Удаление пустых столбцов в таблице
2011-02-12 21:14 http://forum.msexcel.ru/profiles/in4es-u70134.html
Ой, извините.. И правду убрал что то. Спасибо, буду разбираться..

westibolm>> Разбить ячейки точками
2011-02-12 22:00 http://forum.msexcel.ru/profiles/westibolm-u70181.html
Есть например ячейка со значение "привет" мне надо её разбить точками то есть должно получиться столблец такого вида
привет
п.ривет
пр.ивет
при.вет
......
п.р.и.в.е.т а так должно закончиться.
Такое можно реализовать в Excel??

In4es>> Re: Удаление пустых столбцов в таблице
2011-02-12 22:23 http://forum.msexcel.ru/profiles/in4es-u70134.html
Не, что то не то. Он объединил строки, которые пустые, а их надо удалить.
Опять обращаюсь к вашей помощи...
С нетерпением жду ответа))

ZORRO2005>> Re: Удаление пустых столбцов в таблице
2011-02-12 23:22 http://forum.msexcel.ru/profiles/zorro2005-u4225.html
In4es,
зачем нужны серые столбцы для каждой даты?
Организация данных действительно ужасная.


ZORRO2005>> Re: Разбить ячейки точками
2011-02-12 23:55 http://forum.msexcel.ru/profiles/zorro2005-u4225.html
Так наверно:

In4es>> Re: Удаление пустых столбцов в таблице
2011-02-13 00:12 http://forum.msexcel.ru/profiles/in4es-u70134.html
Просто за одну работу могут быть 2 оценки... А серые они просто что бы в глазах не рябило)))

Sergey112233>> как передать аргумент?
2011-02-13 00:25 http://forum.msexcel.ru/profiles/sergey112233-u57126.html
Уважаемые форумчане.
Программа находит в столбце А:А несколько последовательно идущих одинаковых записей код, а в столбце С:С , соответственно, записывает текущую дату.

Надо вот эту часть кода:

        m = 0
        Do
        If poz <> poz.Offset(m, 0) Then Exit Do
                    poz.Offset(m, 2) = Date + k
                    m = m - 1
       
        Loop
            poz.Offset(0, 2).Select

сделать отдельной программой или функцией, чтобы вызывать ее необходимое количество раз.
Подскажите пожалуйста, как передать в функцию в качестве аргумента poz.Offset(m, 0)?

Например, вот так не получается
       
Public Function prov(poz1)
        m = 0
        Do
        If poz1 <> poz1.Offset(m, 0) Then Exit Do
                    poz1.Offset(m, 2) = Date + k
                    m = m - 1
       
        Loop
        End Function


KuklP>> Re: Удаление пустых столбцов в таблице
2011-02-13 00:46 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Гляньте еще такой вариант. Если не устроит  - меняйте организацию данных. Потому как Ваша ни в какие рамки...

vkharin>> сколько квадратов в отрезках
2011-02-13 01:42 http://forum.msexcel.ru/profiles/vkharin-u70252.html
Здравствуйте!

Помгите, пожалуйста, решить задачу
В прикрепленном файле есть табличка
в ней пронумеровано 50 строк с различными данными

вверху обозначены три отрезка
нужно чтобы они считали соответствующие значения (количество значений) с столбце Квадрат (он выделен желтым
К примеру:
1ому отрезку соответствуют значения 1,2,3,4,9,10,17,18,19,24,28
2ому отрезку соответствуют значения 5,7,8,11,12,13,14,15,16,23
3ему отрезку соответствуют значения 6,20,21,22,25,26,27,29,30

т.е. для первого отрезка в ячейке D1 нужно, чтобы считались количество значений соотетствующих этому отрезку из столбца "Квадрат" (от G5 до G54)
для второго отрезка в ячейке D2
для третьего в D3

столбик один, а в нём встречаются значения которые могут повторяться
мне нужно посчитать сколько этих значений по каждому отрезку

я внес изменения во вложенный файл
там несколько значений в столбике G5:54
встречается например 19,24,28 - они удовлетворяют условиям первого отрезка и тогда в ячейке D1 должно посчитать ТРИ значени...

iron priest>> Re: сколько квадратов в отрезках
2011-02-13 08:14 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
оно?

smokes>> Re: заполнение строк в таблице по критерию, с выборкой из другой таблицы.
2011-02-13 09:05 http://forum.msexcel.ru/profiles/smokes-u70133.html
попробовал, не работает.

IKor>> Re: заполнение строк в таблице по критерию, с выборкой из другой таблицы.
2011-02-13 09:31 http://forum.msexcel.ru/profiles/ikor-u6827.html
странно.
А у меня работает.
А Вы сохраняли свой файл-источник?

Более того, при новом открытии файла-результата Excel спрашивает обновлять ли внешние связи.

RADIK86>> работа с листами
2011-02-13 10:04 http://forum.msexcel.ru/profiles/radik86-u70036.html
Здравствуйте! в файле exel  имеютя три листа первый и второй содержат поля квартала месяца и сумму за этот квартал. В третьем лтсте ма вводим соответствующий квартал и получаем сумму за соответствующий квартал и первых двух листов. Пример прилагается

RADIK86>> Re: работа с листами
2011-02-13 10:34 http://forum.msexcel.ru/profiles/radik86-u70036.html
Пробовал формулу пишет 0

RADIK86>> Re: работа с листами
2011-02-13 10:35 http://forum.msexcel.ru/profiles/radik86-u70036.html
пробовал формулу пишет 0 :    =СУММ(ЕСЛИ(('история ссудного счета'!$J$9:$J$80='тиблица расчета пени'!G8)*('история счета 45815'!$J$9:$J$80='тиблица расчета пени'!G8);('история ссудного счета'!I$9:I$80)*('история счета 45815'!I$9:I$80)))

kimtan>> Re: работа с листами
2011-02-13 11:06 http://forum.msexcel.ru/profiles/kimtan-u12219.html
=СУММЕСЛИ('история счета 45815'!$J$9:$J$80;G8;'история счета 45815'!$I$9:$I$80)+СУММЕСЛИ('история ссудного счета'!$K$9:$K$80;G8;'история ссудного счета'!$I$9:$I$80)

IKor>> Re: Удаление пустых столбцов в таблице
2011-02-13 11:07 http://forum.msexcel.ru/profiles/ikor-u6827.html
2 In4es
если Вы решите менять организацию исходных данных, то предлагаю рассмотреть следующий вариант:
На листе исходных данных заполняется таблица, каждая строка которой соответствует одной оценке (паре оценок), у этой таблицы должны быть следующие столбцы:
ФИО ученика, класс, вид работы, дата, оценка1, оценка2.

Как можно видеть, в таком представлении дублируется вспомогательная информация (ФИО, класс, работа), но исключаются пустые столбцы.

Для того, чтобы из исходных данных в таком виде получить, как Вам требуется, можно использовать [url=http://msexcel.ru/content/view/34/2/]_сводные_[/url] таблицы (сам не умею, но знатоков на форуме полно) или формулы (получится наворочено, но если понадобится - я подскажу как).

Удачи!

P.S. Наверняка Вам понравятся возможности сортировки и [url=http://msexcel.ru/content/view/27/2/]_автофильтр_[/url]а, примененных к таблицы исходных данных Улыбка
P.P.S. Если для Вас это не слишком критично, то я советую избегать объединения ячеек - сразу теряется гибкость работы с табличными данными.

RADIK86>> Re: работа с листами
2011-02-13 11:27 http://forum.msexcel.ru/profiles/radik86-u70036.html
огромное спасибо!!!!!

ZORRO2005>> Re: Удаление пустых столбцов в таблице
2011-02-13 13:13 http://forum.msexcel.ru/profiles/zorro2005-u4225.html
IKor,
думаю принципы баз данных для этого случая не подойдут,
просто будет очень неудобно забивать данные(например фамилии).

2 In4es,
посмотрите пример во вложении.

tgm>> Суммировать данные по группам
2011-02-13 13:47 http://forum.msexcel.ru/profiles/tgm-u43423.html
Добрый день! Возможно ли заменить формулы макросом? 1) Просуммировать данные на листе " Свод нед" по группам и вставить суммы на лист "Группы". 2)Посчитать долю продаж по каждому наименованию в его группе. Если это возможно,помогите пожалуйста...

kimtan>> Re: Суммировать данные по группам
2011-02-13 15:54 http://forum.msexcel.ru/profiles/kimtan-u12219.html
Может просто формулу написать, которую можно растягивать на весь диапазон?

Wasilic>> Re: Удаление пустых столбцов в таблице
2011-02-13 17:39 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Здравствуйте! Для оптимизации программы предлагаю классы разложить по листам, тогда можно задачу решить проще.
А воизбежание работы с макросом, сделайте колонки соразмерно данных и расставьте колонки по другому. Ну хотябы так:
см. пример.

iron priest>> Re: Суммировать данные по группам
2011-02-13 18:36 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
Может просто формулу написать, которую можно растягивать на весь диапазон?

и защитить лист например

Natf>> Обработка данных автосамописца
2011-02-13 19:17 http://forum.msexcel.ru/profiles/natf-u70580.html
Добрый вечер! Подскажите, пожалуйста, как можно автоматизировать статистическую обработку данных, снятых с автосамописца. Имеется ряд определений температуры воздуха за несколько лет. Столбец 1 таблица – дата и время регистрации температуры, через каждые 30 минут (48 определений в течение суток) и соответственно в столбце 2 – температура воздуха. Как автоматизировать обработку, чтобы получить за весь период наблюдений а) столбец данных среднесуточной температуры и б) среднемесячную температуру по декадам месяца (с 1 по 10, с 11 по 20, и 21 до конца месяца). Заранее благодарю за помощь. Таблица прилагается.

tgm>> Re: Суммировать данные по группам
2011-02-13 19:28 http://forum.msexcel.ru/profiles/tgm-u43423.html
kimtan, iron priest, спасибо большое за помощь.Просто формул на 2 листах будет много,вот и была мысля маленько облегчить файл макросом Улыбка

iron priest>> поискпозиции
2011-02-13 20:08 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
здравствуйте

подскажите можно ли найти позицию по 2-м критериям? по одному знаю как  индекс (ляля. поискпозии(ляля)ляля)

а у меня задача стоит такая. есть наименование ТМЦ и № калькуляции, нужно найти позицию соответствующую этим критериям

небольшой пример



iron priest>> Re: поискпозиции
2011-02-13 20:20 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
вроде такое работает

=ВПР(ДВССЫЛ("A"&ПОИСКПОЗ(продукция&калькуляция;искомая продукция&искомая калькуляция;0);ИСТИНА);A:A;1;ЛОЖЬ)

возвращает номер по порядку, а вот чтото с гиперссылкой не получается...

С.М.>> Re: Суммировать данные по группам
2011-02-13 20:55 http://forum.msexcel.ru/profiles/sm-u19758.html
Возможно ли заменить формулы макросом?
Вот:

aleks_yar>> Сопоставление таблиц на поиск несовпадений
2011-02-13 21:30 http://forum.msexcel.ru/profiles/aleksyar-u70622.html
Здравствуйте. Первый раз встала проблема с обработкой большого объема данных в Excel. Есть сводная таблица за весь период работы (7 месяцев) и 7 листов с отчетами за каждый месяц. Есть предположение, что в сводной таблице были случайно удалены несколько строк, но в ежемесячные отчеты они попали. Необходимо сопоставить отчет за каждый месяц со сводной таблицей. В очетах содержатся только ключевые данные (из столбца "№ отправления"). В результате сопоставления необходимо выяснить, каких отправлений не хватает в сводной таблице. Я пытался сам записать макрос, который будет копировать ячейку из отчета, переходить на сводную таблицу, находить там значение буфера и помечать эту ячейку цветом. У меня не получается. Записанный макрос ищет конкретный номер отправления, а не любое значение из выбранной ячейки. Например, в ячейке отчета написано 123456 - макрос всегда будет искать 123456, а мне необходимо в следующий раз найти уже другое значение другой ячейки, на которую я перейду. В идеале м...

tgm>> Re: Суммировать данные по группам
2011-02-13 21:51 http://forum.msexcel.ru/profiles/tgm-u43423.html
Добрый вечер С.М.,макрос супер - спасибо огромнейшее! Веселый Возникла только одна проблемка,когда я пытаюсь добавлять новую группу выскакивает ошибка..  В замешательстве  Что в макросе нужно изменить?

С.М.>> Re: Суммировать данные по группам
2011-02-13 23:00 http://forum.msexcel.ru/profiles/sm-u19758.html
tgm, замените блок:
Код:
    For K = 1 To GCnt
        GName = ListГруппы(K, 1)
        TableГруппы(K, 1) = GName
        For I = 1 To N
            If TableСвод(I, 2) = GName Then
                For J = 2 To M - 1
                    If Not IsEmpty(TableСвод(I, J + 1)) Then
                        TableГруппы(K, J) = TableГруппы(K, J) + TableСвод(I, J + 1)
                    End If
                Next
            End If
        Next
    Next
    For K = 1 To GCnt
        GName = ListГруппы(K, 1)
        For I = 1 To N
            If TableСвод(I, 2) = GName Then
                For J = 2 To M - 1
                    If Not IsEmpty(TableСвод(I, J + 1)) Then
                        TableДП(I, J + 1) = TableСвод(I, J + 1) / TableГруппы(K, J)
                    End If
                Next
            End If
        Next
    Next


tgm>> Re: Суммировать данные по группам
2011-02-14 01:46 http://forum.msexcel.ru/profiles/tgm-u43423.html
Все отлично! Улыбка С.М.,спасибо большое!

GWolf>> Re: Сопоставление таблиц на поиск несовпадений
2011-02-14 08:04 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Доброго дня!
Ну а где ВАШ макрос?!

Ведь проще подсказать что не так, чем рисовать с изнова.  Подмигивающий

aleks_yar>> Re: Сопоставление таблиц на поиск несовпадений
2011-02-14 08:32 http://forum.msexcel.ru/profiles/aleksyar-u70622.html
Спасибо за оперативность. Макрос записал.

GWolf>> Re: Сопоставление таблиц на поиск несовпадений
2011-02-14 10:48 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Что то типа этого:

[code]Sub sraVNenie()
'
' sraVNenie Макрос
' Макрос записан 14.02.2011 (1)
'
' Сочетание клавиш: Ctrl+q
'
    
    Dim noMOtprav As String
    Dim rez As Boolean
    Dim nR As Long
    
    noMOtprav = ""
    nR = 2
    With ThisWorkbook.ActiveSheet
        Do
            noMOtprav = .Cells(nR, 2).Text
            
            .Cells(nR, 2).Select
            
            rez = searchNO(noMOtprav)
            
            If rez = True Then '- нашел
                .Cells(nR, 2).Interior.ColorIndex = 6
            Else '- не нашел
            
            End If
            nR = nR + 1
        Loop While noMOtprav <> ""
    End With
End Sub

Function searchNO(noMOtprv As String) As Boolean
    Dim df As Object
    Dim ws As Worksheet
    
    searchNO = False
    
    With ThisWorkbook
        For Each ws In .Worksheets
            If ws.Name <> "Лист1" Then
                With ws.Cells
                    Set df = .Find(noMOtprv)
                    
            ...

nilem>> Re: Обработка данных автосамописца
2011-02-14 12:03 http://forum.msexcel.ru/profiles/nilem-u30547.html
Если обрабатываем данные только за один месяц (как в примере), то можно так попробовать. Зеленая кнопка.

A_00016>> Где найти описание встроенных функций Access на русском языке ???????
2011-02-14 13:10 http://forum.msexcel.ru/profiles/a00016-u35971.html
Добрый день всему честному народу.
Подскажите где найти описание встроенных функций Access на русском языке.
В справке только на английском (у меня Access 2003).
Буду признателен за любые подсказки.

Serge 007>> Re: поискпозиции
2011-02-14 13:12 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Чёт не понял по каким критериям совпадения должны быть...

Serge 007>> Re: UserForm Экселя поверх всех других окон
2011-02-14 13:14 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Вариант (см. файл)

MCH>> Re: Обработка данных автосамописца
2011-02-14 13:16 http://forum.msexcel.ru/profiles/mch-u48782.html
Можно через [url=http://msexcel.ru/content/view/34/2/]_сводные_[/url] таблицы сделать, настроить можно любой отчет: по дням, месяцам, декадам и т.п.

iron priest>> Re: поискпозиции
2011-02-14 13:20 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
ладно черт с ним, а какой формулой суммирование можно воспользоваться?

пример

счет сумма
201 50
206 30
25 48

нада суммировать только счета 20*. результат =80

iron priest>> Re: поискпозиции
2011-02-14 13:28 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
пришлось перегонять все счета в текстовый формат...

ZORRO2005>> Re: поискпозиции
2011-02-14 13:35 http://forum.msexcel.ru/profiles/zorro2005-u4225.html
пришлось перегонять все счета в текстовый формат...
Да, если перегнать в текстовый то:
=СУММЕСЛИ(A1:A3;"20*";B1:B3)
а если не хочешь перегонять:
=СУММ((ЛЕВСИМВ(A1:A3;2)*1=20)*B1:B3)

iron priest>> Re: поискпозиции
2011-02-14 14:05 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
спасибо!

Wasilic>> Re: Обработка данных автосамописца
2011-02-14 14:32 http://forum.msexcel.ru/profiles/wasilic-u24852.html
А я, похоже, на весь год насмешил.  Улыбка

Natf>> Re: Обработка данных автосамописца
2011-02-14 16:46 http://forum.msexcel.ru/profiles/natf-u70580.html
Большое спасибо всем!

GWolf>> Re: как передать аргумент?
2011-02-14 16:50 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Добрый вечер!
Может быть объясните природу сией задачи? Если это просто учебное задание, то одно дело, если - часть чего то другого, то другое.

srp>> имя пользователя
2011-02-14 17:41 http://forum.msexcel.ru/profiles/srp-u70948.html
привет, подскажите, как можно выводить в определенной ячейке имя пользователя, открывшего файл (это некобходимо видеть на печатной форме)?

KuklP>> Re: имя пользователя
2011-02-14 18:00 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Попробуйте:
Public Sub www()
[A1]= Application.UserName
End Sub

Prist>> Re: имя пользователя
2011-02-14 18:03 http://forum.msexcel.ru/profiles/prist-u4859.html
Макросом можно. Лучше через Пользовательскую функцию:
Код:
Function Get_UserName()
Get_UserName = CreateObject("WScript.Network").UserName
End Function
В нужную ячейку листа вводите:
=Get_UserName()

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

srp>> Re: имя пользователя
2011-02-14 19:17 http://forum.msexcel.ru/profiles/srp-u70948.html
спасибо

aleks_yar>> Re: Сопоставление таблиц на поиск несовпадений
2011-02-14 21:29 http://forum.msexcel.ru/profiles/aleksyar-u70622.html
Ура. Работает. Огромное спасибо и респект.

nilem>> Re: Обработка данных автосамописца
2011-02-14 22:14 http://forum.msexcel.ru/profiles/nilem-u30547.html
Advanced версия  Улыбка для разных месяцев. Но в пределах одного года.

jlik>> как сравнить 2 даты в Excel
2011-02-14 22:41 http://forum.msexcel.ru/profiles/jlik-u19420.html
Можно ли сравнить 2 даты между собой в excel с помощью каких нибудь функций на предмет того какая дата раньше или больше другой? буду признательна за ответ

iron priest>> Re: как сравнить 2 даты в Excel
2011-02-14 22:49 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
тю да элементарно, a1<b1 если вернет истину, то это значит что дата в ячейке а1 раньше чем в b1

Sergey112233>> Re: как передать аргумент?
2011-02-14 23:05 http://forum.msexcel.ru/profiles/sergey112233-u57126.html
GWolf,
здравствуйте.

Это не учебное задание. Скорее один из путей, правда, до вершины еще далековато Улыбка
Задается код через Msgbox, например, 173456. Ищется в столбце А последняя группа записей этого кода. Это строчки 15-18. В столбце С в этих строчках автоматически проставляется дата.
Далее, задается иной код. Опять должна находиться последняя группа записей иного кода и построчно проставляться значение Даты в столбце С
и т.д.

Планирую перемещение построчно сделать с помощью вызываемой функции или программы, например, так:
Код:
Public Function Runner1(Poz1 As Range, n As Integer)
m = 0 ' начальное значение строки поиска искомого кода
Do
If Poz1 <> Poz1.Offset(m, 0) Then Exit Do
Poz1.Offset(m, n) = Date
n = n + 2
Poz1.Offset(m, n) = Date + k
n = n - 2
m = m - 1 ' движение поиска вверх построчно
Loop
End Function


iron priest>> Re: как сравнить 2 даты в Excel
2011-02-14 23:41 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
давайте файл

jlik>> Re: как сравнить 2 даты в Excel
2011-02-14 23:44 http://forum.msexcel.ru/profiles/jlik-u19420.html
Прошу прощения... получилось... что то я совсем...  уже столько перепробовала... что голова помутилась, а сейчас по пробовала вновь получилось, спасибо !!!!

iron priest>> Re: как сравнить 2 даты в Excel
2011-02-14 23:48 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
)))

С.М.>> Re: Обработка данных автосамописца
2011-02-15 01:39 http://forum.msexcel.ru/profiles/sm-u19758.html
А я, похоже, на весь год насмешил.  Улыбка
Улыбка Три с половиной:

demonnsk>> Автоматическое создание таблиц
2011-02-15 04:04 http://forum.msexcel.ru/profiles/demonnsk-u70893.html
такая проблема. Таблицы предоставить не могу ввиду конфеденциальности информации. Объясню на пальцах. Есть общая таблица на год по установке опр.оборудования. Столбцы "название", "дата планируемого запуска", "дата запуска". Необходимо чтоб на др.листе вводя к примеру название "План на ЯНВАРЬ месяц", он автоматически выводил таблицу с планируемыми на этот месяц запусками. А на след.листе план на неделю, тоже самое ток на неделю. Как это сделать?

Димычч>> Re: Почему файлы Эксель запускаются в разных процессах?
2011-02-15 06:09 http://forum.msexcel.ru/profiles/dimychch-u4718.html
Прошу прощения, что возобновляю тему, но проблема продолжает существовать, и не только у меня. Постоянно приходят коллеги и жалуются, что "ссылки у открытых файлов не обновляются друг на друга при сохранении файлов и что при попытке вставить ссылку на соседний открытый файл это сделать не удаётся". Я посмотрел в диспетчер задач и увидел что копий программы по две и по три. Я не знаю, в какой момент это происходит. Я всё делаю ПРАВИЛЬНО. На рабочем столе есть ярлыки к файлам, запускаю их последовательно, всё грузится как надо, в одну программу. Проходит какое то время, в течение которого я закрываю и запускаю новые файлы. В очередной раз, сворачиваю все окна и запускаю очередной ярлык с раб. стола. И вижу, что он начинает загружаться в чистое окно экселя (обычно при открытии нового файла видно содержимое окна с уже открытым файлом), Это означает только одно: НАЧАЛОСЬ... Если мне скажут, что проверьте Свойства папки-Типы файлов, то я отвечу, что там всё так как должно быть, ведь если ...

GWolf>> Re: как передать аргумент?
2011-02-15 07:34 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Доброго дня ув. Sergey112233!

Что ж, один из путей:

Предполагаю, что заполнение таблицы идет сверьху - вниз. Если это так, то

[code]Sub road() '- открываем процедуру
    Dim i As Long, nREnd As Long
    Dim gruppa As String
    Dim blok As Range
   
    'запросим значение группы
    gruppa = InputBox("Введите значение группы:", "")
    'если ввод пуст - завершим процедуру
    If gruppa = "" Then Exit Sub
    'если же непуст, то:
    With ThisWorkbook '- для текущей рабочей книги
        With .ActiveSheet '- и активного листа в ней
            'определяем занятую данными область листа == Start ==
            Set blok = .UsedRange
            nREnd = blok.Row + blok.Rows.Count - 1
            Set blok = Nothing
            'определяем занятую данными область листа == Stop ==
           
            If nREnd < 1 Then 'если таблица пуста, т. е. занятая область листа = 0
                Exit Sub ' - завершим процедуру
            Else 'если НЕТ
                'организуем цикл (посколь...

yarkovoy>> Разбросать данные по шаблону
2011-02-15 07:51 http://forum.msexcel.ru/profiles/yarkovoy-u70900.html
Помогите
Нужно с Лист1 с абонентами взять данные и  разбросать по шаблону на новые листы.
Т.е. из Лист1 A -> ФИО
B -> АДРЕС
J -> СУММА
E -> ДАТА
В "Лист1" будет более 100 абонентов.
Хотелось бы чтобы по макросу выполняло это действие.


Файл приложен.

GWolf>> Re: Автоматическое создание таблиц
2011-02-15 07:52 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Добрый день ув. demonnsk!

Никому и не нужен ВАШ конфиденциал! Но, ... в пример слдует разместить ОБЩИЙ принцип организации ВАШЕЙ предметной области. А то какие сроки Вы пропишете и как назовете контрагентов - не важно.
Ведь все равно, для того что бы Вам ответить нужно ваше "на пальцах" превратить в наше "Таблицу (-цы) Excel"!! Так зачем же заставлять того, к кому обращаешся за ПОМОЩЬЮ, делать ненужную для него работу???!

Только без обид. С наипрочнейшим желанием ПОМОЧЬ ваш GWolf.

GWolf>> Re: Сопоставление таблиц на поиск несовпадений
2011-02-15 07:53 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Ура. Работает. Огромное спасибо и респект.

Пожалуйста! - Обращайтесь.

GWolf>> Re: Разбросать данные по шаблону
2011-02-15 08:17 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Добрый день!

Вы ничего не пишете о том когда (после какого действия пользователя) должен произойти разброс.
Общий случай:

На лист "Шаблон" навешиваем Кнопку (например из панели "Формы"), а на нее макрос:

Sub Кнопка1_Щелкнуть()
    Dim blok As Range
    Dim nREnd As Long
    Dim sumS As Double
    Dim fio As String, adrSTlf As String, adr As String, datS As String
   
    With ThisWorkbook
        With .Worksheets("Лист1")
            fio = .Cells(15, 5).Text
            adrSTlf = .Cells(16, 5).Text
            adr = .Cells(17, 5).Text
            sumS = .Cells(18, 5).Value
            datS = .Cells(21, 5).Text
        End With
       
        With .Worksheets("Лист1")
            'определяем занятую данными область листа == Start ==
            Set blok = .UsedRange
            nREnd = blok.Row + blok.Rows.Count - 1
            Set blok = Nothing
            'определяем занятую данными область листа == Stop ==
           
            If nREnd < 1 Then 'если таблица пуста
        ...

yarkovoy>> Re: Разбросать данные по шаблону
2011-02-15 08:26 http://forum.msexcel.ru/profiles/yarkovoy-u70900.html
В моем полном файле уже есть 100 абонентов на листе.
Нужно их данные разбросать по нажатию кнопки или по ALT+F8 и там выбрать макрос.

GWolf>> Re: Разбросать данные по шаблону
2011-02-15 08:34 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Объясните, что значит "разбросать". В шаблон ввели набор данных, его (этот набор) нужно добавить к уже существующим записям Листа1 новой строкой снизу, или: - Найти фамилию и проверить какие данные несовпадают и их изменить на новые. Или ЕЩЕ КАКТО???

KuklP>> Re: Разбросать данные по шаблону
2011-02-15 08:44 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Здравствуйте.
Для этого можно использовать инструмент Слияние в MSWORD. Там не нужно никаких макросов. Все автоматом подставляется в шаблон. Наскоро набросал, посмотрите.

yarkovoy>> Re: Разбросать данные по шаблону
2011-02-15 08:56 http://forum.msexcel.ru/profiles/yarkovoy-u70900.html
Видимо все таки не так объяснил:

Мне нужно чтобы из готового листа  макрос
взял данные из нужных полей и подставил их в другое место в шаблоне (отмечено желтым цветом) на новом листе
и таким образом обработал всех абонентов автоматически
соответственно в книге должно появится по результату выполнения макроса типа Лист1, Аб1,Аб2,Аб3 ... Аб50 с данными

Сделал вот макрос для примера на одного абонента. Мне нужно зациклить на обработку всех (т.е. чтобы сам сдвигался ниже на след. строчку).

Цитировать
Sub Заполнение()
'
' Макрос2 Макрос
' Макрос записан 14.02.2011 (Ludmila)
'

'
    Sheets("Шаблон").Select
    Sheets("Шаблон").Copy After:=Sheets(2)
    Sheets("Лист1").Select
    Range("A1").Select
    Selection.Copy
    Sheets("Шаблон (2)").Select
    ActiveSheet.Paste Destination:=Worksheets("Шаблон (2)").Range("E15:I15")
    Sheets("Лист1").Select
    Range("B1").Select
    Selection.Copy
    Sheets("Шаблон (2)").Select
    ActiveSheet.Paste Destination:=Worksheets("Шаблон (2)").Range("E...


GWolf>> Re: Разбросать данные по шаблону
2011-02-15 09:13 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Цитировать
Видимо все таки не так объяснил:
в том то и дело

Цитировать
Мне нужно чтобы из готового листа
А позвольте спросить, имя листа не затруднит указать?! 
Цитировать
макрос
взял данные из нужных полей и подставил их в другое место в шаблоне (отмечено желтым цветом) на новом листе
Цитировать
и таким образом обработал всех абонентов автоматически
а макрос подругому не работает! УВЫ!
Цитировать
соответственно в книге должно появится по результату выполнения макроса типа Лист1, Аб1,Аб2,Аб3 ... Аб50 с данными
Типа ... типа, а по русски и почетче. А то блудим уже три поста вокруг да около!!!

Цитировать
Сделал вот макрос для примера на одного абонента. Мне нужно зациклить на обработку всех (т.е. чтобы сам сдвигался ниже на след. строчку).
Здорово, Если такие познания, то не лучше ли ответить на вопрос что мне переделать (доделать) в макросе ПОКОНКРЕТНЕЕ.



GWolf>> Re: Разбить ячейки точками
2011-02-15 09:28 http://forum.msexcel.ru/profiles/gwolf-u4652.html
А мне показалось, что вот так:

Код:
Sub pointami()
    Dim nRTo As Integer, nR As Integer
    Dim stroka1 As String, stroka2 As String, stroka3 As String, k As String
   
    nRTo = 1
    nR = 1
    Do
        stroka1 = Cells(nR, 1).Text
        stroka2 = ""
        stroka3 = 0
        i = 0
        For i = 1 To Len(stroka1)
            k = Mid(stroka1, i, 1)
            uR = Right(stroka1, Len(stroka1) - i)
            stroka2 = stroka2 & k & "."
            stroka3 = stroka2 & uR
           
            MsgBox stroka2 & Chr(10) & _
                   stroka3, vbInformation + vbOKOnly, stroka1
           
            Cells(nRTo, 3) = stroka3
            nRTo = nRTo + 1
            stroka3 = ""
        Next i
        nR = nR + 1
    Loop While Cells(nR, 1).Text <> ""
End Sub


yarkovoy>> Re: Разбросать данные по шаблону
2011-02-15 09:36 http://forum.msexcel.ru/profiles/yarkovoy-u70900.html
Извиняюсь за сумбурность просто в запарке сейчас..

Вы можете выполнить мой макрос в моем файле?
Там после его выполнения появляются данные взятые от первого абонента  с "Лист1" в листе "Шаблон (2)" (см. фото)
Но я могу сделать макрос только для одного человека с "Листа1", а нужно чтобы после обработки 1 cтроки
макрос сдвинулся вниз на строку 2 и соответственно взял данные дальше и вставил на новый лист допустим "Шаблон (3)"

Все имена листов и шаблон остаются так же как в моем макросе и файле ничего не меняется.




GWolf>> Re: Разбросать данные по шаблону
2011-02-15 09:55 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Извиняюсь за сумбурность просто в запарке сейчас..

Вы можете выполнить мой макрос в моем файле?
Там после его выполнения появляются данные взятые от первого абонента  с "Лист1" в листе "Шаблон (2)" (см. фото)
Но я могу сделать макрос только для одного человека с "Листа1", а нужно чтобы после обработки 1 cтроки
макрос сдвинулся вниз на строку 2 и соответственно взял данные дальше и вставил на новый лист допустим "Шаблон (3)"

Все имена листов и шаблон остаются так же как в моем макросе и файле ничего не меняется.

Получается что, Есть некая База абонентов на Лист1, макрос по Alt+F8 должен брать последовательно строки этой базы и формировать из них листы-шаблоны. Новая строка - новый лист-шаблон. ТАК что ли?

yarkovoy>> Re: Разбросать данные по шаблону
2011-02-15 09:57 http://forum.msexcel.ru/profiles/yarkovoy-u70900.html
Именно!!! Улыбка
Т.е. вы можете зациклить допустим мой макрос на 100 и более человек.

GWolf>> Re: Разбросать данные по шаблону
2011-02-15 10:00 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Именно!!! Улыбка

Ну так это несколько другая постановка задачи, не находите? Или я чего то непонял?


yarkovoy>> Re: Разбросать данные по шаблону
2011-02-15 10:03 http://forum.msexcel.ru/profiles/yarkovoy-u70900.html
Согласен. Mea culpa

GWolf>> Re: Разбросать данные по шаблону
2011-02-15 10:09 http://forum.msexcel.ru/profiles/gwolf-u4652.html
... Mea culpa

Не в курсе, куда Вы меня сейчас послали ...  Смеющийся, но вот тут, подробненько рассказано, как организовать два варианта перемещения по файлу: http://forum.msexcel.ru/microsoft_excel/kak_peredat_argument-t4907.0.html, посмотрите, пожалуйста, если будут вопросы: - Милости прошу!

yarkovoy>> Re: Разбросать данные по шаблону
2011-02-15 10:23 http://forum.msexcel.ru/profiles/yarkovoy-u70900.html
Попытаюсь разобраться если получится. Хотя циклы пока не очень понимаю.

GWolf>> Re: Разбросать данные по шаблону
2011-02-15 10:27 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Посмотрел ваш профиль, приношу свои извинения!

Итак ...
перемещение по листу1 можно организовать вот так:

Sub proba()
    '
    ' proba Макрос
    ' Макрос записан
    '

    '
    With ThisWorkbook
        With .Worksheets("Лист1")
            nR = 1
            Do

                MsgBox .Cells(nR, 1).Text, vbInformation + vbOKOnly, "Это пример"

                nR = nR + 1
            Loop While .Cells(nR, 1).Text <> ""
        End With
    End With
End Sub
 

GWolf>> Re: Разбросать данные по шаблону
2011-02-15 10:30 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Ставите курсор на любую строку кода и F8. Пошаговое выполнение - смотрите какие значения принимают переменные, что происходит с рабочим пространством книги и листа. ВСЕ ПОЛУЧИТСЯ. Зато как приятна будет победа!


In4es>> Re: Удаление пустых столбцов в таблице
2011-02-15 11:22 http://forum.msexcel.ru/profiles/in4es-u70134.html
Всем большое спасибо за помощь.
Я не против поменять организацию БД, но вы мне подскажите, при какой организации можно будет сделать что я прошу.
Еще раз напомню что я хочу.
мне нужна таблица, которая каким то образом будет удалять незаполненные полностью столбцы в определенном диапазоне строк.
Дальше мне надо будет по этим таблицам строить диаграммы. А если колонка пустая, то и на диаграмме пробел, что не есть хорошо..

На первый раз я решила эту проблемму... Как мне тут советовали, я сделала на каждом листе новый предмет (1 лист-математика 5; 2 лист-русский 5...) Дальше я просто выделяю диапазон пустых столбцов, затем "скрыть".
Но хотелось бы с вашей помощью сделать что то более автоматизированное..
Как всегда, с нетерпением жду ответов) 


Wasilic>> Re: Разбить ячейки точками
2011-02-15 11:24 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Ну, или так!

Wasilic>> Re: Удаление пустых столбцов в таблице
2011-02-15 11:32 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Ну вот и отлично!
Переделанную книжечку сюда. Будем смотреть.

yarkovoy>> Re: Разбросать данные по шаблону
2011-02-15 12:55 http://forum.msexcel.ru/profiles/yarkovoy-u70900.html
Подскажите а каким образом с Cell(nR, 1) передать данные в буфер обмена?


KuklP>> Re: Разбросать данные по шаблону
2011-02-15 13:00 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Не надо передавать. Но гораздо лучше тот вариант, что я предлагал сначала.

Alexandrin>> Re: Макрос переноса данных из одного файла в другой
2011-02-15 13:07 http://forum.msexcel.ru/profiles/alexandrin-u64040.html
Если по сети добавляю строчки из программы Excel2007, то форматирование строчки в итоговом файле сохраняется, а если из Excel2003, то не сохраняется, вместо даты - число, выравнивания в ячейках нет и т. д.  Шокирован Все файлы в формате .xls. Как устранить все это безобразие?  В замешательстве

GWolf>> Re: Разбросать данные по шаблону
2011-02-15 13:10 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Подскажите а каким образом с Cell(nR, 1) передать данные в буфер обмена?


Вопрос не понял.
На скрепке вариант реализации. Посмотрите.

Jim>> не стандартные графики (2 шкалы)
2011-02-15 13:14 http://forum.msexcel.ru/profiles/jim-u4457.html
всем доброего времени суток!

знатоки, подскажите пожалуйста, как в 2007 excel'e построить нестандартные графики. в 2003 точно знаю такое есть, а вот в 2007 не найду.
мне необходим график с двумя шкалами (слева и справа).

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

Prist>> Re: не стандартные графики (2 шкалы)
2011-02-15 13:26 http://forum.msexcel.ru/profiles/prist-u4859.html
Здравствуйте.
Выделяете ряд, который хотите пустить по отдельной оси. Правая кнопка мыши-Формат ряда данных-вкладка "Параметры ряда"-По вспомогательной оси

Jim>> Re: не стандартные графики (2 шкалы)
2011-02-15 13:30 http://forum.msexcel.ru/profiles/jim-u4457.html
Получилось.
спасибо.

Alex_ST>> Re: Макрос переноса данных из одного файла в другой
2011-02-15 14:13 http://forum.msexcel.ru/profiles/alexst-u65623.html
Я работаю только на 2003-ем офисе, поэтому проверить не смогу, но попробуйте после копирования сделать ещё и формат по образцу:
Код:
   Selection.EntireRow.Copy wb.Sheets(1).Cells(lr + 1, 1) ' копирование
   wb.Sheets(1).Cells(lr + 1, 1).PasteSpecial Paste:=xlPasteFormats ' формат по образцу
это, конечно, "масло масляное", т.к. и так формат должен копироваться, но ведь и "кашу маслом не испортишь" Улыбка

Jim>> впр по не соответствующим значениям
2011-02-15 14:39 http://forum.msexcel.ru/profiles/jim-u4457.html
всем привет!

помогите сВПРить по не точно соответствующим данным.

к примеру, имеется следующие данные:

название     данные
Траливали      5
Лялятополя   12


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

название                                   данные
ООО Траливали                           
ЗАО Лялятополя сл жж и тп       

Возможно ли как то в данном случае сВПРить данные из первой табл во вторую?

Шпец Докапыч>> Re: впр по не соответствующим значениям
2011-02-15 14:43 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html
Выдержка из справки (2007) по [url=http://msexcel.ru/content/view/20/2/]ВПР(_)[/url]:
Цитировать
В аргументе «искомое_значение» допускается использование подстановочных знаков: вопросительного знака (?) и звездочки (*). Вопросительный знак соответствует любому знаку; звездочка — любой последовательности знаков.


kenya>> БД склад Access
2011-02-15 14:46 http://forum.msexcel.ru/profiles/kenya-u46489.html
Добрый день, помогите, пожалуйста, сделать БД учета спецодежды.
Основная задача:
1)учет остатка СО на складе (каждый вид СО может иметь износ 0,25,50,75,100%)
2)отслеживать момент износа СО и выдавать за месяц информацию по каждому цеху о кол-ве планируемой выдаче новой СО.
3)При выдаче распечатывать формы (во вложении)
4)При возврате со с износом 100% удалять запись из истории.

Prist>> Re: впр по не соответствующим значениям
2011-02-15 14:49 http://forum.msexcel.ru/profiles/prist-u4859.html
Можно как-то так:
=СУММПРОИЗВ(ЕЧИСЛО(ПОИСК($A$2:$A$3;E2))*$B$2:$B$3)

$A$2:$A$3 - Таблица, из которой данные тянем. Это первый столбец, в котором Ваши "Траливали"
$B$2:$B$3 - второй столбец таблицы с "Траливали", в котором те значения, которые надо вытянуть.
E2 - это ячейка в таблице, в которую надо подтянуть - "ООО Траливали"

Так же можно исключить из просмотра пустые ячейки:
=СУММПРОИЗВ(ЕЧИСЛО(ПОИСК($A$2:$A$3;E2))*($A$2:$A$3<>"")*$B$2:$B$3)

И чуть побыстрее формула:
=СУММПРОИЗВ(--ЕЧИСЛО(ПОИСК($A$2:$A$3;E2));--($A$2:$A$3<>"");--$B$2:$B$3)

Poltava>> Re: как узнать содержит ли имя текущего листа заданный текст
2011-02-15 15:00 http://forum.msexcel.ru/profiles/poltava-u39021.html
Что-то вроде этого:
Код:
Sub test()
Dim wsh As Worksheet
For Each wsh In ThisWorkbook.Worksheets
    If wsh.Name Like "*Увол*" Then
        wsh.Range("A5").Formula = "та формула"
    Else
        wsh.Range("A5").Formula = "или иная формула"
    End If
Next wsh
End Sub

Вставил в модуль поменял Sub на Function Все хорошо но только эта штука реагирует на все листы в книге и если хоть один из них содержит *Увол* то присваивается то или иное значение, а хотелось бы чтоб проверялось только название листа из которого эта функция вызвана то есть если я пишу в ячейке =test() то проверяеться название только того листа на котором это написано а не вся книга

Panches>> Разграничение прав на одном листе.
2011-02-15 15:33 http://forum.msexcel.ru/profiles/panches-u71138.html
Приветствую, Господа!!! Тут такое дело. Имеется некая таблица, которую необходимо разбить таким образом, что бы на одном листе находились две области, при этом одна из них защищена от изменений паролем и скрывалась по умолчанию, а вторая доступна для внесения изменений всем пользователям. Выполнимо ли это средствами MS Excel? Если да, то каким образом?
Уже долго ломаю голову и очень надеюсь на вашу помощь.
 В замешательстве

GWolf>> Re: Разграничение прав на одном листе.
2011-02-15 16:08 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Возможно, средствами VBA. Пример в студию!

Serge 007>> Re: впр по не соответствующим значениям
2011-02-15 16:10 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Или, как и просили, ВПРом:
Код:
=ВПР(ПОДСТАВИТЬ(D2;ЛЕВСИМВ(D2;НАЙТИ(" ";D2));"");$A$1:$B$3;2;0)


Panches>> Re: Разграничение прав на одном листе.
2011-02-15 16:17 http://forum.msexcel.ru/profiles/panches-u71138.html
В этом-то и дело. Никогда не сталкивался с VBA. Поэтому и обратился с таким вопросом.
На самом деле даже не представляю алгоритм реализации этих разграничений.
Это возможно только по средствам VBA или возможно есть ещё какие-то стандартные методы?

Prist>> Re: впр по не соответствующим значениям
2011-02-15 16:18 http://forum.msexcel.ru/profiles/prist-u4859.html
Сергей, у тебя слишком уж негибкая формула получается...Не совсем по частичному, т.к. если в таблице будет "ООО Траливали дядя", то уже #Н/Д...

Prist>> Re: Разграничение прав на одном листе.
2011-02-15 16:23 http://forum.msexcel.ru/profiles/prist-u4859.html
Какой у Вас Excel? Я просто уже не помню, как точно это делается в 2003, но в 2007:
вкладка Рецензирование-Разрешить изменение диапазонов.
Создаете диапазон, указываете тех пользователей, которые имею право изменять данные в этом диапазоне без пароля. Все остальные обязаны будут вводить пароль при попытке изменения. Только пароль на лист надо не забыть указать.
А скрыть можно тоже стандартно - Выделяете столбцы или строки-Правая кнопка мыши-Скрыть. Это до установки защиты листа или при снятой защите листа.

Еще уточню: чтобы все это работало примерно так, как Вам надо - необходимо сделать ВСЕ ячейки незащищенными. Подробнее здесь
И уже потом защищенные диапазоны создавать.

Serge 007>> Re: впр по не соответствующим значениям
2011-02-15 16:51 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Гибче можно так:
Код:
=ВПР(СЖПРОБЕЛЫ(ПСТР(D2;НАЙТИ(" ";D2)+1;ЕСЛИ(ЕОШ(НАЙТИ(" ";D2;НАЙТИ(" ";D2)+1)-НАЙТИ(" ";D2));ДЛСТР(D2)-НАЙТИ(" ";D2);НАЙТИ(" ";D2;НАЙТИ(" ";D2)+1)-НАЙТИ(" ";D2))));$A$1:$B$3;2;0)
но при отсутствии примера не хотелось заморачиваться...

Prist>> Re: впр по не соответствующим значениям
2011-02-15 17:00 http://forum.msexcel.ru/profiles/prist-u4859.html
И все равно мне кажется, что такой метод не гибкий...Я имел ввиду именно то, что у тебя не вхождение ищется, а строгое слово. К примеру "ООО БаТраливали_" - твоя формула уже не поднимет. Вдруг будет не второе слово именно искаться, а первое? Или вообще одно слово будет...Я это имел ввиду. Т.е. по сути средствами ВПР это очень плохо реализуется.
Если уж на то пошло и нужно не только числовые данные вывести, но и любые, то лучше так:

=ПРОСМОТР(2;1/(ЕЧИСЛО(ПОИСК($A$2:$A$3;E2)));$B$2:$B$3)

$A$2:$A$3 - Таблица, из которой данные тянем. Это первый столбец, в котором Ваши "Траливали"
$B$2:$B$3 - второй столбец таблицы с "Траливали", в котором те значения, которые надо вытянуть.
E2 - это ячейка в таблице, в которую надо подтянуть - "ООО Траливали"

ZORRO2005>> Высота строк
2011-02-15 17:09 http://forum.msexcel.ru/profiles/zorro2005-u4225.html
Друзья,
есть разные по высоте строки.
Подскажите макрос или польз. функцию, чтобы проставилась высота строки в выделенные ячейки.



_Boroda_>> Re: как узнать содержит ли имя текущего листа заданный текст
2011-02-15 17:12 http://forum.msexcel.ru/profiles/boroda-u12234.html
Такой вариант
Код:
Function test(r_ As Range)
test = 2
If r_.Worksheet.Name Like "*Увол*" Then test = 1
End Function
в ячейку пишем =test(ссылка на любую ячейку)


Шпец Докапыч>> Re: Высота строк
2011-02-15 17:16 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html
Пользовательская функция:
Код:
Function ВЫС()
  Application.Volatile
  ВЫС = Application.ThisCell.Height
End Function

Проставить в выделенные:
Код:
Sub ВЫСОТЫ()
  For Each i In Selection
    i.Value = i.Height
  Next
End Sub


ZORRO2005>> Re: Высота строк
2011-02-15 17:38 http://forum.msexcel.ru/profiles/zorro2005-u4225.html
Шпец Докапыч,
спасибо большое!
С возвращением!

Panches>> Re: Разграничение прав на одном листе.
2011-02-15 17:42 http://forum.msexcel.ru/profiles/panches-u71138.html
Спасибо! Помогло! Немного разберусь с VBA и скоро выложу пример Веселый

Serge 007>> Re: впр по не соответствующим значениям
2011-02-15 17:46 http://forum.msexcel.ru/profiles/serge_007-u25260.html
И все равно мне кажется, что такой метод не гибкий...
Да я и не претендую...
Я обычно решения предлагаю согласно приложенному примеру и только под настроение додумываю за автора как там ещё может быть Улыбка

Десант>> Re: Перенос данных в другой файл
2011-02-15 17:59 http://forum.msexcel.ru/profiles/desant-u4301.html
Величезне спасибі. Усе працює!

zardanec>> Адресная ячейка, разнос по столбцам.
2011-02-15 18:51 http://forum.msexcel.ru/profiles/zardanec-u71144.html
Здравстуйте,

имеется следующая проблема:

1)имеется xlsx фаил вида - столбцы:

Название   Индекс   Адрес   Округ/Район   Рубрика   Телефон/факс   E-mail   вид ул.   Дом   улица   Город    Тип селения

Необходимо колонку адрес разнести по столбцам: вид ул.   Дом      улица   Город    Тип селения

Для примера: "Маршала Рыбалко ул. 8" мы его разносим руками следующим образом: вид ул. = улица, дом = 8, улица = Маршала Рыбалко
                    "Дмитровское ш. 110" мы его разносим руками следующим образом: вид ул. = шоссе, дом = 110, улица = Дмитровское
                    "Электролитный пр. 3, строен. 12" мы его разносим руками следующим образом: вид ул. = проезд, дом = 3, строение 12, улица =         Электролитный

Город и тип селения я сделаю руками(по дефолту город Москва, если в этой ячейке нет других указаний). Так же большая проблема заключается в том, что ячейки могут отличаться от вида, который я указал в примере.

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

Запесей будет больше 200...

BASS>> Re: впр по не соответствующим значениям
2011-02-15 19:33 http://forum.msexcel.ru/profiles/bass-u71149.html
попробуй так =ВПР("*"&ссылка на ячеку - траливали&"*";диапазон таблицы;номер столбца;0)

Natf>> Re: Обработка данных автосамописца
2011-02-15 20:08 http://forum.msexcel.ru/profiles/natf-u70580.html
Уважаемые участники форума, возможно, вы можете помочь еще в аналогичной ситуации. Имеются суточные данные (один замер в течение суток) количества атмосферных осадков в мм. Очень хотелось бы автоматизировать задачу их обработки следующим образом, чтобы выводились суммарные данные по декадам месяца и за месяц, как в примере, который я выкладываю в теме.

MCH>> Re: Обработка данных автосамописца
2011-02-15 21:45 http://forum.msexcel.ru/profiles/mch-u48782.html
сводными таблицами можно легко настроить любой отчет

Sergey112233>> Re: как передать аргумент?
2011-02-15 22:00 http://forum.msexcel.ru/profiles/sergey112233-u57126.html
GWolf,
Добрый вечер.
Профессионально и  еще раз профессионально, но понятно!
С удовольствием читаю Ваш вариант. Нашел примеры применения некоторых конструкций, которые хотелось бы прочитать в книге. Спасибо.

Sergey112233>> Re: как передать аргумент?
2011-02-15 22:11 http://forum.msexcel.ru/profiles/sergey112233-u57126.html
GWolf,
уважаемые форумчане.

На этом месте останов - ошибка 438
Код:
oDates i, .ActiveSheet.Name '- передаем в функцию номер строки и имя рабочего листа
       

nilem>> Re: Обработка данных автосамописца
2011-02-15 22:48 http://forum.msexcel.ru/profiles/nilem-u30547.html
С кнопочкой  Улыбка

nilem>> Re: как передать аргумент?
2011-02-15 22:58 http://forum.msexcel.ru/profiles/nilem-u30547.html
Попробуйте так:
oDates i, .Name
т.к. все происходит внутри With ActiveSheet

Sergey112233>> Re: как передать аргумент?
2011-02-15 23:08 http://forum.msexcel.ru/profiles/sergey112233-u57126.html
nilem,
Отлично работает. Спасибо Улыбка

Natf>> Re: Обработка данных автосамописца
2011-02-16 02:05 http://forum.msexcel.ru/profiles/natf-u70580.html
Огромное спасибо участникам форума за отзывчивость и различные красивые решения представленной задачи!

yarkovoy>> Re: Разбросать данные по шаблону
2011-02-16 03:58 http://forum.msexcel.ru/profiles/yarkovoy-u70900.html
Всем доброго времени суток!

Я таки разобрался с циклами и копированием в буфер (была ошибка в синтаксисе) и реализовал
полностью то что мне было нужно и даже чуть  больше Подмигивающий
Огромное спасибо GWolf за указание в каком направлении надо было двигаться.

Вот что у меня получилось.
Цитировать
Attribute VB_Name = "Module1"
Sub Автозаполнение()
    With ThisWorkbook
        With .Worksheets("Лист1")
            nR = 1
                Sheets("Шаблон").Select
                Sheets("Шаблон").Name = "ДЗ"
            Do

                Sheets("Лист1").Select
                Cells(nR, 1).Copy
                Sheets("ДЗ").Select
                ActiveSheet.Paste Destination:=Worksheets("ДЗ").Range("E15:I15")
                Sheets("Лист1").Select
                Range(Cells(nR, 3), Cells(nR, 2)).Copy
                Sheets("ДЗ").Select
                ActiveSheet.Paste Destination:=Worksheets("ДЗ").Range("A1")
                Range("E16").Select
                ActiveCell.FormulaR1C1 = "=CONC...


KuklP>> Re: Разбросать данные по шаблону
2011-02-16 05:27 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Вы мой последний пример смотрели? Там от слияния только название осталось. Макрос, как Вам и надо тиражирует шаблон. Ну, дело ваше.

yarkovoy>> Re: Разбросать данные по шаблону
2011-02-16 06:08 http://forum.msexcel.ru/profiles/yarkovoy-u70900.html
KuklP
О точно. Подумал что как и в предыдущем через Word.
Посмотрел ваш код. Очень простой. В след. раз как понадобится оттолкнусь от вашей
реализации.

GWolf>> Re: Разбросать данные по шаблону
2011-02-16 07:18 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Я таки разобрался с циклами и копированием в буфер ... и реализовал
полностью то что мне было нужно и даже чуть  больше Подмигивающий...

Очень рад, что макрописателей ПРИБЫЛО! Удачи и НОВЫХ ОТКРЫТИЙ. А если не будет открываться  Подмигивающий - обращайтесь, поможем!

GWolf>> Re: как передать аргумент?
2011-02-16 07:22 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Попробуйте так:
oDates i, .Name
т.к. все происходит внутри With ActiveSheet

Спасибо ув. nilem! А ведь верно!

GWolf>> Re: Адресная ячейка, разнос по столбцам.
2011-02-16 07:45 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Т.е. имеем базу (колонки с 1-й по 7-ую) и из нее надо заполнить колонки с 8-й по 12-ю?
Если это так, то видим, что разбору, собственно следует подвергнуть колонку № 3 - Адрес.
Разобрать ее предлагаю:
1) - при помощи макропрограммы на VBA;
2) - для разбора использовать заранее составленные словари стандартных значений.

Что думаете по данному поводу?

GWolf>> Re: Адресная ячейка, разнос по столбцам.
2011-02-16 08:11 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Вот для начала. На скрепке файл.

jlik>> Re: как сравнить 2 даты в Excel
2011-02-16 09:21 http://forum.msexcel.ru/profiles/jlik-u19420.html
И все же нельзя сравнить с помощью функции ЕСЛИ , например  даты  24.12.2009 и 11.01.2010,  , будет писать что дата 24.12.2009 юлльше даты 11.01.2010, а если сравнивать одно года то функция работает..., а с разными годами нет, что можно придумать?

Wasilic>> Re: как сравнить 2 даты в Excel
2011-02-16 09:38 http://forum.msexcel.ru/profiles/wasilic-u24852.html
А формула правильная?
A1=24.12.2009
B1=11.01.2010

Формула в С1   =ЕСЛИ(A1>B1;A1;B1)   должна показать более позднюю (большую) дату 11.01.2010

jlik>> Re: как сравнить 2 даты в Excel
2011-02-16 09:45 http://forum.msexcel.ru/profiles/jlik-u19420.html
Если А1>B1, я записываю формулу так =ЕСЛИ(N15>P15;"истина";"ложь"), и если брать дату 25.12.2009 и 11.01.2010 то выдается значение Истина, что меня не устраивает так как 2010 больше чем 2009

Wasilic>> Re: как сравнить 2 даты в Excel
2011-02-16 09:55 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Какая дата в N15  а какая в Р15?

dmitriy_sin>> вычисление итогового значения
2011-02-16 09:56 http://forum.msexcel.ru/profiles/dmitriysin-u4526.html
как вычислить значения в ячейке итого по условию

jlik>> Re: как сравнить 2 даты в Excel
2011-02-16 10:22 http://forum.msexcel.ru/profiles/jlik-u19420.html
N15  25.12.2009
P15  11.01.2010

Wasilic>> Re: как сравнить 2 даты в Excel
2011-02-16 10:49 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Выложите пример сюда.
Если инфа секретная, выложите с одной строкой № 15 оставив даты и формулу.

Wasilic>> Re: вычисление итогового значения
2011-02-16 10:54 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Здравствуйте. Если так не пойдет, то может кто иначе решит.

ЗЫ Исправил ошибку.

Wasilic>> Re: как сравнить 2 даты в Excel
2011-02-16 11:07 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Проверьте правильность написания дат. Такого быть не должно!
Смотрите пример.

jlik>> Re: как сравнить 2 даты в Excel
2011-02-16 11:12 http://forum.msexcel.ru/profiles/jlik-u19420.html
там формат дата

jlik>> Re: как сравнить 2 даты в Excel
2011-02-16 11:22 http://forum.msexcel.ru/profiles/jlik-u19420.html
я посомтрела ваш пример, но я тогда не понимаю почему у меня такая вещь происходит стоит фармат дата... пробелов нет внутри дат...

Wasilic>> Re: как сравнить 2 даты в Excel
2011-02-16 11:42 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Откуда берутся даты? Они изначально написаны в текстовом формате а потом ячейка переведена в формат даты но дата осталась как текст.
Попробуйте перевести формат на числовой - он не переводится.
Если это единственная строка то перепишите даты по новой ручками.

Serge 007>> Re: как сравнить 2 даты в Excel
2011-02-16 11:49 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Код:
=ЕСЛИ(--N5>P5;"истина";"ложь")
Код:
=ЕСЛИ(ДАТАЗНАЧ(N5)>P5;"истина";"ложь")


jlik>> Re: как сравнить 2 даты в Excel
2011-02-16 11:51 http://forum.msexcel.ru/profiles/jlik-u19420.html
я поняла вас  у меня даты на 19 тыс строк...перебить руками не возможно, а даты копируются из другого файла..., не могли бы вы посоветовать, что тогда можно сделать чтобы не пербивать руками, но сравнить даты можно было бы? буду очень очень признательна Улыбка

Wasilic>> Re: как сравнить 2 даты в Excel
2011-02-16 11:57 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Serge 007 Уже ответил!

iron priest>> Re: как сравнить 2 даты в Excel
2011-02-16 12:42 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
или сделать текст по столбцам для колонок дат и тогда обычное сравнение будет працювать

_Boroda_>> Re: вычисление итогового значения
2011-02-16 12:42 http://forum.msexcel.ru/profiles/boroda-u12234.html
Еще вариант

Jim>> Re: впр по не соответствующим значениям
2011-02-16 12:47 http://forum.msexcel.ru/profiles/jim-u4457.html
всем спасибо за ответы.
я понимаю что пример у меня получился маленький, поэтому не все формулы подошли.

вот более подходящий пример:
Табл.1
Название                          Данные
Траливали                         5
Лялятополя                       12
ВасяПупкин                       55
ООО Епрст                        100


Табл.2
Название                           Данные
ООО Траливали           
ЗАО Лялятополя и пп и кк
епрст_фууф       
Пупкин Вася                 

Wasilic>> Re: вычисление итогового значения
2011-02-16 13:07 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Еще вариант
Улыбка _Boroda_ от твоих формул мозги закипают.
Откуда выражение оценки!  В замешательстве

ЗЫ  Тут еще выразились: - и процесор задымил!   Смеющийся

_Boroda_>> Re: вычисление итогового значения
2011-02-16 13:18 http://forum.msexcel.ru/profiles/boroda-u12234.html
Цитировать
Откуда выражение оценки!
Это вопрос?

jlik>> Re: как сравнить 2 даты в Excel
2011-02-16 13:23 http://forum.msexcel.ru/profiles/jlik-u19420.html
Спасибо большое, мне пришлось так же поставить  2 черточки и у второго значения, вроде все работает...скажите пожалуйста а что означают эти черточки я с таким не встречалась ни разу, значение дата не работает выдает ошибку в некоторых строках # знач, а с черточками работает во всех строках.Еще раз спасибо

Wasilic>> Re: вычисление итогового значения
2011-02-16 13:33 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Ну да!
Откуда берется текст оценки - "Удовлетворительно"

Serge 007>> Re: как сравнить 2 даты в Excel
2011-02-16 13:51 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Ответ Вам ренее уже дал уважаемый Wasilic:
Откуда берутся даты? Они изначально написаны в текстовом формате а потом ячейка переведена в формат даты но дата осталась как текст.
Бинарное отрицание -- превращает текст в число (в вашем случае дату, которая тоже является числом).

Serge 007>> Re: вычисление итогового значения
2011-02-16 13:55 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Откуда берется текст оценки - "Удовлетворительно"
Отвечу за _Boroda_  (надеюсь он не против Улыбка ).
Wasilic, встаньте в ячейку с итогом и нажмите Ctrl+1 Подмигивающий

ЗЫ Хотелось решить эту задачу с помощью ЧАСТОТА(). У кого-нибудь получилось?

Jim>> Re: впр по не соответствующим значениям
2011-02-16 13:57 http://forum.msexcel.ru/profiles/jim-u4457.html
Jim, 165 постов на форуме и до сих пор выкладываете текст вместо примера...


честно, просто лень было в excele пример делать, потом загружать сюда... Улыбка
в следующий раз постараюсь норм пример сделать. Подмигивающий

jlik>> Re: как сравнить 2 даты в Excel
2011-02-16 14:00 http://forum.msexcel.ru/profiles/jlik-u19420.html
большое спасибо всем ! Улыбка

zardanec>> Re: Адресная ячейка, разнос по столбцам.
2011-02-16 15:08 http://forum.msexcel.ru/profiles/zardanec-u71144.html
Было бы не плохо, упростило бы многое.

Скачал прикрепленный фаил, что-то я в нем не разобрался, не могли бы вы его каким-либо образом прокомментировать?
Возможно проблема в том что я его запускаю сейчас на работе в опенофисе, т.к. стоит линукс?

С уважением, Сергей.

zardanec>> Re: Адресная ячейка, разнос по столбцам.
2011-02-16 15:12 http://forum.msexcel.ru/profiles/zardanec-u71144.html
Не увидел фильтры вверху, простите.

А возможно ли разобрать ячейки следующим образом:

есть в ячейке адрес "Электролитный пр. 3, строен. 12"

Написать формулы в ячейки, чтобы те записывали данные, в название улицы она записывала, то что перед 1 пробелом "улица = Электролитный", а то что перед точкой, но после пробела она брала "пр" и сравнивала его с словарем и записывала в ячейку "вид ул. = проезд", а все что после первой точки записывала в "Дом = пр. 3, строен. 12 "?

Prist>> Re: впр по не соответствующим значениям
2011-02-16 15:20 http://forum.msexcel.ru/profiles/prist-u4859.html
Знаете что - даже думать не хочу. Вам для решения ВАШЕЙ задачи лень делать пример. Мне тем более лень делать пример для решения ВАШЕЙ задачи.
Скажу лишь одно: здесь ни одна формула не сдюжит. А если справиться - то она будет ворочаться, как еж зимой....

То, что Вы хотите - это даже не частичное совпадение, а поиск чего-то где-то. Сопоставление хаотичной и неструктурированной информации с каким-то таким же хаотизмом. Это пришло мне в голову, глядя на это:
ВасяПупкин = Пупкин Вася
ООО Епрст = епрст_фууф

Можно только макросом - и то не так просто.

Wasilic>> Re: вычисление итогового значения
2011-02-16 15:31 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Serge 007 спасибо.
Ув. _Boroda_ , я тут сравнил результаты расчетов - не сходится. Видимо кто-то из нас не прав.
Смотрите, поправляйте.

hammer7>> Re: Уникальные записи по нескольким критериям
2011-02-16 16:31 http://forum.msexcel.ru/profiles/hammer7-u10499.html
Помогите посчитать уникальные значения (фамилии) по нескольким критериям.

Cepik>> найти х при известном у
2011-02-16 16:49 http://forum.msexcel.ru/profiles/cepik-u71267.html
есть значения х и у
с помощью функций предсказ можно определить значение у соответств. х
а надо наоборот т.е. найти х при известном у

допустим след. пример

у      х
1   2
2   4
3   6
4   8
5   10
0       ?

Заранее спс!  Улыбка


GWolf>> Re: Адресная ячейка, разнос по столбцам.
2011-02-16 16:58 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Ну для начала определимся с городом ...

В заголовке колонки "Адрес" нажимаете на крепыша и поехали.

_Boroda_>> Re: вычисление итогового значения
2011-02-16 17:00 http://forum.msexcel.ru/profiles/boroda-u12234.html
Ага, точно. Формат ячейки перепутал. Нужно "Отлично";"Удовлетворительно";"Хорошо"

_Boroda_>> Re: как сравнить 2 даты в Excel
2011-02-16 17:07 http://forum.msexcel.ru/profiles/boroda-u12234.html
А что бы просто (без черточек) не написать
=ЕСЛИ(N5-P5>0;"истина";"ложь")?

С.М.>> Re: Обработка данных автосамописца
2011-02-16 17:38 http://forum.msexcel.ru/profiles/sm-u19758.html
Natf, с учётом Ваших замечаний:

IKor>> Re: найти х при известном у
2011-02-16 18:29 http://forum.msexcel.ru/profiles/ikor-u6827.html
Обманите ее Улыбка
Назовите столбец Х литерой Y, а столбец Y литерой X.

mnmlan>> Определения результатов
2011-02-16 23:11 http://forum.msexcel.ru/profiles/mnmlan-u71293.html
Имеется 2 столбца (M,N). 1 столбец (M) результат время потраченное командой на дистанцию, 2 столбец (N) место которое заняла команда в соревнования. какой формулой воспользоваться чтоб определить место каждой команды в соревновании. 1 место - самое маленькое потраченное время, и т.д.

Faul163>> Помощь по Excel создание индексов
2011-02-16 23:30 http://forum.msexcel.ru/profiles/faul163-u71297.html
Есть список московский адресов. Как сделать так чтобы по этим всем адресам найти их почтовые индексы и вписать рядом в соседние ячейки? Список очень большой. В ручную все не получится

Serge 007>> Re: Определения результатов
2011-02-17 00:03 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Код:
=РАНГ(M6;$M$6:$M$21;-1)


Serge 007>> Re: Помощь по Excel создание индексов
2011-02-17 00:05 http://forum.msexcel.ru/profiles/serge_007-u25260.html
А нам догадаться надо как список выглядит?
Пример давайте.

ЗЫ Без примера могу только [url=http://msexcel.ru/content/view/20/2/]ВПР(_)[/url] посоветовать.

iron priest>> Re: Бюджет с помощю сводных таблиц Excel
2011-02-17 00:13 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
подскажите, можно ли в сводной таблице сделать атк шобы выводились стоблцы за полугодие, за 9 мес. и за год. сама таблица соответственно состоит из 4 кварталов

нада получить таблицу следующиего вида

1 кв 2 кв полугодие 3 кв 9 мес 4 кв год

Serge 007>> Re: Бюджет с помощю сводных таблиц Excel
2011-02-17 00:36 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Можно.
Пример давай.

С.М.>> Re: вычисление итогового значения
2011-02-17 02:03 http://forum.msexcel.ru/profiles/sm-u19758.html
Тоже отмечусь в теме:


demonnsk>> Re: Автоматическое создание таблиц
2011-02-17 04:34 http://forum.msexcel.ru/profiles/demonnsk-u70893.html
вот таблица

Cepik>> Re: найти х при известном у
2011-02-17 06:36 http://forum.msexcel.ru/profiles/cepik-u71267.html
думал об этом! но не получится!
в таком случае сама функция меняется!  Улыбка

GWolf>> Re: Автоматическое создание таблиц
2011-02-17 08:06 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Таблицу посмотрел! Хотя и открылась с ошибками.
Ну что ж. Ваша задумка вполне реализуема, только есть нюанс. Если Вы хотите все увязать функциями и формулами листа, то это не ко мне. Если же на VBA, то я могу помочь - ПОДСКАЗАТЬ.

GWolf>> Re: впр по не соответствующим значениям
2011-02-17 08:17 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Согласен с ув. Prist, что данная задача вообщем то легко реализуема макросом, но автору топика ЛЕНЬ. А для ленивых как то не оч. хочется заморачиваться. Хотя, господа, лень - двигатель прогресса. Но в данном случае, господа, мы имеем дело с другой ее разновидностью. Прогрессу - кирдык!!! Смеющийся

iron priest>> Re: Бюджет с помощю сводных таблиц Excel
2011-02-17 08:51 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
осё

demonnsk>> Re: Автоматическое создание таблиц
2011-02-17 09:30 http://forum.msexcel.ru/profiles/demonnsk-u70893.html
подскажите. Можно на примере. Думаю разбирусь. Привяжу к своей таблице

Panches>> Прятать и ещё раз прятать!
2011-02-17 09:41 http://forum.msexcel.ru/profiles/panches-u71138.html
А возможно ли сделать так, что бы при отключенных макросах файл не открывался или не отображались листы?

Cepik>> Re: найти х при известном у
2011-02-17 09:44 http://forum.msexcel.ru/profiles/cepik-u71267.html
разобрался! Веселый
просто определил к и b если принять что y=kx+b то 1 уравнение с 1 неизвестным! (=
формулы:
к=ПРЕДСКАЗ(0;знач. у ; знач. х)
b=ЛИНЕЙН(знач. у ; знач. х) или =НАКЛОН(знач. у ; знач. х)
точка пересечений=-к/b
 Улыбка

Serge 007>> Re: Бюджет с помощю сводных таблиц Excel
2011-02-17 10:28 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Лови.

MCH>> Re: найти х при известном у
2011-02-17 11:30 http://forum.msexcel.ru/profiles/mch-u48782.html
А все таки, что мешает просто ПРЕДСКАЗ использовать, поменяв пместами X и Y?

hammer7>> Re: Уникальные записи по нескольким критериям
2011-02-17 11:47 http://forum.msexcel.ru/profiles/hammer7-u10499.html
Уже и сводными пытался - никак не получается у меня (ни формулами, ни СТ). Выручайте, гуру!!!

vladturbo>> Проверка наличия уникальности имени листа в книге Excel
2011-02-17 11:56 http://forum.msexcel.ru/profiles/vladturbo-u56826.html
Добрый день.
Существует необходимость по клику на кнопке (размещенной на Лист1) создавать новый лист, присваивать ему имя из ячейки А1 Лист1, в ячейку А1 вновь созданного листа вставлять данные из ячейки А1 Лист1. Все это работает - вот код макроса:

Private Sub CommandButton1_Click()
Range("A1").Select
Selection.Copy
Dim Msg As String, MyString As String
    Dim Btns As Integer
    Dim Title As String, Help As String
    Dim NmbCont As Integer, Result As Integer
    Title = " Добавление нового сотрудника "
    Msg = " Добавить сотрудника ? "
    Btns = vbYesNo + vbDefaultButton2
    Result = MsgBox(Msg, Btns, Title, NmbCont)
    If Result = vbYes Then
    MyString = "Да"
        Set sh = ActiveSheet
        Sheets.Add after:=Sheets(Sheets.Count)
        Sheets(Sheets.Count).Name = sh.Range("A1")
        ActiveSheet.Paste
        Application.CutCopyMode = False
        Sheets("Лист1").Select
        Range("A1").Select
                    If Result = vbAbort Then
                    M...

Cepik>> Re: найти х при известном у
2011-02-17 11:59 http://forum.msexcel.ru/profiles/cepik-u71267.html
значения разные получаются...
скорее всего дело в точности или сама функция меняется...

_Boroda_>> Re: Прятать и ещё раз прятать!
2011-02-17 12:00 http://forum.msexcel.ru/profiles/boroda-u12234.html
про листы - так?

Prist>> Re: Проверка наличия уникальности имени листа в книге Excel
2011-02-17 12:23 http://forum.msexcel.ru/profiles/prist-u4859.html
Здравствуйте.
Я вот здесь описывал, как проверить наличие листа в книге.

dmitriy_sin>> Re: вычисление итогового значения
2011-02-17 12:27 http://forum.msexcel.ru/profiles/dmitriysin-u4526.html
Большое спасибо всем вроде всё получается!!!

vladturbo>> Re: Проверка наличия уникальности имени листа в книге Excel
2011-02-17 12:54 http://forum.msexcel.ru/profiles/vladturbo-u56826.html
Спасибо, однако используя Ваш код создается Лист с очередным текущим №  Лист4, Лист5, или Лист6 и т.п. (если имя Листа совпадает с уже существующим), если имя Листа не совпадает с существующими, выполняется необходимое мне условие создается Лист с нужным именем (имя берется из ячейки А1 Лист1).

vladturbo>> Re: Проверка наличия уникальности имени листа в книге Excel
2011-02-17 13:30 http://forum.msexcel.ru/profiles/vladturbo-u56826.html
GWolf  благодарю за исчерпывающий ответ!


GWolf>> Re: Проверка наличия уникальности имени листа в книге Excel
2011-02-17 13:35 http://forum.msexcel.ru/profiles/gwolf-u4652.html
GWolf  благодарю за исчерпывающий ответ!


Нэма за що! - Пожалуйста, по украински!  Смеющийся Подмигивающий

Удачи! Обращайтесь.

andruxa-xa>> Как заменить часть выражения в одной колонке на другИЕ выражения
2011-02-17 14:09 http://forum.msexcel.ru/profiles/andruxaxa-u43158.html
Здравствуйте.

У меня такая ситуация. Есть 2 столбика коротких фраз. В одном столбике в каждой ячейке есть одни и те же слова (назовем из ключами). Нужно чтобы в первую колонку вместо ключа подставились данные из второй колонки.

Например:

 1 колонка | 2 колонка

Купить авто. | лучшее авто у нас
Продать авто. | автомобиль по выгодной цене

Я хочу из этого получить результат в одной колонке:


Купить лучшее авто у нас.
Продать автомобиль по выгодной цене.

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

Шпец Докапыч>> Re: Как заменить часть выражения в одной колонке на другИЕ выражения
2011-02-17 14:16 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html
Используй функцию ПОДСТАВИТЬ().

Prist>> Re: Уникальные записи по нескольким критериям
2011-02-17 14:17 http://forum.msexcel.ru/profiles/prist-u4859.html
Было бы проще, если бы было известно, что в результате должно получиться. Я предположил, что действительно уникальные нужны по всем возрастам. Формула массива:

=СУММ(ЕСЛИ(ЧАСТОТА(ПОИСКПОЗ(ФИО&Возраст;ФИО&Возраст;0);ПОИСКПОЗ(ФИО&Возраст;ФИО&Возраст;0));ЕСЛИ(Организация=ИТОГИ!C$7;1);))

rssred>> как удалить ячейки содержащие 1 или два слова
2011-02-17 14:38 http://forum.msexcel.ru/profiles/rssred-u71421.html
как удалить ячейки содержащие 1 или два слова, оставив только те которые содержат от 3 слов?

Шпец Докапыч>> Re: как удалить ячейки содержащие 1 или два слова
2011-02-17 14:50 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html
Если слова разделены только пробелом, то используй формулу для их подсчёта:
  • =ДЛСТР(A1)-ДЛСТР(ПОДСТАВИТЬ(A1;" ";""))+1

Ну а далее проблем с удалением не должно возникнуть.

oljachak>> Подсчет количества и вывод остатка
2011-02-17 14:51 http://forum.msexcel.ru/profiles/oljachak-u65254.html
Дорогие умники и умники,

помогите решить проблему. В файле 2 таблицы. С первой нет проблем, она высчитывает по количеству палеток нужное количество материала.
А проблема со второй таблицей, как сделать, чтобы по количеству материала высчитывалась количество палеток и остаток материала выводился отдельно.

Заранее благодарю!

rssred>> Re: как удалить ячейки содержащие 1 или два слова
2011-02-17 14:52 http://forum.msexcel.ru/profiles/rssred-u71421.html
можно сразу рабочую формулу, а то я вообще в ехел ничего не пониаю((

KuklP>> Re: как удалить ячейки содержащие 1 или два слова
2011-02-17 14:55 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Выделить ячейку, [abbr=клик правой кнопкой мыши]ПКМ[/abbr] - удалить. Ответить на вопрос Экса - куда сдвинуть оставшиеся. А формулы не умеют удалять ячейки.

Шпец Докапыч>> Re: как удалить ячейки содержащие 1 или два слова
2011-02-17 15:01 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html
можно сразу рабочую формулу?
Рабочая формула действий:
  • Столбец А - список фраз
  • Столбец B - формула из #2
  • Данные → Сортировка → Сортировать по: Столбец В
  • или Данные → Фильтр → Автофильтр → Условие для столбца В: равно 3


dima070>> как решить задачу без макрасов
2011-02-17 15:04 http://forum.msexcel.ru/profiles/dima070-u71418.html
задание прикреплено
1.Как  настроить формулы, для расчета математического ожидания,стандартного отклонения ряда котировок (лист "Данные_1") для заданной валюты на заданном диапазоне дат, необходимо предусмотреть возможность выбора соответствующих кодов валют и дат из выпадающих списков.без макроса.
2.как построить на одной диаграмме гистограмму с группировкой и накоплением.

hammer7>> Re: Уникальные записи по нескольким критериям
2011-02-17 15:17 http://forum.msexcel.ru/profiles/hammer7-u10499.html
Ну правильно вы предположили - посчитать нужно все поля, закрашенные цветом.
Это возможно?

Prist>> Re: Уникальные записи по нескольким критериям
2011-02-17 15:31 http://forum.msexcel.ru/profiles/prist-u4859.html
Вы бы вручную заполнили, что должно получиться. Я формулу выложил как посчитать уникальные по возрасту, ФИО и организации ВМЕСТЕ. Т.е. для ИТОГО. Вы же не утрудились пояснить что и куда и как. У Вас же там только Итого заполнена. А вообще: если надо подсчитать уникальных по ФИО и Организации, входящих в определенную возрастную группу - то организация итоговой таблицы не очень-то для этого располагает.

Вот так можно(см.вложение). При желании столбцы с возрастом можно скрыть.

hammer7>> Re: Уникальные записи по нескольким критериям
2011-02-17 16:07 http://forum.msexcel.ru/profiles/hammer7-u10499.html
Спасибо огромное, уже большая часть решена, только получилось задвоение (я так понял, что пенсионеры дважды посчитались).
Если у меня правильно посчитана общая численность(?), то она не равна Итоговой из таблицы.
Подскажите как избежать задвоения пенсионеров. В исходной таблице более 21000 строк и 18 столбцов - сами понимаете, разница будет существенная.
Если есть идеи по организации итоговой таблицы - буду признателен!!! Ниже планирую на основе формул в данной итоговой таблице вести подсчет по образованию, может по учебному заведению и т.д.

dima070>> как создать массив
2011-02-17 16:11 http://forum.msexcel.ru/profiles/dima070-u71418.html
Как  настроить формулы, для расчета математического ожидания,стандартного отклонения ряда котировок (лист "Данные_1") для заданной валюты на заданном диапазоне дат, необходимо предусмотреть возможность выбора соответствующих кодов валют и дат из выпадающих списков.
                        036                 826
                        AUD                 GBP
                  Австрал.доллар   Фунт стерлингов Соединенного Королевства
01.02.2010   27,1903                  49,2073
02.02.2010   26,8641                  48,4418
03.02.2010   26,5278                  48,0242
04.02.2010   26,5495         47,9421
05.02.2010   26,3867                  47,6426
06.02.2010   26,2866                  47,7046
07.02.2010   26,2866                  47,7046
08.02.2010   26,2866                  47,7046
09.02.2010   26,5304                  47,6565
10.02.2010   26,4918                  47,4434
11.02.2010   26,4926                  47,3776
12.02.2010   26,7656                  46,9731
13.02.2010   26,8058                  47,3926
14.02.2010   26,8058        47,3...

dima070>> как построить диаграмму следующего типа
2011-02-17 16:24 http://forum.msexcel.ru/profiles/dima070-u71418.html
пример вложен

srp>> вичитание дат
2011-02-17 16:39 http://forum.msexcel.ru/profiles/srp-u70948.html
добрый день.
подскажите, как можно из одной даты вычесть другую а результат увидеть в месяцах? при этом иметь в виду, что месяцы имеют разное кол-во дней.
заранее спасибо.


Шпец Докапыч>> Re: как создать массив
2011-02-17 16:44 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html
А где математические формулы, который надо настраивать под Excel?
Для математического ожидания достаточно будет СРЗНАЧ()?
Стандартное отклонение - это константа или его тоже надо рассчитывать?
Выпадающие списки задаются через Данные → Проверка → Параметры → Тип данных: список.

/Насколько я понимаю, представленный список котировок и есть [abbr=Сокращённо от Скопировать -> Вставить]копипаст[/abbr] с листа "Данные_1".

Prist>> Re: Уникальные записи по нескольким критериям
2011-02-17 16:46 http://forum.msexcel.ru/profiles/prist-u4859.html
А как Вы исключите пенсионеров, если у Вас таблица организована так, что:
-сначала Вы подсчитываете ВСЕХ сотрудников в возрасте 56-60 лет;
-затем еще одна строка таблицы считает Женщин старше 55 лет(что уже задваивает указанную выше категорию);
-а еще одна строка считает Мужчины старше 60 лет - здесь нет задвоения, т.к. в диапазон не входит.

Вот и получается, что у Вас женщины считаются ДВА раза. Сами думайте как Вам сделать так, чтобы этого не было - я же целей Ваших не знаю.

Prist>> Re: вичитание дат
2011-02-17 16:48 http://forum.msexcel.ru/profiles/prist-u4859.html
=РАЗНДАТ(Дата1;Дата2;"m")

dima070>> Re: как создать массив
2011-02-17 16:54 http://forum.msexcel.ru/profiles/dima070-u71418.html
формулы для мат.ожидания срзнач(),вопросов в другом: как записать массив, чтобы при изменении кода валюты и промежутка дат выводились значения мат. ожидания для данной валюты и данного промежутка времени,не используя макрос.

hammer7>> Re: Уникальные записи по нескольким критериям
2011-02-17 16:59 http://forum.msexcel.ru/profiles/hammer7-u10499.html
Спасибо за внимание к моей проблеме!
Пенсионный возраст для женщин - 55 лет, для мужчин - 60.
Соответственно, в категорию сотрудников 56-60 лет могут попадать только мужчины.
Давайте сделаем по-другому: последняя предпенсионная категория будет: от 46 лет и до пенсионного возраста (женщины <55; мужчины <60). Это можно реализовать?

Prist>> Re: Уникальные записи по нескольким критериям
2011-02-17 17:09 http://forum.msexcel.ru/profiles/prist-u4859.html
Ну так в чем дело? Надо-то лишь условие добавить для формулы в 13 строке(56-60 лет)

=СУММ(ЕСЛИ(ЧАСТОТА(ПОИСКПОЗ(ФИО;ФИО;0);ПОИСКПОЗ(ФИО;ФИО;0));ЕСЛИ((Организация=ИТОГИ!D$7)*(Возраст>=$A13)*(Возраст<=$B13)*(Рабочий!$C$2:$C$24="Мужской");1);))

Шпец Докапыч>> Re: как создать массив
2011-02-17 17:12 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html
В Excel есть [abbr=Вводится через Ctrl+Shift+Enter]формула массива[/abbr], она вводится через Ctrl+Shift+Enter. Для того, чтобы динамически задавать его (массива) размер можно использовать функции СМЕЩ() или ДВССЫЛ(), вкупе с ПОИСКПОЗ() разумеется.

Аналогичное пересечение можно задавать функцией СУММПРОИЗВ(). Короче, глядь справочку по этим функциям, тогда справиться с задачей чисто формулами не составит труда.

hammer7>> Re: Уникальные записи по нескольким критериям
2011-02-17 17:15 http://forum.msexcel.ru/profiles/hammer7-u10499.html
Ну так в чем дело? Надо-то лишь условие добавить для формулы в 13 строке(56-60 лет)
Давайте эту строку вообще уберем. Извините!

сделаем по-другому: последняя предпенсионная категория будет: от 46 лет и до пенсионного возраста (женщины <55; мужчины <60). Это можно реализовать?


Panches>> Re: Прятать и ещё раз прятать!
2011-02-17 17:18 http://forum.msexcel.ru/profiles/panches-u71138.html
Спасобо за предложение, но это не решение моей проблемы.
Мне необходима защита от дураков. Если у пользователя отключены выполнение макросов, то файл не должен открываться или отображать листы.
Вот не могу придумать каким образом это можно реализовать.
Кстати Excel 2010 Подмигивающий
Пробовал делать листы VeryHidden, а при открытии файла макрос на изменение статуса на visible, тоесть в теории если макросы отключены - макрос на изменение статуса не срабатывает и листы не видно, но по какой-то причине все отображается прекраснейшим образом. Плачущий

Prist>> Re: Уникальные записи по нескольким критериям
2011-02-17 17:28 http://forum.msexcel.ru/profiles/prist-u4859.html
Лучше все же не убирать строку, а добавить условие в формулу. Т.к. убрав строку нам понадобится добавление в формулу более громоздкого условия на проверку пола и вычисление пенсионного возраста.

Если уж так хочется удалить ту строку(56-60 лет):
-удаляете формулы из неё;
-в строку 12(46-55 лет) вписываете следующую формулу:
Код:
=СУММ(ЕСЛИ(ЧАСТОТА(ПОИСКПОЗ(ФИО;ФИО;0);ПОИСКПОЗ(ФИО;ФИО;0));ЕСЛИ((Организация=ИТОГИ!D$7)*(Возраст>=$A12)*(Возраст<=ЕСЛИ((Рабочий!$C$2:$C$24="Мужской");$A$14;$A$15)+1);1);))

Если захочется удалить строку (56-60 лет), то проверьте затем правильность ссылок на возраст в формуле.

Vic Voodoo>> Re: вичитание дат
2011-02-17 17:28 http://forum.msexcel.ru/profiles/vic_voodoo-u12254.html
А можно вот так:
=ГОД(A2)*12+МЕСЯЦ(A2)-ГОД(A1)*12-МЕСЯЦ(A1)



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


В избранное