Microsoft Excel FAQ (часть 3) - [66] :: Программы :: Компьютерный форум Ru.Board

Перейти из форума на сайт.

Новости • Файловые архивы
Поиск • Активные темы • Топ лист
Правила • Кто в on-line?

Вход • Забыли пароль? • Первый раз на этом сайте? • Регистрация

Компьютерный форум Ru.Board » Компьютеры » Программы » Microsoft Excel FAQ (часть 3)

Модерирует : gyra, Maz
Widok (29-08-2008 13:12): лимит страниц. продолжаем здесь	Версия для печати • Подписаться • Добавить в закладки
Страницы: 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 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101

Widok

Moderator-Следопыт

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

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

в обязательном порядке

Смена представления имен столбцов с буквенного на цифровое и обратно

Сумма прописью

~~Надстройки "Сумма прописью"~~

надстройка Excellerator (c) Michael Zemlanukha & Maxim Shemanarev

макрос Num2String

Список соответствия имен функций в английской и русской версиях Excel

Описание Microsoft Excel File Format (eng.)

Предыдущие ветки топика: Часть 1 | Часть 2

Все вопросы по программированию (макросы, скрипты, пользовательские функции и т.п.) обсуждаются в теме Excel VBA в разделе Прикладное программирование.

При необходимости выложить скриншот пользуйтесь сервисом ImageShack® (ограничение на размер файла <1.5 Mb)

Всего записей: 24190 | Зарегистр. 07-04-2002 | Отправлено: 19:48 17-05-2007 | Исправлено: Maz, 22:45 24-02-2017

abasov Member	Редактировать \| Профиль \| Сообщение \| ICQ \| Цитировать \| Сообщить модератору ZORRO2005 Вы мне очень помогли, спасибо огромное!
	Всего записей: 345 \| Зарегистр. 12-11-2002 \| Отправлено: 08:31 04-03-2008

ZORRO2005 Member	Редактировать \| Профиль \| Сообщение \| ICQ \| Цитировать \| Сообщить модератору gvserg1 http://slil.ru/25542821
	Всего записей: 342 \| Зарегистр. 08-10-2005 \| Отправлено: 11:07 04-03-2008

zboy Advanced Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору "Надстройки "Сумма прописью" из шапки не работает
	Всего записей: 1095 \| Зарегистр. 29-06-2002 \| Отправлено: 12:10 04-03-2008

lamut

Advanced Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Помогите пожалуйста.
Надо чтобы в ячейке A1 суммировались данные которые я ввожу в B1,то есть вводим в B1 10 в A1 появляется 10,если ещё раз ввести 10, то должно отобразиться в A1=20. Я ввожу в A1 формулу =СУММ(A$1:B1), у меня появляется предупреждение о циклической ссылке. Как быть, чтобы эта хрень суммировалась? Если согласно справке я устанавливаю флажок итерации, то суммируются вообще все ячейки в которые вводятся данные.

Всего записей: 646 | Зарегистр. 18-04-2007 | Отправлено: 14:47 04-03-2008 | Исправлено: lamut, 14:56 04-03-2008

Bredun Junior Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору lamut Сумма с накоплением
	Всего записей: 134 \| Зарегистр. 16-05-2007 \| Отправлено: 15:48 04-03-2008

lamut

Advanced Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Спасибо, вот только есть ещё ячеки D1:E1, надо чтобы накопительным итогом набиралось и в них и ещё в пару ячеек, на пример F1:G1 ? Короче как этот макрос доделать
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
With Target
If .Address(False, False) = "A1" Then
If IsNumeric(.Value) Then
Application.EnableEvents = False
Range("A2").Value = Range("A2").Value + .Value
Application.EnableEvents = True
End If
End If
End With
End Sub

Всего записей: 646 | Зарегистр. 18-04-2007 | Отправлено: 16:36 04-03-2008 | Исправлено: lamut, 16:47 04-03-2008

Bredun

Junior Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

lamut

Код:

Range("A2").Value = Range("A2").Value + .Value

вместо а2 - ваша ячейка.
Сколько ячеек надо - столько продублируйте.
Число
Цитата:

Target

возростет согласно количеству ячеек.

Всего записей: 134 | Зарегистр. 16-05-2007 | Отправлено: 16:50 04-03-2008 | Исправлено: Bredun, 16:53 04-03-2008

lamut Advanced Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору Не понял. Можно, пожалуйста по подробней. Добавлено: Всё, разобрался. Огромное спасибо
	Всего записей: 646 \| Зарегистр. 18-04-2007 \| Отправлено: 16:57 04-03-2008

Bredun

Junior Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

lamut

