Rimsky>> Re: Сбор данных в экселе в столбец (job.education.exl) : Рассылка : Subscribe.Ru

Подписаться Бесплатная «Серебряная» новостная рассылка . Подписчиков 3.828 RSS

← Январь 2011 →
	1	2
3	4	5	6	7	8	9
10	11	12	13	14	15	16
17	18	19	20	21	22	23
24	25	26	27	28	29	30
31

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

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

Автор

serge_007.planetaexcel@mail.ru

Статистика

3.828 подписчиков
0 за неделю

← Все выпуски →

Rimsky>> Re: Сбор данных в экселе в столбец

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

Выпуск 3
от 2011-01-28

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

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

Основные разделы сайта

Статьи

Форум

Новости сайта в формате RSS
Новые сообщения форума в формате RSS

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

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

Наши сайты

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

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

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

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

Наши друзья

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

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

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

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

Rimsky>> Re: Сбор данных в экселе в столбец
2011-01-20 15:20 http://forum.msexcel.ru/profiles/rimsky-u34074.html
Спасибо, работает!

Михаил С.>> Re: не работает ctrl+`
2011-01-20 16:42 http://forum.msexcel.ru/profiles/mihail_s-u26973.html

Цитата: ХАха от 27 Декабрь 2010, 13:51:08

Столкнулась с тем, что на некоторых машинах не работает сочетание клавишь Ctrl+` -

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

TimSha>> Re: не работает ctrl+`
2011-01-20 16:54 http://forum.msexcel.ru/profiles/timsha-u13313.html
Проблем не было и нет - XL-2003 en/ru, XL-2007, 2010 ru - Ctrl-` или Ctrl-ё... (XP SP3) Подмигивающий

md25>> Re: как объеденить листы из разных файлов в файл с разными листами?
2011-01-20 16:59 http://forum.msexcel.ru/profiles/md25-u63636.html
Спасибо огромное Yurij ... постараюсь доваять этот макрос:)

Roman.H>> Re: как объеденить листы из разных файлов в файл с разными листами?
2011-01-20 17:16 http://forum.msexcel.ru/profiles/romanh-u60392.html

Код:

Sub Объед_книг_в_одну_на_разн_листы()
Dim FilesToOpen
Dim x As Integer
On Error GoTo ErrHandler
Application.ScreenUpdating = False
FilesToOpen = Application.GetOpenFilename _
(FileFilter:="Microsoft Excel Files (*.xls), *.xls", _
MultiSelect:=True, Title:="Files to Merge")
If TypeName(FilesToOpen) = "Boolean" Then
MsgBox "Не выбрано ни одного файла!"
GoTo ExitHandler
End If
x = 1
While x <= UBound(FilesToOpen)
Workbooks.Open Filename:=FilesToOpen(x)
Sheets().Move After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)
x = x + 1
Wend
ExitHandler:
Application.ScreenUpdating = True
Exit Sub
ErrHandler:
MsgBox Err.Description
Resume ExitHandler
End Sub

[code]Sub Объед_книг_в_одну_на_один_лист()

Const strStartDir = "c:\test" 'папка, с которой начать обзор файлов
Const strSaveDir = "c:\test\result" 'папка, в которую будет предложено сохранить ре...

md25>> Re: как объеденить листы из разных файлов в файл с разными листами?
2011-01-20 17:34 http://forum.msexcel.ru/profiles/md25-u63636.html
Roman.H - вы ЧУДО!! только начала доделывать макрос с помощью сообщения Yurij и тут Ваше сообщение!Спасибо!

maikopman>> Re: Программное управление отображением строк
2011-01-20 18:35 http://forum.msexcel.ru/profiles/maikopman-u4960.html
То, что надо.
Огромное спасибо

tomasmazas>> Re: Как вытянуть из диапазона все строки удовлетворяющие условию
2011-01-20 20:22 http://forum.msexcel.ru/profiles/tomasmazas-u3994.html
Спасибо за подсказку

capup>> Сортировка данных в столбце по алфавиту методом формул
2011-01-20 20:32 http://forum.msexcel.ru/profiles/capup-u63753.html
Здравствуйте товарищи!
Меня интересует сортировка данных в столбце по алфавиту методом формул.
Заранее простите за невнимательность, потому как я уверен, что эта тема уже проскальзывала.
Но, к сожалению не могу найти толкового пояснения и примера.
Вот к примеру:
http://forum.msexcel.ru/index.php?action=printpage;topic=3517.0
Но, файлов не видно.

Сортировка НЕ ФОРМУЛОЙ НЕ ПОДХОДИТ!
Иначе смысл автоматизации рутинной роботы с ведомостью если что-то еще нажимать и менять данные?
Файл прилагаю. Файл содержит 3 листа соответственно: исходный список, сортировка по-подгруппам, сортировка по-алфавиту.

zippi>> Re: Дано два столбца с названиями в одном 3.000 в другом 4.500 как сделать?
2011-01-20 20:56 http://forum.msexcel.ru/profiles/zippi-u63538.html

Цитата: Serge 007 от 19 Январь 2011, 23:47:45

Цитата: zippi от 19 Январь 2011, 23:16:42

Цитата: Serge 007 от 19 Январь 2011, 21:56:12

Ещё вариант (по-порядку, без пустых ячеек).

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

zippi , а Вы вложение к моему посту смотрели?
Это не я Вас прошу данные по порядку располагать, а сам предлагаю Вам решение, в котором отсутствующие в столбце В данные располагаются по порядку.

Извиняюсь не заметил вложения думал что предлагаете обыкновееный фильтр по алфавиту. Большое спасибо теперь у меня есть два решения моей ежемесячной проблемы. Ещё раз огромное спасибо.

Roman.H>> Re: Сортировка данных в столбце по алфавиту методом формул
2011-01-20 21:04 http://forum.msexcel.ru/profiles/romanh-u60392.html
http://forum.msexcel.ru/microsoft_excel/avtomaticheskaya_sortirovka_dannyh_stolbtsa-t3517.0.html

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

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

capup>> Re: Сортировка данных в столбце по алфавиту методом формул
2011-01-20 21:12 http://forum.msexcel.ru/profiles/capup-u63753.html
Спасибо за оперативность!
Я посмотрю. Но сейчас мне доступен Excel 2003.

Roman.H>> Re: Сортировка данных в столбце по алфавиту методом формул
2011-01-20 21:18 http://forum.msexcel.ru/profiles/romanh-u60392.html
http://download.microsoft.com/download/b/c/4/bc41c3a1-c243-4440-a771-8260515e4cc7/FileFormatConverters.exe

конвертер

Serge 007>> Re: Сортировка данных в столбце по алфавиту методом формул
2011-01-20 21:49 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Я не понял чего надо сортировать (в примере всё и так по алфавиту) и что такое "по подгруппам"?

capup>> Re: Сортировка данных в столбце по алфавиту методом формул
2011-01-20 22:11 http://forum.msexcel.ru/profiles/capup-u63753.html
Добрый вечер!
Я уже смотрю примеры, спасибо.
Смотрю пример, не знаю, что это значит формула в скобках (='формула') и как она распространяется на другие ячейки.

Если есть возможность просмотреть - файл прилагаю.

Да, действительно тот случай, когда группу по алфавиту поделили на две подгруппы. Как правило это не так.

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

Благодарю за внимание и оперативность.

Sergey112233>> Выделение строки цветом
2011-01-20 22:36 http://forum.msexcel.ru/profiles/sergey112233-u57126.html
Уважаемые форумчане.
Пожалуйста, помогите разобраться с таким вот вопросом: Плачущий
Последовательность действий следующая:
1. Активируется одна ячейка.
2. «Подсвечивается» вся строка, в которой находится эта ячейка.
3. Копируется значение активированной ячейки.
4. Вставляется значение в другую ячейку.
Между п.3 и п.4 становится недоступным меню вставить, хотя в буфере обмена скопированное значение есть. Вот как вытащить это значение в Excel 2003. Или как-то иначе? Непонимающий

Здесь рассматривался подобный вопрос.
http://forum.msexcel.ru/proekty_vba_new/podsvetka_stroki_i_stolbtsa-t444.0.html

Но меню вставка тоже не работает Грустный

Еще есть вариант из форума

Код:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim iRange
Dim i
Dim c
Application.EnableEvents = False
Set i = Target.EntireRow
Set c = Target.EntireColumn
Set iRange = Union(i, c)
iRange.Select
Cells(i.Row, c.Column).Activate
Application.EnableEvents = True
End Sub

Но что-то он не запускается

Sergey112233>> Re: Выделение строки цветом
2011-01-21 00:19 http://forum.msexcel.ru/profiles/sergey112233-u57126.html
В дополнение.

Код:

Public NoEvents As Boolean
Public Sub SelOn()
   NoEvents = False
End Sub
Public Sub SelOff()
   NoEvents = True
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   Dim addr As String
   Dim x As Variant
   Dim rng, c, r, cll As String

   If NoEvents Then Exit Sub
   If Target.Cells.Count > 1 Then Exit Sub
   addr = ActiveCell.Address()
   x = Split(addr, "$")
   c = x(1)
   r = x(2)
   rng = c & ":" & c & "," & r & ":" & r
   Range(rng).Select
   cll = c & r
   Range(cll).Activate
End Sub

Уважаемые форумчане.
В этом координатном выделении появляется предупреждение по несвязанным диапазононам. Как это поправить?

Тубус>> Внедренная вставка Word в EXCEL , проблемы редактирования
2011-01-21 00:19 http://forum.msexcel.ru/profiles/tubus-u38837.html
После переустановки Офиса (был 2010, решил вернуть 2007) появилась следующая проблема. Есть файлы со страницами EXCEL с внедрённой вставкой Word в которой имеется текст. Так вот, при нажатии на эту вставку (вход в режим её редактирования) сразу появляется окно ошибки с набором букв и надписей (типа:clr20r3.....system.invalidcastexception) с предложением отправить проблему в Майкрософт. Чаво только не делал: и удалял office программой fix it, ставил снова, и пытался конвертировать внедрённую вставку - эффект нулевой. Поставил офис 2003. Пока всё работает, но конечно он слабоват. Кто-то сталкивался с этой проблемой?. Я так понимаю, в компе после удаления офисов остались какие-то их следы, которые не дают внедрённой вставке работать. Наверно что-то нужно чистить в реестре? Но как?

KuklP>> Re: увеличить количество условных форматирований
2011-01-21 02:30 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Попробуйте. Раньше не мог, был занят.

SVeter>> Помогите, плиз! как проранжировать?
2011-01-21 03:35 http://forum.msexcel.ru/profiles/sveter-u63909.html
Всем добрый день!
Я у Вас тут новичок! Вынуждена к Вам обратиться, т.к. не знаю кто еще может мне подсказать....
Хоть вопрос и несложный, но я затрудняюсь найти ответ.
Мне необходимо проранжировать показатели.
Т.е. есть список выполнения плана подразделениями. Как мне множно опледелить порядковое место каждого из этих подразделений по выполнению плана (формула)?

Филиал      % вып.плана      порядковое место по выполнению плана

Арс      101,1     1
Арт      99,4 3
Нхд       98,3     4
Прт      100,4     2
Спс      84     ниже плана

уст.мин.норма   98,65

Пыталась, что-нть найти в форуме по поиску..... не получилось. Так, что не бросайтесь тапками, если повторяюсь.

Спасибо Всем

Yurij>> Re: Как сложить большое количество данных через ячейку.
2011-01-21 08:36 http://forum.msexcel.ru/profiles/yurij-u44007.html
Я думал, ты уже разобрался.

Мой вариант в приложении.

TimSha>> Re: Помогите, плиз! как проранжировать?
2011-01-21 08:39 http://forum.msexcel.ru/profiles/timsha-u13313.html
Вариант - "=ЕСЛИ(C2>=98.65;РАНГ(C2;$C$2:$C$6;0);"ниже плана")" - формула в D2, протянуть вниз.

ПафНутиЙ>> Re: Как сложить большое количество данных через ячейку.
2011-01-21 09:01 http://forum.msexcel.ru/profiles/pafnutiy-u63698.html
спасибо, но я уже разобрался и почти весь отчёт вбил

iron priest>> Re: Внедренная вставка Word в EXCEL , проблемы редактирования
2011-01-21 14:48 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
дофига прог по чисте реестра есть. я лично пользуюсь Reg Organizer и TuneUp

pikkumyy>> Как сделать развертывающийся список (не с помощью Group)?
2011-01-21 16:37 http://forum.msexcel.ru/profiles/pikkumyy-u64068.html
вот как на этом принтскрине с маленьким плюсиком слева внутри ячейки

missttv>> Re: увеличить количество условных форматирований
2011-01-21 17:17 http://forum.msexcel.ru/profiles/missttv-u51690.html
Ой, спасибо огроменное! именно то! Подмигивающий танцую от радости!
Дай Бог здоровьичка!

Serge 007>> Re: Как сделать развертывающийся список (не с помощью Group)?
2011-01-21 17:20 http://forum.msexcel.ru/profiles/serge_007-u25260.html
На скрине кусочек сводной таблицы.
Во вложении она целиком.

pikkumyy>> Re: Как сделать развертывающийся список (не с помощью Group)?
2011-01-21 17:36 http://forum.msexcel.ru/profiles/pikkumyy-u64068.html
Поняятно.. а как мне сделать вид, что у меня это сводная таблица, чтобы такие плюсики появлялись? у меня есть к примеру несколько людей, и у каждого есть спектр занятий, к примеру Вася Петров умеет: вязать, петь, готовить, Сеня Иванов умеет: шить, танцевать и т.п. Так вот мне необходимо чтобы у меня первый столбик был перечнем людей (Вася, Петров, Сеня Иванов, ...), и при нажатии на этот плюсик выезжал у каждого человека список с его умениями. Дело в том, что у меня никакх значений ячейки не имеют, мне просто нужно использование этого распадания на субдиректории..

Serge 007>> Re: Как сделать развертывающийся список (не с помощью Group)?
2011-01-21 18:00 http://forum.msexcel.ru/profiles/serge_007-u25260.html

Цитата: pikkumyy от 21 Январь 2011, 17:36:14

Поняятно.. а как мне сделать вид, что у меня это сводная таблица, чтобы такие плюсики появлялись?

А зачем Вам "делать вид" что у Вас сводная таблица?!
Надо её на самом деле сделать и всё.

Цитировать

...у меня есть к примеру несколько людей...

Но мы-то этого не видим

Давайте пример.

vladturbo>> Автоматическое создание листа и присвоение ему имени в формате текущая дата
2011-01-21 18:38 http://forum.msexcel.ru/profiles/vladturbo-u56826.html
Доброго времени суток!
Написал макрос, который создает в рабочей книге лист и переименовывает его в формат текущая дата (месяц) + постоянное значение (допустим гос. № автомобиля) используя функцию =СЦЕПИТЬ. Макрос работает, однако для отображения в ячейке текущей даты в формате (месяц) пришлось использовать функцию =ЕСЛИ(И, т.к. при присвоении имени листу дата выводится только в числовом формате (допустим 40564) и имя листа получается 40564 А 123 АА 199, а необходимо Январь А 123 АА 199.
Повторяю, все работает, однако функция ЕСЛИ работает только с 7 аргументами (т.е. до Июля, а необходимо все 12 месяцев). Вот код макроса:
Sub Макрос6()
ActiveWorkbook.Sheets.Add Before:=Worksheets(Worksheets.Count)
Range("A1").Select
ActiveCell.FormulaR1C1 = "=TODAY()"
Range("A2").Select
ActiveCell.FormulaR1C1 = "=MONTH(R[-1]C)"
Range("A3").Select
ActiveCell.FormulaR1C1 = _
"=IF(AND(R[-1]C=1),""Январь"",IF(AND(R[-1]C=2),""Февраль"",IF(AND(R[-1]C=3),""Март"",IF(AND(R[-...

iron priest>> Re: Как сделать развертывающийся список (не с помощью Group)?
2011-01-21 18:49 http://forum.msexcel.ru/profiles/iron_priest-u20725.html

Цитата: Serge 007 от 21 Январь 2011, 18:00:20

А зачем Вам "делать вид" что у Вас сводная таблица?!

nilem>> Re: Автоматическое создание листа и присвоение ему имени в формате текущая дата
2011-01-21 20:15 http://forum.msexcel.ru/profiles/nilem-u30547.html
Попробуйте так:

Код:

Sub Макрос6()
ActiveWorkbook.Sheets.Add Before:=Worksheets(Worksheets.Count)
ActiveSheet.Name = Format(Month(Date), "mmmm") & " А 123 АА 199"
End Sub

crazyman_77>> Как данные с ячейки собрать в колонку?
2011-01-21 20:20 http://forum.msexcel.ru/profiles/crazyman77-u57894.html
Доброго времени суток!

Проблема в следующем: как сделать так, чтобы данные из ячейки А1 попали в столбик "для ячейки А1" под цифру "5" и так для всего остального??? Данные на "Лист 2" обновляются и высчитываются каждые 10 мин, соответственно в ячейках А1,А2,А3 и А4 данные меняются с той-же периодичностью.
Пример прилагается.

P.S. Если не затруднит, пожалуйста, объясните решение как можно детальней.Я в excel "полный чайник". Очень хочется научиться проделывать подобные вещи.

capup>> Re: Сортировка данных в столбце по алфавиту методом формул
2011-01-21 20:20 http://forum.msexcel.ru/profiles/capup-u63753.html
Спасибо всем, кто откликнулся!
В основном разобрался!
Единственное, что осталось это игнорирование пустых ячеек (т.е. вместо "#Н/Д" поставть "").

А я думал, что я формулы знаю...

sergo44441>> Re: Вопрос по Access модуль для автоперевода из валюты в рубли
2011-01-21 21:05 http://forum.msexcel.ru/profiles/sergo44441-u3995.html
а если сделать запросом на обновление?

sergo44441>> Re: Импорт из текста, всё в одну ячейку?
2011-01-21 21:06 http://forum.msexcel.ru/profiles/sergo44441-u3995.html
копируете текст, заходите в ячейку в режиме редактирования, вставляете

crazyman_77>> Re: Как данные с ячейки собрать в колонку?
2011-01-21 21:33 http://forum.msexcel.ru/profiles/crazyman77-u57894.html

Цитата: Serge 007 от 21 Январь 2011, 21:25:32

Здравствуйте.

Так пойдёт?

Спасибо, это почти то что надо, только оно затирает строчку.Т.Е. данные должны собираться в столбик, а они переписываются в верхнюю строчку.

vladturbo>> Re: Автоматическое создание листа и присвоение ему имени в формате текущая дата
2011-01-21 22:37 http://forum.msexcel.ru/profiles/vladturbo-u56826.html
Спасибо, есть такой код:
Dim sname As String
sname = CStr(Format(Now, "dd.mm.yy") & " М096ВО")
ActiveWorkbook.Sheets.Add Before:=Worksheets(Worksheets.Count)
ActiveSheet.Name = sname

vladturbo>> Копирование диапазона с сохранением форматов и размеров ячеек
2011-01-21 22:41 http://forum.msexcel.ru/profiles/vladturbo-u56826.html
ВОПРОС: Необходимо с помощью макроса копировать и вставлять (в другую книгу значения из диапазона данных сохраняя формат, размер и границы ячеек).
Копируется и вставляется все, кроме размеров (высоты и строки и ширины столбца)

Если использовать метод Cells.Select, к сожалению не работает метод Seltct
Допустим:
Sheets("Лист9").Select
Cells.Select
Selection.Copy...
...и далее по тексту Paste
так вот, при таком варианте Sheets("Лист9").Select выдает ошибку Debug

А при таком варианте не сохраняются размеры ячеек. Подскажите как быть?
Private Sub CommandButton7_Click()
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 + vbCritical + vbDefaultButton2
Result = MsgBox(Msg, Btns, Title, Help, NmbCont)
If Result = vbYes Th...

Roman.H>> Re: Как данные с ячейки собрать в колонку?
2011-01-21 22:41 http://forum.msexcel.ru/profiles/romanh-u60392.html
я так понимаю что тут можно только макросом, который каждые 10 минут будет создавать новую строчку и заполнять ее данными (время и значения)

т.е. Вам в итоге нужно Х строк, в каждой из которых будет время (с шагом в 10 мин) и данные, которые были в это время?

crazyman_77>> Re: Как данные с ячейки собрать в колонку?
2011-01-21 22:55 http://forum.msexcel.ru/profiles/crazyman77-u57894.html

Цитата: Roman.H от 21 Январь 2011, 22:41:07

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

т.е. Вам в итоге нужно Х строк, в каждой из которых будет время (с шагом в 10 мин) и данные, которые были в это время?

Да, Вы совершенно правы.Я хотел бы чтоб получилась своего рода статистика изменений определённых данных за определённое время.

nilem>> Re: Как данные с ячейки собрать в колонку?
2011-01-21 23:15 http://forum.msexcel.ru/profiles/nilem-u30547.html
Типа этого, наверное. Измените какую-нибудь цифру в ст. D Листа 2.

crazyman_77>> Re: Как данные с ячейки собрать в колонку?
2011-01-21 23:19 http://forum.msexcel.ru/profiles/crazyman77-u57894.html

Цитата: nilem от 21 Январь 2011, 23:15:59

Типа этого, наверное. Измените какую-нибудь цифру в ст. D Листа 2.

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

nilem>> Re: Как данные с ячейки собрать в колонку?
2011-01-21 23:31 http://forum.msexcel.ru/profiles/nilem-u30547.html
Вот сейчас увидел: IgorGo на др. форуме подробно все объяснил. Только я взял Worksheet_Calculate - событие, которое происходит при пересчете формул на листе - в нашем случае, когда срабатывают формулы в А1...А4. В остальном то же самое.

Roman.H>> Re: Как данные с ячейки собрать в колонку?
2011-01-21 23:34 http://forum.msexcel.ru/profiles/romanh-u60392.html
да, лучше того что я делал В замешательстве
так, ради интереса выкладываю но работает только при нажатии на кнопку

crazyman_77>> Re: Как данные с ячейки собрать в колонку?
2011-01-21 23:38 http://forum.msexcel.ru/profiles/crazyman77-u57894.html

Цитата: nilem от 21 Январь 2011, 23:31:55

Вот сейчас увидел: IgorGo на др. форуме подробно все объяснил. Только я взял Worksheet_Calculate - событие, которое происходит при пересчете формул на листе - в нашем случае, когда срабатывают формулы в А1...А4. В остальном то же самое.

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

P.S. К сожалению не могу понять как можно выразить Вам благодарность или повлиять на репутацию, но тем не менее я Вам очень сильно благодарен!!!

deny21>> Нужна помощ в ГСЧ(Генератор случайных чисел)
2011-01-22 00:25 http://forum.msexcel.ru/profiles/deny21-u64120.html
Я тут столкнулся с такой проблемой как ГСЧ (Генератор Случайных чисел).
Тема такая:
У меня есть список цифр которые образуются(по моему) по системе ГСЧ но я много прочитал и понял что у ГСЧ есть период через которые эти числа должны повторяться но так как в этом большом списле цифр которые у меня имаются нету повтором вообще то нашел в инете что так может генерировать Генератор Псевдослучайных Чисел(в дальнейшем буду говорить ГПЧ)
Как я знаю все Генераторы чисел работают по определенной трудной формуле (собственно по этому кажется что числа абсолютно случайные)
Есть даже четкий номер под которым выпало это число с начала генерирования . И самое главное все эти числа находятся в пределе от 0 включительно до 36 включительно.
Помогите плиз мне как можно узнать формулу зная какими по порядку выпадали числа.
Но мне бы хотелось узнать как можно определить формулу по которой выпадают эти числа.( Я точно знаю что они генерируются в Генераторе Чисел(по моему в Геренаторе Псевдослучайн...

vladturbo>> Re: Копирование диапазона с сохранением форматов и размеров ячеек
2011-01-22 00:33 http://forum.msexcel.ru/profiles/vladturbo-u56826.html
Если использовать такой код
Происходит копирование и переименование листов, однако не сохраняется высота строк и ширина столбцов

set MySheet = Sheets("Лист2")
Workbooks.Open Filename:="C:\Учет перевозок\АРХИВ.xls"
Application.ScreenUpdating = False
Application.displayalerts = False
MySheet.copy Before:=Worksheets(Worksheets.Count)
ActiveSheet.Name = CStr(Format(Now, "dd.mm.yy") & " М096ВО")

Если использовать такой код аналогично не переименовываются листы

Set MySheet = Sheets("Лист2")
Workbooks.Open Filename:="C:\Учет перевозок\АРХИВ.xls"
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Dim sname As String
sname = CStr(Format(Now, "dd.mm.yy") & " М096ВО")
ActiveWorkbook.Sheets.Add Before:=Worksheets(Worksheets.Count)
ActiveSheet.Name = sname
ActiveWorkbook.Save
ActiveWindow.Close
Set MySheet = Sheets("Лист3")
Workbooks.Open Filename:="C:\Учет перевозок\АРХИВ.xls"
Application.ScreenUpdating = False
Application.DisplayAlerts = False
sname = CStr(Format(Now, "dd.mm....

_Boroda_>> Re: Выделение строки цветом
2011-01-22 02:22 http://forum.msexcel.ru/profiles/boroda-u12234.html
Если вопрос в том, чтобы и строчка выделялась, и копировать можно было, то см. вложение.
Диапазон А1:Z100

С.М.>> Re: Комбинаторика с помощью Excel
2011-01-22 02:29 http://forum.msexcel.ru/profiles/sm-u19758.html

Цитата: ZORRO2005 от 13 Январь 2011, 22:02:23

... надо было продолжить ...

Возвращаюсь к теме.
Сваял несколько пользовательских функций, генерирующих "случайные" Перестановки и Размещения из прописных букв английского алфавита :

vladturbo>> Re: Копирование диапазона с сохранением форматов и размеров ячеек
2011-01-22 10:29 http://forum.msexcel.ru/profiles/vladturbo-u56826.html
Спасибо заработало. Код такой
Sub Макрос1()
Set MySheet = Sheets("Имя Листа1")
Workbooks.Open Filename:="C:\"Имя файла".xls"
Application.ScreenUpdating = False
Application.DisplayAlerts = False
MySheet.Copy Before:=Worksheets(Worksheets.Count)
ActiveSheet.Name = CStr(Format(Now, "dd.mm.yy") & "То что необходимо дописать к имени Листа")
ActiveWorkbook.Save
ActiveWindow.Close
Application.ScreenUpdating = True
Application.DisplayAlerts = True
Set MySheet = Sheets("Имя Листа2")
Workbooks.Open Filename:="C:\"Имя файла".xls"
Application.ScreenUpdating = False
Application.DisplayAlerts = False
MySheet.Copy Before:=Worksheets(Worksheets.Count)
ActiveSheet.Name = CStr(Format(Now, "dd.mm.yy") & " То что необходимо дописать к имени Листа")
ActiveWorkbook.Save
ActiveWindow.Close
Application.ScreenUpdating = True
Application.DisplayAlerts = True
End Sub

crazyman_77>> Re: Как данные с ячейки собрать в колонку?
2011-01-22 10:34 http://forum.msexcel.ru/profiles/crazyman77-u57894.html

Цитата: nilem от 21 Январь 2011, 23:15:59

Типа этого, наверное. Измените какую-нибудь цифру в ст. D Листа 2.

На основе предложенного Вами варианта я сделал необходимый документ, но есть маленькая проблемка: т.к. данные поступают неравномерно (примерно 3-5 сек, т.е. сначала обновляется одна цифра и происходит подсчёт формулы, затем другая - подсчёт и т.д.),в колонках куда выводится информация появляются 3-5 строчек за одно обновление.Подскажите, пожалуйста, как можно сделать так, чтоб макрос срабатывал после полного обновления и пересчёта формул. Я пробовал поставить задержку на исполнение макроса - 5сек, но он ничего не изменил. Обновилась первая цифра, посчиталась формула, макрос подождал 5 сек, затем обновилась вторая цифра и т.д.Может быть, как вариант, есть команда на запуск макроса при окончании связи с инетом? Например файл обновился, связь прервалась - макрос начал работу. Или может ещё каие варианты? Спасибо.

nilem>> Re: Как данные с ячейки собрать в колонку?
2011-01-22 12:51 http://forum.msexcel.ru/profiles/nilem-u30547.html
Тогда пробуем так. Кнопка Пуск запускает запись строк в таблицу с интервалом 5 сек, Стоп - остановить запись, Очистить - очистить.
Или нужно ждать когда изменятся все числа в ст. D на Лист2, и только после этого делать запись в таблицу?

crazyman_77>> Re: Как данные с ячейки собрать в колонку?
2011-01-22 13:28 http://forum.msexcel.ru/profiles/crazyman77-u57894.html

Цитата: nilem от 22 Январь 2011, 12:51:10

Тогда пробуем так. Кнопка Пуск запускает запись строк в таблицу с интервалом 5 сек, Стоп - остановить запись, Очистить - очистить.
Или нужно ждать когда изменятся все числа в ст. D на Лист2, и только после этого делать запись в таблицу?

Что-то с форумом, никак не мог зайти, извините за задержку. Да, нужно ждать когда всё пересчитается, а только потом добавить строчку в столбики на "Лист1".Такое возможно?

nilem>> Re: Как данные с ячейки собрать в колонку?
2011-01-22 14:15 http://forum.msexcel.ru/profiles/nilem-u30547.html

Цитата: crazyman_77 от 22 Январь 2011, 13:28:35

...Такое возможно?

Возможно все

Вот, запись происходит, когда изменятся все 8 чисел в D. Проверяйте.

crazyman_77>> Re: Как данные с ячейки собрать в колонку?
2011-01-22 14:23 http://forum.msexcel.ru/profiles/crazyman77-u57894.html

Цитата: nilem от 22 Январь 2011, 14:15:54

Цитата: crazyman_77 от 22 Январь 2011, 13:28:35

...Такое возможно?

Возможно все

Вот, запись происходит, когда изменятся все 8 чисел в D. Проверяйте.

Ооооооо, спасибо огромное, это вроде то что нужно.Я вам очень-очень благодарен!!! Спасибо!!!

crazyman_77>> Re: Как данные с ячейки собрать в колонку?
2011-01-22 15:53 http://forum.msexcel.ru/profiles/crazyman77-u57894.html
nilem, здравствуйте! Вот попытался сделать что-то подобное (на основании того что Вы предложили), но как я и думал: где-то чего-то не так. Будьте любезны как опытный профессионал гляньте на мои ошибки (укажите мне их) и если не затруднит - исправьте пожалуйста. Ещё раз спасибо!

P.S. Забыл добавить (если это важно), не обязательно все цифры могут измениться, какие-то могут оставаться некоторое время неизменными.

Sergey112233>> Re: Выделение строки цветом
2011-01-22 17:23 http://forum.msexcel.ru/profiles/sergey112233-u57126.html
...кудесник,
Это просто "чудеса в решете" Веселый

Огромное спасибо.

Уважаемый Ветеран, пожалуйста, добавьте несколько комментариев к Вашему примеру

_Boroda_>> Re: Выделение строки цветом
2011-01-22 17:48 http://forum.msexcel.ru/profiles/boroda-u12234.html
А что конкретно пояснить нужно?

nilem>> Re: Как данные с ячейки собрать в колонку?
2011-01-22 18:28 http://forum.msexcel.ru/profiles/nilem-u30547.html

Цитата: crazyman_77 от 22 Январь 2011, 15:53:46

P.S. Забыл добавить (если это важно), не обязательно все цифры могут измениться, какие-то могут оставаться некоторое время неизменными.

Тогда нужно определиться: делать запись, если изменились 2 цифры или 5, или все, или по прошествии 5 секунд, или как-то еще.

crazyman_77>> Re: Как данные с ячейки собрать в колонку?
2011-01-22 18:34 http://forum.msexcel.ru/profiles/crazyman77-u57894.html

Цитата: nilem от 22 Январь 2011, 18:28:12

Цитата: crazyman_77 от 22 Январь 2011, 15:53:46

А можно ли сделать например так: Открываем файл, есть кнопка "пуск".Нажимаем кнопку - пошло обновление из инета и соответственно их расчёт.Через 30 секунд данные записываются на нужные места.Вот примерно так, если это осуществимо.

nilem>> Re: Как данные с ячейки собрать в колонку?
2011-01-22 18:40 http://forum.msexcel.ru/profiles/nilem-u30547.html
Уже был вариант с временем (там было 5 сек., можно поставить 30 сек или сколько угодно). Подключения у вас в файле настроены, жмем Пуск и через кажд. 30 сек. будет происходить запись значений. Кнопка Стоп - остановить запись. Так что ли?

crazyman_77>> Re: Как данные с ячейки собрать в колонку?
2011-01-22 18:45 http://forum.msexcel.ru/profiles/crazyman77-u57894.html

Цитата: nilem от 22 Январь 2011, 18:40:03

Уже был вариант с временем (там было 5 сек., можно поставить 30 сек или сколько угодно). Подключения у вас в файле настроены, жмем Пуск и через кажд. 30 сек. будет происходить запись значений. Кнопка Стоп - остановить запись. Так что ли?

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

crazyman_77>> Re: Как данные с ячейки собрать в колонку?
2011-01-22 19:18 http://forum.msexcel.ru/profiles/crazyman77-u57894.html

Цитата: nilem от 22 Январь 2011, 18:40:03

Замечательный вариант, работает прекрасно! Последний вопрос:научите, пожалуйста, как можно такие-же кнопки прикрутить и как назначить на них выполнение макроса? Спасибо за Вашу помощь!!!

P.S. Извините, вроде разобрался, вопрос снят.

Toha153>> Добавить в код перенос гиперссылок на другой лист
2011-01-22 20:49 http://forum.msexcel.ru/profiles/toha153-u39281.html
Здравствуйте! Подскажите, пожалуйста, как добавить функцию переноса гиперссылок на другой лист.
С листа2(таблица1) 12 и 17 колонка в лист1(таблица2) F и M каждый раз в новую строку. Прилагаю образец файла ниже
http://zalil.ru/30384248

waw01>> перенести макрос (помогите)
2011-01-22 20:49 http://forum.msexcel.ru/profiles/waw01-u56766.html
Помогите макросы перенести из файла "отсюда" в "сюда", с созданием кнопок - вкл., выкл. макроса, а то у меня не работает. а людям обещал данное удобство. И вопрос: если я сохроню данные макросы в личной папке макросов, они будут с другими файлами работать? заранее всем благодарен.....

deny21>> Re: Нужна помощ в ГСЧ(Генератор случайных чисел)
2011-01-22 20:59 http://forum.msexcel.ru/profiles/deny21-u64120.html
моя аська 590556783
напишите пожалуста очень нужно
Умоляю помогите мне

_Boroda_>> Re: перенести макрос (помогите)
2011-01-22 23:00 http://forum.msexcel.ru/profiles/boroda-u12234.html
Ловите.
Только у меня 2003, он мог поломать в 2007 таблицу. Проверьте.

Toha153>> Re: Добавить в код перенос гиперссылок на другой лист
2011-01-23 01:27 http://forum.msexcel.ru/profiles/toha153-u39281.html
А здесь пишет, что я уже отправлял сообщение с файлом. Тоже ругается. Не прикрепляется.
Вот код:
[code]Sub ПереносимДанные()
Dim lr As Long, adr As String
Dim rng As Range, poz As Range, x As Range
Set rng = Range([ac6], Cells(Rows.Count, 20).End(xlUp))
Set poz = rng.Find("send")
If Not poz Is Nothing Then
   adr = poz.Address
   Do
   If x Is Nothing Then Set x = poz Else Set x = Union(x, poz)
   Set poz = rng.FindNext(poz)
   Loop While adr <> poz.Address
Else
   MsgBox "Нечего отправлять": Exit Sub
End If: Set poz = Nothing
With Sheets("таблица2")
   lr = .Cells(Rows.Count, 1).End(xlUp).Row + 1
   For Each poz In x
   .Rows(lr - 1).Copy
   .Rows(lr).Insert
   .Rows(lr).Cells.SpecialCells(xlCellTypeConstants).ClearContents
   .Cells(lr, 1).Value = lr - 1
   .Range("B" & lr & ":E" & lr).Value = Range(Cells(poz.Row, Крутой , Cells(poz.Row, 11)).Value
   .Range("F" & lr).Value = Cells(poz.Row, 12).Value 'гиперссылка
   .Range("G" & lr...

_Boroda_>> Re: Добавить в код перенос гиперссылок на другой лист
2011-01-23 02:05 http://forum.msexcel.ru/profiles/boroda-u12234.html
Замените

Код:

.Range("F" & lr).Value = Cells(poz.Row, 12).Value 'гиперссылка
.Range("M" & lr).Value = Cells(poz.Row, 17).Value 'гиперссылка

на

Код:

Cells(poz.Row, 12).Copy .Range("F" & lr)
Cells(poz.Row, 17).Copy .Range("M" & lr)

А не отправляется ( в Вашем случае) потому, что файл с таким именем уже был. Просто переназовите его.

KuklP>> Re: Нужна помощ в ГСЧ(Генератор случайных чисел)
2011-01-23 07:35 http://forum.msexcel.ru/profiles/kuklp-u39713.html
deny21, чтобы узнать такую формулу Вам прийдется дизасемблировать Майкософт Офис, а потом еще и расшифровать полученное. И в результате Вы все равно никак этим воспользоваться не сможете.
Что Вам конкретно нужно? Чтобы последовательности не повторялись?
Вот выдержка из справки ВБА:
This example uses the Randomize statement to initialize the random-number generator. Because the number argument has been omitted, Randomize uses the return value from the Timer function as the new seed value.
Пользоваться так:

Код:

Public Sub www()
   Dim MyValue
   Randomize ' Initialize random-number generator.
   MyValue = Int((6 * Rnd) + 1)
End Sub

Хотя я привык всегда явно указывать - Randomize Timer(Это еще со времен работы в ВБ5,6). Если же убрать Randomize, последовательности будут повторяться.

deny21>> Re: Нужна помощ в ГСЧ(Генератор случайных чисел)
2011-01-23 08:51 http://forum.msexcel.ru/profiles/deny21-u64120.html
просто я знаю что эи числа выпадают точно по Генератору а как я знаю все генераторы работают по определенной формуле
у меня была уже идея:
Короче самое простое что нужно сделать чтобы было ограничение так это провести какие то манипуляции с порядковым номером под которым выпадает это число и предыдущим числом и просто найти остаток от (числа которое получится с этих манипуляций ) на 36 и все. В итоге будут выпадать четко числа в диапазоне от 0 до 36 что и нужно
но все эти манипуляции происходят по формуле которую мне то и нужно узнать
я пробовал много и в Excel но как то не пришел к нужной формуле к которой бы подходили все числа которые я уже знаю
Плиз дай свою ICQ и я тебе скажу все свои догадки и может быть ты поможешь и со всем что ты знаешь и что я может быть формулу разгадаем.
Прошу вас!!! Мне это оочень нужно

waw01>> Re: перенести макрос (помогите)
2011-01-23 08:57 http://forum.msexcel.ru/profiles/waw01-u56766.html
Увжаемый _Boroda_ вы как всегда, впереди планеты всей, все работает, таблицу вроде не разорвало, огромное спасибо и отдельное спасибо на WMR.

Serge 007>> Re: Нужна помощ в ГСЧ(Генератор случайных чисел)
2011-01-23 12:53 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Функция СЛЧИС() возвращает числа, равномерно распределённые на интервале [0,1].
Случайная величина Х имеет равномерное распределение на интервале [a,b], если её плотность вероятности вычисляется по формуле

Для этой случайной величины математическое ожидание МХ и дисперсия DX вычисляются по формулам MX=(a+b)/2, DX= (b-a)²/12. Случайная величина Y =(X-a)/(b-a) распределена на интервале [0,1]. Верно и обратное утверждение:
если случайная величина Y распределена равномерно на интервале [0,1], то случайная величина Х =(b-a)Y+a распределена равномерно на интервале [a,b]. Равномерное распределение является непрерывным аналогом дискретного равномерного распределения.

Serge 007>> Re: Нужна помощ в ГСЧ(Генератор случайных чисел)
2011-01-23 13:18 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Функция СЛУЧМЕЖДУ() генерирует целочисленные значения, подчиняющиеся дискретному равномерному распределению.
Случайная величина Х имеет равномерное дискретное распределение, если она принимает конечное число различных значений с одинаковой вероятностью. Допустим что Х может принимать значения 1,2,...,n. Тогда вероятность P(X=i)=1/n для всех целых значений i из интервала [1,n]. Для Х математическое ожидание МХ и дисперсия DX вычисляются по формулам MX=(n+1)/2, DX=(n+1)(2n+1)/6. Такое распределение часто используется для моделирования равновероятных дискретных событий.

Ещё немного про ГСЧ есть здесь.

Toha153>> Re: Добавить в код перенос гиперссылок на другой лист
2011-01-23 13:32 http://forum.msexcel.ru/profiles/toha153-u39281.html
Я уже решил переносить ссылку и линковать заново, но Ваш вариант проще и надежней.
Большое Вам спасибо!

vladturbo>> Не работает метод Select при копировании и вставке значений
2011-01-23 16:14 http://forum.msexcel.ru/profiles/vladturbo-u56826.html
Доброго времени суток!
Не могу понять, почему возникает ошибка при копировании и вставке значений в другую книгу.
Код такой:

Private Sub CommandButton1_Click()
Range("G23").Select
Selection.Copy
ChDir "C:\Дир1"
Workbooks.Open Filename:="C:\Дир1\Книга1.xls"
Windows("Книга1.xls").Activate
Range("G18").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
End Sub

С.М.>> Re: Нужна помощ в ГСЧ(Генератор случайных чисел)
2011-01-23 16:38 http://forum.msexcel.ru/profiles/sm-u19758.html
Вот функция самопального генератора псевдослучайных чисел:

Код:

Function СлучайноеЧисло()
Static B As Double, R As Double
'
Application.Volatile True
If B = 0 Then
B = (VBA.Time + 0.5) * WorksheetFunction.Pi * 10000
R = 0.5
End If
R = R * B - Int(R * B)
СлучайноеЧисло = R
If R = 0 Then B = 0
End Function

Как оно работает см. прикреплённый.

_Boroda_>> Re: Не работает метод Select при копировании и вставке значений
2011-01-23 17:53 http://forum.msexcel.ru/profiles/boroda-u12234.html
А если так?

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, _
Transpose:=False

Юлия25>> копирование формулы со смещением
2011-01-23 19:36 http://forum.msexcel.ru/profiles/yuliya25-u27685.html
Добрый вечер! О! великие умы..подскажите. Совсем запуталась. Как скопировать формулу с одного листа в другой (в тоже самое место) но что бы при этом в формуле адрес на ячейку смещался на один столбец вправо. Т.е НАПРИМЕР при копировании формулы
='2011'!B280 в тоже самое место другого листа (листы идентичны), она становилась ='2011'!С280 Буду очень благодарна!

kimtan>> Re: копирование формулы со смещением
2011-01-23 19:42 http://forum.msexcel.ru/profiles/kimtan-u12219.html
Проще всего, сразу вставлять со смещением, а затем уже переместить ячейку с формулой в нужное место.

Юлия25>> Re: копирование формулы со смещением
2011-01-23 21:21 http://forum.msexcel.ru/profiles/yuliya25-u27685.html
вот и примерчик. все что будет непонятно..поясню

kimtan>> Re: копирование формулы со смещением
2011-01-23 21:39 http://forum.msexcel.ru/profiles/kimtan-u12219.html
Юлия, в Вашем примере все понятно. Я уже написал как нужно сделать, или подробнее надо?

Юлия25>> Re: копирование формулы со смещением
2011-01-23 21:40 http://forum.msexcel.ru/profiles/yuliya25-u27685.html
если это возможно то поподробнее Обеспокоенный

kimtan>> Re: копирование формулы со смещением
2011-01-23 21:57 http://forum.msexcel.ru/profiles/kimtan-u12219.html
1. Переходим на лист "регион 1"
2. Выделяем диапазон ячеек B4:C7 и копируем - Ctrl+C
3. Переходим на лист "регион 2"
4. Выделяем ячейку C4 и вставляем - Ctrl+V
5. Наводим курсор мыши на левый край выделения диапазона (до превращения курсора в разнонаправленные стрелочки) и перетаскиваем диапазон влево.

Юлия25>> Re: копирование формулы со смещением
2011-01-23 22:27 http://forum.msexcel.ru/profiles/yuliya25-u27685.html
идея ясна...только не совсем в моем варианте применима..Справа имеются формулы..(в оригинальном файле) Что тогда делать?

kimtan>> Re: копирование формулы со смещением
2011-01-23 22:40 http://forum.msexcel.ru/profiles/kimtan-u12219.html
Ну тогда копируйте в то же место только с другими формулами.

Юлия25>> Re: копирование формулы со смещением
2011-01-23 22:59 http://forum.msexcel.ru/profiles/yuliya25-u27685.html
огромное спасибо..пойду пробовать!!!

volex>> Не обновляется автосумма при изменении элементов ячейки
2011-01-24 03:01 http://forum.msexcel.ru/profiles/volex-u64517.html
Разыскиваются аксакалы экселя

Получил я один очень мудреный excel файлик в котором надо разобраться.
Там забиты разные данные, и находится куча всяких формул/макросов/связей/параметров и в том числе выводятся автосуммы.
Так вот, есть автосумма которая НЕ обновляется, если в ячейки (которые она суммирует) добавить/изменить число.
Зато обновляется если сохранить документ.
Если создать чистую таблицу в новом файле, то все работает как надо, на ура.
Т.е. глюк конкретно в этом файле.
Как? почему? где искать?
Есть подозрение что что-то намудрено в свойствах макросов visual basic (см. скрин).

Сам документ был создан в версии Excel 2003 SP3.
Файл прилагаю (закладка Лист1, автосумма в ячейке D66).

Заранее спасибо за помощь!

KuklP>> Re: Не обновляется автосумма при изменении элементов ячейки
2011-01-24 04:59 http://forum.msexcel.ru/profiles/kuklp-u39713.html
~~Вы бы за весом файла следили(правила!).~~ Нафига 300 листов, если у Вас не считает только в одной ячейке. У меня все считает. И макросов способных повлиять на это в книге нет. У Вас в параметрах автопересчет включен?

Yurij>> Видимость процедур и функций
2011-01-24 08:00 http://forum.msexcel.ru/profiles/yurij-u44007.html
Процедура не видит функции и процедуры в других модулях.

Oprion Private Module
Нигде не включен...

Ingvar>> Re: Вопрос по Access модуль для автоперевода из валюты в рубли
2011-01-24 11:13 http://forum.msexcel.ru/profiles/ingvar-u5141.html

Цитата: sergo44441 от 21 Январь 2011, 21:05:22

а если сделать запросом на обновление?

Пробывал не получается не расчитывает и не обновляет ничего.
Поэтому и задал вопрос. Изначально делал запросом на обновления с расчетом по последнему курсу в базе.
На текущий момент вышел из ситуации созданием пары паралельных запросов и расчетом с привязкой по ключам цен в другой таблице.
(без запроса на обновление, все работает)
С обновления я извращался разными способами...
Или ничего не обновляеться в расчетных.
Или ошибка (что связанные запросы тоже на обновление должны)
Поэтому оптимальней кодом было...
Вспомнить бы как подвязаться к таблице и считать. ))

С.М.>> Re: Видимость процедур и функций
2011-01-24 11:32 http://forum.msexcel.ru/profiles/sm-u19758.html
"Откройте мне веки" (Гоголь Н.В. "Вий")

Макэна>> Отображение ячеек и строки формул.
2011-01-24 13:37 http://forum.msexcel.ru/profiles/makena-u16233.html
Здравствуйте, подскажите, пожалуйста, как сделать так что бы если ячйка равна 0 (ноль), то в строке формул этот 0 (ноль) должен отображаться, а в самой ячейке НЕТ.

_Boroda_>> Re: Отображение ячеек и строки формул.
2011-01-24 13:43 http://forum.msexcel.ru/profiles/boroda-u12234.html
1. Условное форматирование формула =НЕ(A1), цвет шрифта - белый
2. Формат ячейки # ##0;# ##0;;@
вместо # ##0 можно любой другой, главное, чтобы между 2-й и 3-й точкой с запятой ничего не было

Hawk>> перевод из числового значения в буквенное
2011-01-24 13:49 http://forum.msexcel.ru/profiles/hawk-u64658.html
Добрый день. Подскажите пожалуйста, существует ли такая функция или макрос, которая при внесении в одну из ячеек Excel числового значения (суммы) переводит ее в соседней ячейке в буквенное значение? Пример: 1962,60 - одна тысяча девятьсот шестьдесят два рубля шестьдесят копеек. Заранее благодарю.

Serge 007>> Re: перевод из числового значения в буквенное
2011-01-24 13:55 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Здравствуйте.
Таких "программ" в нете навалом. Наберите в поисковике "Сумма прописью" и Вы в этом убедитесь.

Вот одна из них.

Serge 007>> Re: Отображение ячеек и строки формул.
2011-01-24 14:00 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Или в настройках:
2010: Файл - Параметры - Дополнительно - Параметры листа - снять галку Показывать ноли в ячейках
2007: Кнопка Офис - Параметры - Дополнительно - Параметры листа - снять галку Показывать ноли в ячейках
2003: Сервис - Параметры - Вид - снять галку Показывать ноли в ячейках.

Макэна>> Re: Отображение ячеек и строки формул.
2011-01-24 14:16 http://forum.msexcel.ru/profiles/makena-u16233.html
Спасибо, огромное, меня интересовал именно вариант без условного форматирования. Я просто забыл указать сей нюанс. Ещё раз огромное спасибо.

Ermash>> не обновляется сводная таблица
2011-01-24 14:45 http://forum.msexcel.ru/profiles/ermash-u17998.html
Добрый всем день!

подскажите, пожалуйста, с чем может быть связано необновление сводной таблицы в Excel 2010.
Вообще никакой реакции после нажатие на кропку "обновить".
Я данные в свод подгружаю из Access. Не помогает даже вновь заданный путь. Причем такое происходит не со всеми файлами...
Может, что-то нужно в растройках поменять?

PS. НОВОЕ уточнение. Только что файл обновлялся. После его сохранения открываю, и уже снова не обновляется...

Спасибо!

Мария

Serge 007>> Re: не обновляется сводная таблица
2011-01-24 15:20 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Должно, обязано обновляться, если источник доступен.
А что пишет, на что ругается?

Ermash>> Re: не обновляется сводная таблица
2011-01-24 15:28 http://forum.msexcel.ru/profiles/ermash-u17998.html
в том-то и дело.. что вообще ничего не пишет.вот сейчас попробовала вновь. Создала сводную, импортировала данные.
Сохранила, закрыла. Открыла. нажала обновить. Результат тот же.
Никакого...
как-будто ничего не происходит...
Ну, раз у меня получилось создать сводную - то данные доступны...
эх..

romanchenko>> Re: БИЗВЛЕЧЬ, не пойму что есть критерий, а что поле.
2011-01-24 15:46 http://forum.msexcel.ru/profiles/romanchenko-u56677.html
Спасибо, то что надо.

moloko>> Re: Переформатировать отчет
2011-01-24 15:46 http://forum.msexcel.ru/profiles/moloko-u63192.html
Количество строк меняется. В этом то и проблема. Так можно было решить проблему воспользовавшись макрорекордером.

Serge 007>> Re: не обновляется сводная таблица
2011-01-24 15:48 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Так может просто в исходных изменений не было?

Ermash>> Re: не обновляется сводная таблица
2011-01-24 16:03 http://forum.msexcel.ru/profiles/ermash-u17998.html
Со сводными работаю уже не первый год...
такого не было никогда...
Вообще не происходит никаких действий...
Дело в том, что исходных данных около 500 тыс. строк - поэтому обновление быстро не происходит.
Этот процесс ранее занимал около минуты. Сейчас вообще никакого движения...

Алексей Шмуйлович>> Re: Переформатировать отчет
2011-01-24 16:06 http://forum.msexcel.ru/profiles/alexshm-u64.html
Тогда я бы пошел по пути загрузки исходных файлов в базу данных, например Access, и построения нужных отчетов оттуда. Но эта задача, конечно, требует времени и квалификации Грустный

Wasilic>> Re: Переформатировать отчет
2011-01-24 18:13 http://forum.msexcel.ru/profiles/wasilic-u24852.html

Цитата: moloko от 24 Январь 2011, 15:46:01

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

А еще, знать бы по каким критериям распознаются и разделяются позиции на 1 и 2 (как в примере).

Любахаха>> StringGrid
2011-01-25 10:03 http://forum.msexcel.ru/profiles/lyubahaha-u44010.html
Здравствуйте, подскажите есть ли в vba что то похожее на StringGrid.
Мне нужно вывести матрицу, просто в excel нельзя, нужно именно на форму.
Размер матрицы должен определяться в программе, заранее не известен.

GREGM>> Замена первого символа в ячейке.
2011-01-25 10:51 http://forum.msexcel.ru/profiles/gregm-u64903.html
Здравствуйте!
Подскажите, пожалуйста, как заменить первый символ в каждой ячейке.
Есть список телефонов в таблице, в каждой ячейке номер в формате 8926*******, нужно заменить "8" на "+7"
Большое спасибо за помощь!

_Boroda_>> Re: Замена первого символа в ячейке.
2011-01-25 10:55 http://forum.msexcel.ru/profiles/boroda-u12234.html
=ЗАМЕНИТЬ(A1;1;1;"+7")
или
="+"&(A1-10000000000)
или
ввести в любую ячейку 10000000000, скопировать, выделить диапазон с номерами, спец. вставка, поставить галку "вычесть". Потом можно еще поставить формат этих ячеек
[<=9999999]###-##-##;+#\ ###-###-##-##

Zabvo1971>> Ввод дополнительных значений в раскрывающийся список
2011-01-25 10:57 http://forum.msexcel.ru/profiles/zabvo1971-u64768.html
Добрый день!
Есть проблема с добавлением новых значений в раскрывающийся список.
Требуется помимо выбора значений в ячейке из списка, иметь возможность добавить туда новое значение, при этом сам список должен дополниться этим значением и в дальнейшем его отображать.

Serge 007>> Re: Замена первого символа в ячейке.
2011-01-25 11:02 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Ещё вариант:
Выделить диапазон с номерами
Ctrl+H
найти 8926
заменить на +7926

ЗЫ Сами номера (*******) не должны содержать сочетания цифр 8926

Или

Код:

="+"&ПОДСТАВИТЬ(A1;8;7;1)

или

Код:

=ПОДСТАВИТЬ(A1;8;"+7";1)

или

Код:

="+7"&ПРАВСИМВ(A1;10)

Roman.H>> Re: Ввод дополнительных значений в раскрывающийся список
2011-01-25 11:05 http://forum.msexcel.ru/profiles/romanh-u60392.html
http://www.planetaexcel.ru/tip.php?aid=98

GREGM>> Re: Замена первого символа в ячейке.
2011-01-25 11:19 http://forum.msexcel.ru/profiles/gregm-u64903.html
Огромное спасибо!
Все получилось.

jimbots>> Ищу хорошего программиста на Excel ($)
2011-01-25 12:17 http://forum.msexcel.ru/profiles/jimbots-u30021.html
Ищу хорошего программиста на Excel для выполнения задания дописать программу.

На счёт оплаты обращаться в ICQ: 153473 либо support@jimbots.ru

Спасибо за внимание!

Zabvo1971>> Re: Ввод дополнительных значений в раскрывающийся список
2011-01-25 13:19 http://forum.msexcel.ru/profiles/zabvo1971-u64768.html
Спасибо! Все работает.
Только теперь есть один нюанс: у меня ячеек, которые работают со списком, несколько (по умолчанию, это последовательные ячейки одного столбца). А в Visual Basic мы привязываемся к конкретной ячейке и работаем только с ней: If Target.Address = "$D$2" Then
Как мне распространить данные условия на все ячейки столбца?

_Boroda_>> Re: Ввод дополнительных значений в раскрывающийся список
2011-01-25 13:44 http://forum.msexcel.ru/profiles/boroda-u12234.html
Для В2:В9
If Not Intersect(Target, [B2:B9]) Is Nothing Then

или для всего столбца В
If Target.Column = 2 Then

Zabvo1971>> Re: Ввод дополнительных значений в раскрывающийся список
2011-01-25 14:01 http://forum.msexcel.ru/profiles/zabvo1971-u64768.html
Большое спасибо!
Все замечательно работает!!!

Jim>> сортировка по части даты
2011-01-25 14:22 http://forum.msexcel.ru/profiles/jim-u4457.html
всем привет!

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

_Boroda_>> Re: сортировка по части даты
2011-01-25 14:37 http://forum.msexcel.ru/profiles/boroda-u12234.html
в доп столбец формула
=ТЕКСТ(B2;"ММ ДД"), тогда это будет не дата, а текст
или
=ДАТА(;МЕСЯЦ(B2);ДЕНЬ(B2)) - останется дата 1900-го года

KuklP>> Re: Поиск и активация гиперссылок в Excel
2011-01-25 15:20 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Файла от Вас не дождался. Держите мой. Делал на гифах, но уже исправлено на джипеги.

KuklP>> Re: StringGrid
2011-01-25 15:29 http://forum.msexcel.ru/profiles/kuklp-u39713.html
ListBox не устраивает?

KuklP>> Re: сортировка по части даты
2011-01-25 15:49 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Пузырьком и Шелла.

Zabvo1971>> Подсчет значений ячеек по связанным условиям
2011-01-25 15:49 http://forum.msexcel.ru/profiles/zabvo1971-u64768.html
Добрый день!
В аттаче пример таблицы.
В листе Итог необходимо, помимо подсчета общего итога состояния приготовления напитков (Столбец B), подсчитывать этот итог в привязке к конкретной заявке (Столбец С).
Данные для подсчета, с номерами заявок, находятся на Листе Рабочий!

Serge 007>> Re: Подсчет значений ячеек по связанным условиям
2011-01-25 16:04 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Здравствуйте.

Код:

=СУММПРОИЗВ(($C$2=Рабочий!$B$2:$B$6)*(Рабочий!$C$2:$C$6=Итог!A3))

Zabvo1971>> Re: Подсчет значений ячеек по связанным условиям
2011-01-25 16:08 http://forum.msexcel.ru/profiles/zabvo1971-u64768.html
Большое спасибо, все заработало!!!

Sergey112233>> Re: Выделение строки цветом
2011-01-25 17:55 http://forum.msexcel.ru/profiles/sergey112233-u57126.html
Уважаемые форумчане.
Подразобрался с макросом, еще раз спасибо Ветерану

"Привинтил" к своим файлам 1.xls и 2.xls
В обоих файлах использую подсветку строки. Раздельно работает на ура.
В файл 2.xls копируются данные из файла 1.xls:

Код:

Dim TempWb As Workbook
Dim BazaSht As Worksheet
Dim iPath As String

With Application
.ScreenUpdating = False
.Calculation = xlCalculationManual

Set BazaSht = ActiveSheet
iPath = ActiveWorkbook.Path & "\"
Set TempWb = Workbooks.Open(Filename:="V:\1.xls", UpdateLinks:=False, ReadOnly:=True)

TempWb.Sheets("Лист1").Range("B12:C6000").Copy Destination:=BazaSht.Range("A12")
TempWb.Close saveChanges:=False
.Calculation = xlAutomatic
.ScreenUpdating = True
End With
End Sub

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

_Boroda_>> Re: Выделение строки цветом
2011-01-25 18:07 http://forum.msexcel.ru/profiles/boroda-u12234.html
А если в начало кода добавить
Application.DisplayAlerts=0
а в конец -
Application.DisplayAlerts=1

Sergey112233>> Re: Выделение строки цветом
2011-01-25 18:16 http://forum.msexcel.ru/profiles/sergey112233-u57126.html
_Boroda_
Срабатывает отлично!!
(Просто кладезь знаний)
Спасибо!!!
Это так называемый первый вариант - отключить окно от Excel&

nkbss>> Поиск уникальных значений
2011-01-25 20:21 http://forum.msexcel.ru/profiles/nkbss-u64969.html
Поиск уникальных значений.
Ещё проблема: есть 2 колонки, в 1 внесены значения времени с интервалом 0.05 с, во вторую - значения физической величины для данного времени. Подавляющее количество значений во второй колонке находятся в малом диапазоне отклонений от 0 (-0,1 - +0,1), а нужные значения имеют величину от 0,5 и выше. То есть, нужно выбрать из массива только те строки (из двух колонок), значения во второй колонке которых больше 0,5. Примера сейчас нет. Завтра на работе возьму.

Работаю я физиком. А вот с програмированием не всё хорошо.
Спасибо

nkbss>> Подсчет количества ячеек в диапазоне их значений
2011-01-25 20:22 http://forum.msexcel.ru/profiles/nkbss-u64969.html
1. Подсчет количества ячеек в диапазоне их значений. Нужно посчитать, например, в файле в колонке С (координаты звезд в градусах от -90 до +90) количество ячеек, значения которых попадают в диапазон от 0 до 10, от 10 до 20 и т.д.

2. Чтобы не создавать иную тему: как нанести на график с двумя осями значения в виде точек, не соединяя их линиями? Например, колонки H и I.
Спасибо

Tom32>> проверка последовательности ДНК
2011-01-25 20:42 http://forum.msexcel.ru/profiles/tom32-u64975.html
Уважаемые господа,
осмелюсь задать вам 2 вопроса:

1) каким образом проверить/ограничить набор допустимых символов в ячейке? (Например для ввода последовательности ДНК нужно только 4 буквы: atgc - все остальные будут ошибкой.

2) каким образом можно посчитать определенные буквы? (например в ячейку введена последовательность той же ДНК, нужно в соседних ячейках вывести количества использованных букв - отдельно а, отдельно с...

_Boroda_>> Re: проверка последовательности ДНК
2011-01-25 21:07 http://forum.msexcel.ru/profiles/boroda-u12234.html
Ограничение делать не стал - сложнее. Сделал проверку.

Serge 007>> Re: Подсчет количества ячеек в диапазоне их значений
2011-01-25 21:25 http://forum.msexcel.ru/profiles/serge_007-u25260.html

Код:

=СУММПРОИЗВ(--(ПРАВСИМВ(ЛЕВСИМВ($C$8:$C$137;ДЛСТР($C$8:$C$137)-3);2)>O6)*(--ПРАВСИМВ(ЛЕВСИМВ($C$8:$C$137;ДЛСТР($C$8:$C$137)-3);2)<=O7))

_Boroda_>> Re: Подсчет количества ячеек в диапазоне их значений
2011-01-25 21:35 http://forum.msexcel.ru/profiles/boroda-u12234.html
Поубивал лишние пробелы перед плюсами в столбце С. А то они то есть, то нет - не красиво, да и формула тогда попроще будет

nkbss>> Re: Поиск уникальных значений
2011-01-25 21:47 http://forum.msexcel.ru/profiles/nkbss-u64969.html
Реальный пример сейчас не дома. Наваял примитивную копию. Главное - функция и её правильная запись. Спасибо, что помогаете

nkbss>> Re: Подсчет количества ячеек в диапазоне их значений
2011-01-25 21:48 http://forum.msexcel.ru/profiles/nkbss-u64969.html
Спасибо, что помогаете. То, что было нужно.

nkbss>> Re: Поиск уникальных значений
2011-01-25 21:53 http://forum.msexcel.ru/profiles/nkbss-u64969.html

Цитата: _Boroda_ от 25 Январь 2011, 21:51:55

Что значит "нужно выбрать из массива только те строки "?
Вывести их в отдельную таблицу, или просто выделить (например, цветом заливки)?

Вывести их в отдельную таблицу, чтобы работать потом только с ними.
Но в той отдельной таблице нужны также и значения времени из первой колонки, то есть
0,01 | 1.5
0,03 | 2

Serge 007>> Re: Поиск уникальных значений
2011-01-25 21:56 http://forum.msexcel.ru/profiles/serge_007-u25260.html
.

nkbss>> Re: Поиск уникальных значений
2011-01-25 21:59 http://forum.msexcel.ru/profiles/nkbss-u64969.html

Цитата: Serge 007 от 25 Январь 2011, 21:56:47

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

Увидел. СПАСИБО. Я ещё смогу к вам обратиться?

Serge 007>> Re: Поиск уникальных значений
2011-01-25 22:00 http://forum.msexcel.ru/profiles/serge_007-u25260.html

Цитата: nkbss от 25 Январь 2011, 21:59:34

Увидел. СПАСИБО. Я ещё смогу к вам обратиться?

Запросто

И к Александру (Гуру с ником _Boroda_) я думаю тоже

nkbss>> Re: Поиск уникальных значений
2011-01-25 22:02 http://forum.msexcel.ru/profiles/nkbss-u64969.html
+ + двоим гуру Excel

Viking>> Вечер добрый, нужна помощь с формулой ЕСЛИ и ЕСЛИ
2011-01-25 22:19 http://forum.msexcel.ru/profiles/viking-u9505.html
Нужна формула для проставления значения в определном числовом значении. Суть 31 день (числовой ряд), в период с 4 по 7 работало 4 человека. Необходимо что быв интервал с 4 по 7 проставились значения 4, а в остальных ячейках был 0.

Спасибо.

_Boroda_>> Re: Поиск уникальных значений
2011-01-25 22:21 http://forum.msexcel.ru/profiles/boroda-u12234.html
За + спасибо - во вложении смотрим за что.
Серег, у тебя не учитывается вариант, когда два значения по 1,5. Он (вариант) и решение как раз во вложении.
А обратиться - конечно, не вопрос.

_Boroda_>> Re: Вечер добрый, нужна помощь с формулой ЕСЛИ и ЕСЛИ
2011-01-25 22:27 http://forum.msexcel.ru/profiles/boroda-u12234.html
=ЕСЛИ(И(I7>=$F$8;I7<=$G$8);$E$8;0)
или
=(I7>=$F$8)*(I7<=$G$8)*$E$8

Tom32>> Re: проверка последовательности ДНК
2011-01-25 22:29 http://forum.msexcel.ru/profiles/tom32-u64975.html
Спасибо. Попробую осознать )

Serge 007>> Re: Вечер добрый, нужна помощь с формулой ЕСЛИ и ЕСЛИ
2011-01-25 22:30 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Здравствуйте.
Не совсем понял что надо, но может быть это:

Код:

=ЕСЛИ(И(I8=4;I9=4);4;0)

Serge 007>> Re: Поиск уникальных значений
2011-01-25 22:39 http://forum.msexcel.ru/profiles/serge_007-u25260.html

Цитата: _Boroda_ от 25 Январь 2011, 22:21:25

Серег, у тебя не учитывается вариант, когда два значения по 1,5. Он (вариант) как раз во вложении.

Ага. Вложение не смотрел, но понимаю о чём ты.
Я специально привожу решения, так сказать, максимально приближенные к примеру

Если у автора повторений нет, то попрёт и [url=http://msexcel.ru/content/view/20/2/]ВПР(_)[/url], дабы не грузить файл формулами массива Подмигивающий

Ну а как извлечь то что хочет автор если есть повторы, то думаю ты лучше меня знаешь

Индекс(Наибольший(Если;Строка()))...

S63AMG>> Макрос для удаления строки с одной пустой ячейкой
2011-01-25 22:57 http://forum.msexcel.ru/profiles/s63amg-u65007.html
Здравствуйте, уважаемые специалисты!
Пожалуйста помогите сделать макрос для "производственных задач" Подмигивающий
Дано: таблица - 6 столбцов, около 1000 строк.
Задача макроса: удалять строки, в которых есть только одна пустая ячейка
Если же в строке больше чем 1 пустая ячейка (например 2 рядом) - не удалять строку.

PS Если ячейка одна и пустая в строке, то она всегда находится только в 5 столбце).
Заранее благодарю за помощь.

nkbss>> Re: Поиск уникальных значений
2011-01-25 23:28 http://forum.msexcel.ru/profiles/nkbss-u64969.html

Цитата: _Boroda_ от 25 Январь 2011, 22:21:25

За + спасибо - во вложении смотрим за что.
Серег, у тебя не учитывается вариант, когда два значения по 1,5. Он (вариант) и решение как раз во вложении.
А обратиться - конечно, не вопрос.

Ещё раз спасибо вам. Действительно, в оригинальном массиве много одинаковых значений

_Boroda_>> Re: Макрос для удаления строки с одной пустой ячейкой
2011-01-25 23:37 http://forum.msexcel.ru/profiles/boroda-u12234.html
Ловите.
А вооще-то файл свой прикладывать надо!

Viking>> Re: Вечер добрый, нужна помощь с формулой ЕСЛИ и ЕСЛИ
2011-01-26 00:12 http://forum.msexcel.ru/profiles/viking-u9505.html
Спасибо всем ОГРОМНОЕ Пивасик

Spider1>> Re: Поиск и активация гиперссылок в Excel
2011-01-26 08:24 http://forum.msexcel.ru/profiles/spider1-u11413.html

Цитата: KuklP от 25 Январь 2011, 15:20:28

Файла от Вас не дождался. Держите мой. Делал на гифах, но уже исправлено на джипеги.

Спасибо большое, все нормально работает

очень помогли

Lola_Esposito>> Re: Списки в Excel
2011-01-26 08:55 http://forum.msexcel.ru/profiles/lolaesposito-u65195.html
К сожалению нет времени читать все страницы, может кто ссылку даст если подобное уже было, ну или вдруг кто поможет - буду премного благодарна.
Есть список соискателей (с должностями и подразделениями), отправляем на согласование разным руководителям их документы и в excel ставим дату когда это сделали. Мне нужно отслеживать какие не вернулись с согласования, например, через 3 дня. Вот как сделать, чтобы какое-либо оповещение вылезало, что на Иванова и Петрова документы не вернулись?

Lusonochek>> Анализ чувствительности
2011-01-26 09:33 http://forum.msexcel.ru/profiles/lusonochek-u65018.html
Здравствуйте!
Кто-нибудь знает, позволяет ли Excel проводть анализ чувствительности показателя, например NPV, проекта по различным параметрам?

Бух>> Бухгалтерия
2011-01-26 14:57 http://forum.msexcel.ru/profiles/buh-u65258.html
Подскажите как сделать бухгалтерскую оборотно-сальдовую ведомость при помощи сводной таблицы excel.. Непонимающий

AlexSN>> Автоматический заполнение ячейки относительно имени сотрудника
2011-01-26 17:18 http://forum.msexcel.ru/profiles/alexsn-u65397.html
Есть лист Excel, в который постоянно копируются данные с одинаковыми именами сотрудников.
Как можно сделать так, чтобы при очередном внесении имени сотрудника в последней пустой ячейке строки появлялось наименование группы, к которой относится этот сотрудник.
Например :
столбец1 столбец2
Вася | автоматически должно появиться "Менеджер"
Коля | автоматически должно появиться "Водитель"
Петя | автоматически должно появиться "Продавец"
Подскажите каким образом можно такое реализовать?

oljachak>> Re: Совместить два отчёта по коду торговой точки
2011-01-26 17:21 http://forum.msexcel.ru/profiles/oljachak-u65254.html
а возможно сделать тоже самое, но чтобы не в строчку записывалось, а в столбец?

_Boroda_>> Re: Автоматический заполнение ячейки относительно имени сотрудника
2011-01-26 17:23 http://forum.msexcel.ru/profiles/boroda-u12234.html

Цитировать

постоянно копируются данные

это как? вручню или автозагрузка из откуда-то?

Должна быть таблица соответствия Имя-Должность

Что, если Васей двое - менеджер и водитель?

Без примера - функция ВПР.
Хотите подробнее - кладите Вашу таблицу.

Zabvo1971>> Помогите составить план-график отгрузки оборудования
2011-01-26 17:24 http://forum.msexcel.ru/profiles/zabvo1971-u64768.html
Добрый день!
Подскажите, пожалуйста, как мне подготовить план-график на основе табличных данных.
На Листе Рабочий! находятся исходные данные.
Необходимо в таблице (Лист График!) собрать сведения по конкретной заявке, номер которой вводится вручную в ячейку График!B2.
Сведения необходимо получить в разрезе: дата отгрузки - количество отгружаемого оборудования помодельно - общее количество оборудования, отгружаемого в этот день.

_Boroda_>> Re: Совместить два отчёта по коду торговой точки
2011-01-26 17:25 http://forum.msexcel.ru/profiles/boroda-u12234.html
Это как?
Примерчик в Excel нарисуйте и приложите (в формате "Так есть" - "Так хочу")

AlexSN>> Re: Автоматический заполнение ячейки относительно имени сотрудника
2011-01-26 17:34 http://forum.msexcel.ru/profiles/alexsn-u65397.html
Лист Excel.Копируются данные в ручную.Таблицы здесь нет ни какой.Так как она здесь и не нужна.
Интересует конкретно вопрос как можно реализовать, чтобы при внесении данных заполнялась ячейка тем , чем мне нужно..В первом посте все конкретно описано...Другого ничего не нужно..

Вася только один.Другого не будет.)))

AlexSN>> Re: Автоматический заполнение ячейки относительно имени сотрудника
2011-01-26 18:01 http://forum.msexcel.ru/profiles/alexsn-u65397.html

Цитата: _Boroda_ от 26 Январь 2011, 17:23:35

Цитировать

постоянно копируются данные

Спасибо _Boroda_.... Направили в нужное русло меня. Мне как раз нужна была Таблица соответствий для реализации моего вопроса..

_Boroda_>> Re: Помогите составить план-график отгрузки оборудования
2011-01-26 18:07 http://forum.msexcel.ru/profiles/boroda-u12234.html
Так?

Zabvo1971>> Re: Помогите составить план-график отгрузки оборудования
2011-01-26 18:18 http://forum.msexcel.ru/profiles/zabvo1971-u64768.html
Да, именно так!
Большое спасибо, попробую теперь на рабочую таблицу Ваш вариант применить.
А избавиться от лишних строк никак нельзя? Чтобы строки выводил только по фактически присутствующим датам, количество которых заранее неизвестно и не расширять таблицу "про запас"?

Zabvo1971>> Re: Помогите составить план-график отгрузки оборудования
2011-01-26 18:55 http://forum.msexcel.ru/profiles/zabvo1971-u64768.html
Уважаемый _Boroda_!
Я проверил еще раз таблицу и обнаружил несоответствие количества оборудования конкретным датам.
Можете помочь внести корректировки в формулы?
Заранее Вам признателен за помощь!

Svetkevich>> фильтрация данных в Exl2007
2011-01-26 19:38 http://forum.msexcel.ru/profiles/svetkevich-u65423.html
Подскажите, пожалуйста, решение такой проблемы:
Существует 2 книги с различными данными(например, наименование и сумма). Признак наименования в двух книгах идентичен. Я фильтрую определенный диапазон ячеек по одному наименоваю в книге 1, копирую диапазон суммы и хочу вставить эти данные в отфильтрованную по тому же наименованию в книгу 2.

Алексей Шмуйлович>> Re: Анализ чувствительности
2011-01-26 20:18 http://forum.msexcel.ru/profiles/alexshm-u64.html
Можно использовать таблицы данных (в Excel 2003 таблицы подстановки). Посмотрите во вкладке Данные - Анализ "Что, если?" - Таблицы данных.
Подробнее сейчас, к сожалению, объяснять некогда. Поищите в справке или на форуме.

oljachak>> Ввод данных в таблицу из других файлом при одинаковых значениях
2011-01-26 20:24 http://forum.msexcel.ru/profiles/oljachak-u65254.html
Есть следующие файлы:
"PO Templa....." - файл с заказами, каждая строка для 1 продукта, т.е. у одного заказа может быть несколько строк
"Invoice Template..." - файл, куда вводятся счета от поставщика
"Open Orders" - файл так называемых открытых заказов, в этот файл берётся информация из PO i Invoice

1. На данных момент я ввожу в ручную Order Number, Product code, Scheduled date, тогда все остальные данные до столбца P появляются автоматически. После данные вводятся в ручную. Это так называемые ожидаемые данные. Если ожидается на несколько недель по определенному объёму, то вручную добавляю строки, они выделины жёлтым.
Возможно ли сделать:
a) чтобы при вводит Order Number появлялись также автоматически Product code, Scheduled date
b) при добавлении новой строки в "PO Templa..."она появлялась и в "Open Orders"

2. Есть еще одна проблема
Qty invoiced - это кол-во, на которое уже получили счёт
Qty delivered - это кол-во, на которое уже получили счёт,но в файле"Invoice Template.....

IKor>> Re: Списки в Excel
2011-01-26 20:34 http://forum.msexcel.ru/profiles/ikor-u6827.html
Из Вашего запроса неочевидно зачем требуются списки.
Посмотрите пример - то ли это, что Вы хотите сделать?
Если нет, то сформулируйте задачу по-другому и желательно приложите Ваш пример.

_Boroda_>> Re: Помогите составить план-график отгрузки оборудования
2011-01-26 20:35 http://forum.msexcel.ru/profiles/boroda-u12234.html
От лишних строк избавиться можно макросом. Но их не все любят (а зря).
Про несоответствие - конкретно: при каком номере заявки что не правильно? напишите.

апрелюшка>> Как автоматизировать листочик excel 2003
2011-01-26 21:10 http://forum.msexcel.ru/profiles/aprelyushka-u65428.html
Помогите автоматизировать табель, я полный чайник, excel 2003. С этой табличкой приходится работать очень часто.
Подскажите как можно сделать, что б он автоматом мне считал проставленные буквы «Н» (в столбце) и выводил результат в самой нижней строчки (выделена красным). И так же подсчитывал только буковки «Н» в строке и выводил результат в столбце (тоже выделен красным).
Цифры он считает (но не выводит автоматом).
Или хотябы сделать, как цифры он считает. (но не выводит).
Что мне для этого нужно сделать? Непонимающий ??
Заранее спасибо, всем кто откликнется.

_Boroda_>> Re: Как автоматизировать листочик excel 2003
2011-01-26 21:14 http://forum.msexcel.ru/profiles/boroda-u12234.html
Используйте формулку СЧЁТЕСЛИ
Или приложите файлик в форматике Excel, тогда Вам ее напишут

Serge 007>> Re: фильтрация данных в Exl2007
2011-01-26 21:18 http://forum.msexcel.ru/profiles/serge_007-u25260.html
И в чём проблема?
Фильтруйте, вставляйте. Кто мешает?

апрелюшка>> Re: Как автоматизировать листочик excel 2003
2011-01-26 21:25 http://forum.msexcel.ru/profiles/aprelyushka-u65428.html

Цитата: _Boroda_ от 26 Январь 2011, 21:14:59

Используйте формулку СЧЁТЕСЛИ
Или приложите файлик в форматике Excel, тогда Вам ее напишут

Так я ЧАЙНИК, формул не знаю, а еще хуже не знаю куда их вставлять (вернее как правильно) Обеспокоенный

вроде вложение сделала с архивом rar.

_Boroda_>> Re: Как автоматизировать листочик excel 2003
2011-01-26 21:33 http://forum.msexcel.ru/profiles/boroda-u12234.html
Ну тогда вот:

Zabvo1971>> Re: Помогите составить план-график отгрузки оборудования
2011-01-26 21:46 http://forum.msexcel.ru/profiles/zabvo1971-u64768.html
Добрый вечер!
Что касается несоответствия, то прошу прощения, все правильно работает.
Если возможно, то помогите с макросом. У меня это будет реальная рабочая таблица, доступная смежным подразделениям. Очень хотелось бы придать ей законченный вид.
Спасибо!

Alexandr Zlobin>> Считывание и запись данных Application.Names
2011-01-26 22:23 http://forum.msexcel.ru/profiles/zlobin-u1684.html
Здравствуйте. Пытаюсь записать и считать данные из Application.Names ("Имя") . Вылетает ошибка 1004 . Может какую-то библиотеку не подключил?

S63AMG>> Re: Макрос для удаления строки с одной пустой ячейкой
2011-01-26 23:16 http://forum.msexcel.ru/profiles/s63amg-u65007.html
Спасибо большое _Boroda_ за столь оперативную помощь! Очень помогло автоматизировать нудные операции
Однако еще очень важный вопрос: возможно ли этот макрос модифицировать, чтобы он удалял строки с ячейками, в которой содержится только один тег <br> и далее пустота?
Например в прикрепленной базе это строки с пустыми ячейками №58-61 и также строки №89-91.
Заранее спасибо за помощь (намек в подписи понял, сделаем;))

ZORRO2005>> Re: фильтрация данных в Exl2007
2011-01-27 00:35 http://forum.msexcel.ru/profiles/zorro2005-u4225.html
Svetkevich,
без VBA не получится.
см. решение от Prist:
http://forum.msexcel.ru/microsoft_excel/vstavka_bez_ucheta_skrytyh_strok-t3356.0.html;msg19375#msg19375

_Boroda_>> Re: Макрос для удаления строки с одной пустой ячейкой
2011-01-27 01:13 http://forum.msexcel.ru/profiles/boroda-u12234.html
Проверяем

KuklP>> Re: Не работает метод Select при копировании и вставке значений
2011-01-27 07:10 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Зачем эти селекты вообще нужны?:

Код:

Private Sub CommandButton1_Click()
   [G23].Copy
   Workbooks.Open Filename:="C:\Дир1\Книга1.xls"
   Workbooks("Книга1.xls").Sheets(1).[G18].PasteSpecial Paste:=xlPasteValues
   Application.CutCopyMode = False
   ' Workbooks("Книга1.xls").Close True
End Sub

oljachak>> Re: Совместить два отчёта по коду торговой точки
2011-01-27 10:03 http://forum.msexcel.ru/profiles/oljachak-u65254.html
Посмотрите пожалуйста тему "Ввод данных в таблицу из других файлом при одинаковых значениях" пункт номер 2.

_Boroda_>> Re: Помогите составить план-график отгрузки оборудования
2011-01-27 10:11 http://forum.msexcel.ru/profiles/boroda-u12234.html
А вот мысль пришла запоздалая - это классическая задача для сводной.
Посмотрите примерчик - глядишь, и понравится.

Zabvo1971>> Re: Помогите составить план-график отгрузки оборудования
2011-01-27 10:32 http://forum.msexcel.ru/profiles/zabvo1971-u64768.html
Добрый день!
Я вчера уже пытался использовать сводную таблицу.
На примере она работает идеально.
Но к рабочему варианту прикрутить ее не смог из-за заголовков таблицы.
Приаттачил рабочий вариант.

_Boroda_>> Re: Помогите составить план-график отгрузки оборудования
2011-01-27 11:05 http://forum.msexcel.ru/profiles/boroda-u12234.html
А как Вам такой вариант?

Zabvo1971>> Re: Помогите составить план-график отгрузки оборудования
2011-01-27 11:18 http://forum.msexcel.ru/profiles/zabvo1971-u64768.html
При открытии файла появляются следующие сообщения (см. аттач)
Кроме того, я забыл указать, что дату надо брать из столбца [Отгрузка заказчику|Прогноз]

nkbss>> Работа с градусной мерой и часовым углом, график
2011-01-27 11:23 http://forum.msexcel.ru/profiles/nkbss-u64969.html
Работа с градусной мерой и часовым углом, график
1. Имеется колонка в диапазоне C8:C137, в ней внесены значения угла (меняется от -90 до +90):
-09 27
+05 13
+38 44
-56 47
Тут первое число - градусы, второе - минуты, как сделать, чтобы программа понимала эти числа именно так, как нужно. В этом же файле в колонках X Y Z есть таблица, где ведется подстчет количества ячеек, значения которіх попадают в заданный интервал с определённым шагом. Что интересно, функция считает вроде правильно, не смотря на то, что в значении есть пробел. Что делать, не нашёл.

Если посмотреть на B8:B137, то там тоже видим:
14 39,6 (изначально было 14h 39,6m) (всегда две цифры, пробел, две цифры, запятая, цифра)
06 54,1
03 32,9
07 39,3
здесь первое число перед пробелом - часовой угол (24h=360 градусов, 1h=15 градусов, 1m=0,25 градуса)
Как сделать таблицу, в которой будет считаться количество ячеек в дипазоне значений с шагом например 1h (ну, или 30m)?

Таблица (AB AC AD), в которой ведётся подсчет того же, но дл...

_Boroda_>> Re: Помогите составить план-график отгрузки оборудования
2011-01-27 11:34 http://forum.msexcel.ru/profiles/boroda-u12234.html
А так?

guest0>> Использование в фильтре ячейки как критерия
2011-01-27 21:54 http://forum.msexcel.ru/profiles/guest0-u65675.html
суть проблемы:
есть простая таблица дата доход - пример:

Код:

12.11.2001 134
14.01.2002 276
15.12.2005 312
09.09.2009 421
08.07.2004 544

нужно вывести только те строки, которые находятся в заданном диапазоне времени

диапазон должен задаваться динамически, и как только указано новое значение, фильтр должен обновляться

Elavio>> Re: ДВОЙНОЙ ВПР
2011-01-27 21:56 http://forum.msexcel.ru/profiles/elavio-u51778.html
Еще вопросик по файлу,если я перенесу с таблицы 2 -самую верхнюю строку ,там где 0000 1111 в первую таблицу ,по данной формуле можно будет посчитать ?

У меня что-то не идет...(((

Elavio>> Re: ДВОЙНОЙ ВПР
2011-01-27 21:57 http://forum.msexcel.ru/profiles/elavio-u51778.html
Извиняюсь за неученость и за трату времени на меня ,что такое ЮДФ-ки ?

Serge 007>> Re: ДВОЙНОЙ ВПР
2011-01-27 22:03 http://forum.msexcel.ru/profiles/serge_007-u25260.html

Цитата: Elavio от 27 Январь 2011, 21:57:53

Извиняюсь за неученость и за трату времени на меня ,что такое ЮДФ-ки ?

Юзер Дефинишн Функшн. Короче функция написанная самим пользователем.

Serge 007>> Re: Использование в фильтре ячейки как критерия
2011-01-27 22:04 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Пример давайте.

guest0>> Re: Использование в фильтре ячейки как критерия
2011-01-27 22:14 http://forum.msexcel.ru/profiles/guest0-u65675.html
то что нужно во вложении, понимаю что вопрос совсем нубовский, но тем не менее

может предложите другой способ получения таких выходных таблиц

_Boroda_>> Re: Работа с градусной мерой и часовым углом, график
2011-01-27 22:15 http://forum.msexcel.ru/profiles/boroda-u12234.html
По поводу диаграммки - конечно можно. И ось буквенную тоже можно.
см. вложение
Осью можно играться красных ячейках

_Boroda_>> Re: Использование в фильтре ячейки как критерия
2011-01-27 22:17 http://forum.msexcel.ru/profiles/boroda-u12234.html
В Excele пример давайте, а не картинкой

_Boroda_>> Re: ДВОЙНОЙ ВПР
2011-01-27 22:20 http://forum.msexcel.ru/profiles/boroda-u12234.html

Цитировать

Еще вопросик по файлу,если я перенесу с таблицы 2 -самую верхнюю строку ,там где 0000 1111 в первую таблицу ,по данной формуле можно будет посчитать ?

У меня что-то не идет...(((

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

Elavio>> Re: ДВОЙНОЙ ВПР
2011-01-27 22:22 http://forum.msexcel.ru/profiles/elavio-u51778.html
Понятно.

У меня новая проблема,не могу прописать данную ф-цию в столбе базовая единица .............

Файл додаю

Elavio>> Re: ДВОЙНОЙ ВПР
2011-01-27 22:24 http://forum.msexcel.ru/profiles/elavio-u51778.html
Неа,закрасите не пойдет ,мне потом етот лист нужен будет для импорта в другую программу и на нем должна быть только таблица

Решил по другому-вырезал и вставил на первом листе

_Boroda_>> Re: ДВОЙНОЙ ВПР
2011-01-27 22:25 http://forum.msexcel.ru/profiles/boroda-u12234.html
А что туда тянуть нужно? какой столбец из листа 1?

guest0>> Re: Использование в фильтре ячейки как критерия
2011-01-27 22:26 http://forum.msexcel.ru/profiles/guest0-u65675.html
я не могу дать пример в экселе, мне нужно получить это в экселе

я вам могу только дать два столбика: дата доход

Serge 007>> Re: ДВОЙНОЙ ВПР
2011-01-27 22:26 http://forum.msexcel.ru/profiles/serge_007-u25260.html
У Вас не столбца "Базовая единица" на Лист 1.
Поэтому используйте

Код:

=ИНДЕКС(Лист1!$E$4:$E$70;ПОИСКПОЗ($A4&Лист1!L$3;Лист1!$A$4:$A$70&Лист1!$B$4:$B$70;0))

.
Не забываем про Ctrl+Shift+Enter

Serge 007>> Re: Использование в фильтре ячейки как критерия
2011-01-27 22:28 http://forum.msexcel.ru/profiles/serge_007-u25260.html

Цитата: guest0 от 27 Январь 2011, 22:26:58

я не могу дать пример в экселе...

Но ответ-то нужен в нём? Тогда потрудитесь соорудить пример "Что есть" - "Что надо" в EXCEL.
И вручную заполнить итог.

Elavio>> Re: ДВОЙНОЙ ВПР
2011-01-27 22:36 http://forum.msexcel.ru/profiles/elavio-u51778.html
Что то не так,оно все "1" выставило

Хочу что б со стобца "J" (10 столбец) тянуло в столбец базовая единица на листе 2 ,тоесть в идеале у всех там должно быть "шт"

Serge 007>> Re: ДВОЙНОЙ ВПР
2011-01-27 22:40 http://forum.msexcel.ru/profiles/serge_007-u25260.html

Цитата: Elavio от 27 Январь 2011, 22:36:03

Что то не так,оно все "1" выставило

Хочу что б со стобца "J" (10 столбец) тянуло в столбец базовая единица на листе 2 ,тоесть в идеале у всех там должно быть "шт"

Правильно. По всем артикулам с 1 по 17 - шт.=1.

А то что Вы хотите:

Код:

=ИНДЕКС(Лист1!J4:J70;ПОИСКПОЗ($A4&Лист1!L$3;Лист1!$A$4:$A$70&Лист1!$B$4:$B$70;0))

Я уже писал: "Меняем диапазон ИНДЕКС".

guest0>> Re: Использование в фильтре ячейки как критерия
2011-01-27 22:45 http://forum.msexcel.ru/profiles/guest0-u65675.html
ок, понял вас, исправляюсь

nkbss>> Диаграмма лепестковая, как правильно выбрать значения
2011-01-27 22:47 http://forum.msexcel.ru/profiles/nkbss-u64969.html
Я хочу построить лепестковую диаграмму, но выбирая две колонки, получаю два графика, а нужно, чтобы он был один (второй внизу, построен верно), а по кругу было написано от -90 до 90.

Serge 007>> Re: Использование в фильтре ячейки как критерия
2011-01-27 22:49 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Если 5-е включительно, то сумма считается так:

Код:

=СУММПРОИЗВ(--(($A$6:$A$20>=D6)*($A$6:$A$20<E6))*B6:B20)

Elavio>> Re: ДВОЙНОЙ ВПР
2011-01-27 22:55 http://forum.msexcel.ru/profiles/elavio-u51778.html
Еврика !!!

Формулы масива -сила ,а в умных головах - УБОЙНАЯ !

Спасибо ребята !!!!

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

В избранное

{#template MAIN} <div id="loginForm" style="display:none;" class="subscriberu_popup"> <div class="popup_register"> {#include js_tmpl_auth_reg_tab} {#if $P.login_register_tab == 1} <form class="authentication-form" method="post" action="/MEMBERLOGIN_authen_cred"> <dl class="rg_block_options"> <dt id="js_tap_panel_auth"> <h1>Войти на сайт</h1> {* {#include js_tmpl_auth_reg_button} *} {#include js_tmpl_auth_reg_action} <hr class="logreg_line noPhones"> <div class="logreg_descr noPhones"><p>{#include js_tmpl_auth_reg_descr} </p></div> <div class="logreg_advice noPhones"> Если вы еще не с нами, то начните с <a href="#" onclick="rgNav('js_tab_reg');return false;" class="dashed" data-func="registr">регистрации</a> </div> <br><br> <a class="dashed auth-enter" href="/manage/author/"><b>Вход для авторов</b></a> </dt> </dl> </form> {#/if} {#if $P.login_register_tab == 2} <div class="rg_block_options"> <div id="js_tap_panel_auth"> <h1>Регистрация</h1> <div class="social_reg"> {* <div class="rg_description">{#include js_tmpl_soc_auth_reg_descr}</div> *} {#include js_tmpl_auth_reg_soc} <div class="rg_soc_auth_agree">{#include js_tmpl_auth_reg_agree}</div> </div> <div class="subscribe_reg"> {* <div class="rg_description"> #include js_tmpl_auth_reg_descr </div> *} {#include js_tmpl_auth_reg_action} </div> {* {#include js_tmpl_auth_reg_button} *} <div class="clr"> </div> <hr class="logreg_line noPhones"> <div class="logreg_descr noPhones">{#include js_tmpl_auth_reg_descr} {#include js_tmpl_soc_auth_reg_descr} </div> </div> </div> {#/if} </div> {* <div class="gray_bg register_shadow"></div> *} </div> {#/template MAIN} {#template js_tmpl_auth_reg_tab} <ul class="rg_nav"> <li id="js_tab_auth" class="{#if $P.login_register_tab == 1} rg_active_nav {#/if} rg_first_nav"><a onclick="rgNav('js_tab_auth');return false;" href="">Вход на сайт</a></li> <li id="js_tab_reg" class="{#if $P.login_register_tab == 2} rg_active_nav {#/if}"><a onclick="rgNav('js_tab_reg');return false;" href="">Регистрация </a></li> </ul> <span onclick="hidebo();" class="rg_closed"> </span> {#/template js_tmpl_auth_reg_tab} {#template js_tmpl_auth_reg_action} {#if $P.login_register_tab == 1} {#include js_tmpl_auth_reg_soc} {#/if} <div class="rg_forms"> <input type="hidden" id="login_register_destination" value="{$P.login_register_destination}"/> {#if $P.login_register_tab == 1} <div class="rg_for_input"> <span class="rg_text_inner">E-mail или код подписчика</span> <input id="credential_0" class="js_keydown_selector rg_input_text" data-js_submit="no" data-js_next_input_name="credential_1" name="" type="text" /> </div> <div class="rg_for_input"> <span class="rg_text_inner">Пароль</span> <input id="credential_1" class="js_keydown_selector rg_input_text" data-js_submit="yes" data-js_action="js_loginFormBut" name="" type="password" onkeyup="showAttention(this,!!window.event.shiftKey)" /> <span class="pswd_attention" id="attention_pswd"> <span class="icon_attention"></span> <span class="pswd_attention-text" id="attention-text_pswd1">Русская раскладка клавиатуры!</span> <span class="pswd_attention-text" id="attention-text_pswd2">У вас включен Caps Lock!</span> <span class="pswd_attention-text" id="attention-text_pswd3">У вас включен Caps Lock и русская раскладка клавиатуры!</span> </span> </div> <div class="rg_for_input input-alien"> <span class="chk noPhones"><input id="chk_alien" name="" type="checkbox" /></span><label for="chk_alien" class="noPhones"> Чужой компьютер</label> <a class="forgot_pass" href="/member/totalrecall">Забыли пароль?</a> </div> <div class="rg_for_input"> <em id="auth_msg" class="reg_error"></em> <input id="lf_typeauthid" value="email" type="hidden"> <input type="submit" class="button button-red logreg_submit" id="js_loginFormBut" value="Войти">  <div class="loading loading-cover" style="display: none;"><div class="loader"></div></div> </div> {#/if} {#if $P.login_register_tab == 2} <div class="rg_for_input"> <span class="rg_text_inner">E-mail</span> <input id="arfemail" class="js_keydown_selector rg_input_text" name="" type="text" data-js_submit="yes" data-js_action="js_regFormBut"/> </div> <div class="rg_for_input rg_set_lineh rg_for_input_wide"> <label class="js_tap_panel_checkbox"> <span class="chk"><input name="" id='js_tap_panel_checkbox_terms' type="checkbox" data-js_submit="yes" /></span> Я ознакомился и согласен с <a class="link_txd logreg_accLink" href="/faq/vereinbarung.html">условиями сервиса Subscribe.ru</a> </label> <br /> <label class="js_tap_panel_checkbox"> <span class="chk"><input name="" id='js_tap_panel_checkbox_personal' type="checkbox" data-js_submit="yes" /></span> Нажимая на кнопку "Готово!", я даю <a class="link_txd logreg_accLink" href="/faq/persverordnung.html">согласие на обработку персональных данных</a> </label> </div> {* <div style="float: left;position: absolute;left: 11em;"> <img src="http://www.kupivip.ru/images/vip/logo.png?1604" style="width: 86px; vertical-align: middle;display: block;"> </div> <div class="rg_for_input rg_set_lineh"> <label class="js_tap_panel_checkbox"><input name="" id="js_tap_panel_checkbox_kupivip" type="checkbox" data-js_submit="yes"> Я хочу получать новости о скидках на одежду</label> </div> *} <div class="rg_for_input"> <em id="reg_msg" class="reg_error rg_for_input_wide"></em> <em id="reg_msg2" class="reg_error rg_for_input_wide"></em> <input id="rf_typeauthid" value="email" type="hidden"> <a class="button button-red logreg_submit" id="js_regFormBut" href="#">Готово!</a> <div class="loading loading-cover" style="display: none;"><div class="loader"></div></div> </div> {#/if} </div> {#/template js_tmpl_auth_reg_action} {#template js_tmpl_auth_reg_agree} <div class="rg_for_input rg_set_lineh rg_for_input_wide"> <label class="js_tap_panel_checkbox"> <span class="chk"><input name="" id='js_tap_panel_checkbox_terms_reg' type="checkbox" data-js_submit="yes" /></span> Я ознакомился и согласен с <a class="link_txd logreg_accLink" href="/faq/vereinbarung.html">условиями сервиса Subscribe.ru</a></label> <em id="reg_msg_soc" class="reg_error rg_for_input_wide"></em> </div> {#/template js_tmpl_auth_reg_agree} {#template js_tmpl_auth_reg_button} <div class="rg_butons_socials"> {#if $P.login_register_tab == 1} <a class="rg_btn_soc rg_bs_01 js_tap_panel_selector" action="auth_email" href="#"><span><i></i>Email</span></a> <a class="rg_btn_soc rg_bs_01 js_tap_panel_selector" action="auth_openid" href="#"><span><i></i>OpenID</span></a> <a class="rg_btn_soc rg_bs_02 js_tap_panel_selector" action="auth_vkontakte" href="#"><span><i></i>Вконтакте</span></a> <a class="rg_btn_soc rg_bs_02 js_tap_panel_selector" action="auth_mailru" href="#"><span><i></i>Mail.Ru</span></a> {#/if} {#if $P.login_register_tab == 2} <a class="rg_btn_soc rg_bs_01 js_tap_panel_selector" action="reg_email" href="#"><span><i></i>Email</span></a> <a class="rg_btn_soc rg_bs_01 js_tap_panel_selector" action="reg_openid" href="#"><span><i></i>OpenID</span></a> <a class="rg_btn_soc rg_bs_02 js_tap_panel_selector" action="reg_vkontakte" href="#"><span><i></i>Вконтакте</span></a> <a class="rg_btn_soc rg_bs_02 js_tap_panel_selector" action="reg_mailru" href="#"><span><i></i>Mail.Ru</span></a> {#/if} </div> {#/template js_tmpl_auth_reg_button} {#template js_tmpl_auth_reg_descr} {#if $P.login_register_tab == 1} Для оформления подписки на выбранную рассылку, работы с интересующей вас группой или доступа в нужный вам раздел, просим авторизоваться на Subscribe.ru {#/if} {#if $P.login_register_tab == 2} Для регистрации укажите ваш e-mail адрес. Адрес должен быть действующим, на него сразу после регистрации будет отправлено письмо с инструкциями и кодом подтверждения. {#/if} {#/template js_tmpl_auth_reg_descr} {#template js_tmpl_soc_auth_reg_descr} Или зарегистрируйтесь через социальную сеть. {#/template js_tmpl_soc_auth_reg_descr} {#template js_tmpl_auth_reg_soc} <div class="rg_soc"> {#if $P.login_register_tab == 1} <a onclick="return _checkSocConfirm(event)" href="https://oauth.vk.com/authorize?client_id=3954260&scope=wall,offline,photos,groups,video,audio,email&redirect_uri={location.protocol+'//'+location.host}/member/login/vk/&response_type=code&v=5.15" class="login_register_vk_button"> <span class="login_register_vk_icon"></span> </a> {#/if} {#if $P.login_register_tab == 2} <a onclick="return _checkSocConfirm(event)" href="https://oauth.vk.com/authorize?client_id=3954260&scope=wall,offline,photos,groups,video,audio,email&redirect_uri={location.protocol+'//'+location.host}/member/join/vk&response_type=code&v=5.15" class="login_register_vk_button"> <span class="login_register_vk_icon"></span> </a> {#/if} </div> {#/template js_tmpl_auth_reg_soc}

{#template MAIN} <div id="loginForm" style="display:none;" class="subscriberu_popup"> <div class="popup_register"> {#include js_tmpl_auth_reg_tab} <dl class="rg_block_options"> <dt id="js_tap_panel_auth"> <p class="rg_description">{#include js_tmpl_auth_reg_descr}</p> <div class="clr"> </div> {#include js_tmpl_auth_reg_action} <div class="clr"> </div> </dt> </dl> </div>  </div> {#/template MAIN} {#template js_tmpl_auth_reg_tab} <ul class="rg_nav"> <li id="js_tab_reg" class="rg_active_nav rg_first_nav"><a href="" onclick="return false;" >Регистрация</a></li> </ul> <span onclick="hidebo();" class="rg_closed"> </span> {#/template js_tmpl_auth_reg_tab} {#template js_tmpl_auth_reg_descr} <strong>Пожалуйста, подтвердите ваш адрес.</strong><br><br>Вам отправлено письмо для подтверждения вашего адреса {$P.register_confirm_mail}.<br>Для подтверждения адреса перейдите по ссылке из этого письма. {#/template js_tmpl_auth_reg_descr} {#template js_tmpl_auth_reg_action} <div class="rg_forms confirm_code_from_letter"> <div class="rg_for_input"> <span class="rg_inp_descr" style="width:15em;">Или введите код из письма:</span> <input type="text" value="" id="confirm_code" name="" data-js_submit="yes" data-js_action="js_confirmFormBut" class="js_keydown_selector rg_input_text_conf" > </div> <div class="rg_for_input"><label>Не пришло письмо? <b>Пожалуйста, проверьте папку Спам</b><br /> (папку для нежелательной почты).</label><br /> <a href="" onclick="ajax_recall_code();return false" >Вышлите мне письмо еще раз!</a></div> <div class="rg_for_input"> <em class="reg_error" id="confirm_msg"></em> <a href="#" class="button button-red" id="js_confirmFormBut">Готово</a> <div class="loading loading-cover" style="display: none;"><div class="loader"></div></div> <br> </div> </div> {#/template js_tmpl_auth_reg_action}