Код:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
With Target
If (.Address(False, False) = "B1") Or (.Address(False, False) = "D1") Or (.Address(False, False) = "F1") Then
If IsNumeric(.Value) Then
Application.EnableEvents = False
If .Address(False, False) = "B1" Then
Range("A1").Value = Range("A1").Value + .Value
ElseIf .Address(False, False) = "D1" Then
Range("C1").Value = Range("C1").Value + .Value
ElseIf .Address(False, False) = "F1" Then
Range("E1").Value = Range("E1").Value + .Value
End If
Application.EnableEvents = True
End If
End If
End With
End Sub

Вообще то надо бы это перекинуть на топик Excel VBA

Всего записей: 134 | Зарегистр. 16-05-2007 | Отправлено: 17:57 04-03-2008

SERGE_BLIZNUK

Silver Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

zboy

Цитата:

Надстройки "Сумма прописью" из шапки не работает

к сожалению, сейчас нет возможность подправить шапку.
Пока, как временное решение, для тех, кому надо перевести число из числового представления в прописное - цитата с дружественного форума:

http://www.planetaexcel.ru/forum_upload/post_1751.xls
http://www.softnew.ru/list.phtml?id=6854
http://rapidshare.com/files/63656566/num2string.rar
http://gb.by/node.phtml?index=4&id=&key=
http://www.allok.ru/?id=3
---
http://www.planetaexcel.ru/forum.php?thread_id=535
http://www.planetaexcel.ru/forum.php?thread_id=2530

Bredun

Цитата:

Вообще то надо бы это перекинуть на топик Excel VBA

ну, строго говоря - ДА. Вам надо было бы ответить там и дать тут ссылку на своё сообщение-ответ...
Но чего уже теперь... Два и вообще , два этих топика (excel FAQ и Excel VBA вообще ОЧЕНЬ тесно связаны - на моей памяти есть случаи, когда обсуждение одной проблемы переходило из одного топика в другой и возращалось обратно ;-))
Так что - не расстраивайтесь... ;-)

Всего записей: 2014 | Зарегистр. 12-09-2002 | Отправлено: 19:51 04-03-2008

D2men

Newbie

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Помогите...

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

Общее количевство имен и соответсвующие им картинки определены заранее, но вот в форме вывода все будет постоянно меняться //

Всего записей: 8 | Зарегистр. 04-03-2008 | Отправлено: 23:36 04-03-2008 | Исправлено: D2men, 23:53 04-03-2008

ZORRO2005

Member

Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору

D2men
Для небольшого количества картинок посмотрите здесь:
http://www.planetaexcel.ru/tip.php?aid=57
Но если
Цитата:

количевство имен может быть и сто и тысяча

думаю это задача не для Excel.

Всего записей: 342 | Зарегистр. 08-10-2005 | Отправлено: 01:55 05-03-2008 | Исправлено: ZORRO2005, 02:01 05-03-2008

D2men Newbie	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору мЭрся Буду пробовать на работе седня ))
	Всего записей: 8 \| Зарегистр. 04-03-2008 \| Отправлено: 09:12 05-03-2008

Mint86

Junior Member

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

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

Всего записей: 166 | Зарегистр. 25-06-2007 | Отправлено: 09:24 05-03-2008

SergD1973

Newbie

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Подкажите пожалуйста, каким образом можно сделать так, чтобы при нажатии комбинации клавиш запускался нужный мне макрос?
Знаю, что на макросы стандартными функцимя можно назначить комбинацию Ctrl+буква. Но увы нельзя назначить даже цифру,и уж тем более комбинации с Shift или Alt. А очень НУЖНО.
Заранее спасибо за ответ.

Всего записей: 17 | Зарегистр. 20-02-2007 | Отправлено: 22:50 05-03-2008

D2men

Newbie

Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

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

Мож есть еще метод динамической замены картинок?..

Всего записей: 8 | Зарегистр. 04-03-2008 | Отправлено: 00:37 06-03-2008 | Исправлено: D2men, 09:09 06-03-2008

D2men Newbie	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору так что, действительно никак?..
	Всего записей: 8 \| Зарегистр. 04-03-2008 \| Отправлено: 09:11 06-03-2008

ww1ww Junior Member	Редактировать \| Профиль \| Сообщение \| ICQ \| Цитировать \| Сообщить модератору 1
	Всего записей: 148 \| Зарегистр. 12-10-2007 \| Отправлено: 10:36 06-03-2008

aleksrom Newbie	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору Есть ли формула, которая прокрашивает строки от цифрового значения, заданного в столбце (не повреждая данные в других столбцах или строках)?
	Всего записей: 7 \| Зарегистр. 06-03-2008 \| Отправлено: 18:37 06-03-2008

Vitus_Bering Advanced Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору aleksrom Условное форматирование
	Всего записей: 936 \| Зарегистр. 30-09-2005 \| Отправлено: 20:31 06-03-2008

Страницы: 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 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101

Компьютерный форум Ru.Board » Компьютеры » Программы » Microsoft Excel FAQ (часть 3)
Widok (29-08-2008 13:12): лимит страниц. продолжаем здесь

Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC