ymy YourMyYour Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Просьба к посетителям топика дополнять шапку наиболее часто задаваемыми вопросами со ссылками на ответы в обязательном порядке   Смена представления имен столбцов с буквенного на цифровое и обратно Надстройки "Сумма прописью"   Тема Excel VBA в разделе Прикладное программирование     Вот такой вопрос у меня, помогите хто может: Как в Exсel-e ограничить число строк и колонок отображаемых на листе, точно можно, сам видел, но как?, в непонятках. Всего записей: 1339 | Зарегистр. 22-04-2002 | Отправлено: 17:00 17-09-2002 | Исправлено: Maz, 22:44 24-02-2017

German AW Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору А кто подскажет: недавно заметил, что у меня в экселе 2003 колонки то цифрами пронумерованы, а то латинскими буквами! Никакой системы не вижу!... Это что, менять можно?.. Всего записей: 1947 | Зарегистр. 23-10-2003 | Отправлено: 20:42 05-01-2006

Mushroomer Platinum Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору German AW Было уже много раз: Сервис -> Параметры -> Общие -> Стиль ссылок R1C1 -> галку снять. Всего записей: 22840 | Зарегистр. 19-01-2002 | Отправлено: 20:51 05-01-2006

Zerguei Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Подскажите пож-та по следующем вопросу: В свое время я был озадачен вот чем: Цитата:   Автор: Zerguei, Отправлено:17:02 09-03-2005 Помогите пож-та решить вот такую задачу: у меня есть файл с большим кол-вом листов. На каждом листе столбец С - это данные по позициям в других столбцах. Эти данные - либо числа, либо буквенные обозначения. Вперемешку вобщем. Так вот - задача все численные значения увеличить на, например, 12%, а буквенные значения не трогать. Какой функцией воспользоваться чтобы это сделать и как ее прописать?     Спасибо, Zerguei     в итоге было найдено следующее решение:   Цитата:   Sub procent12()   For Each S In ActiveWorkbook.Worksheets S.Activate For Each R In ActiveSheet.UsedRange.Rows If IsNumeric(Cells(R.Row, 3)) Then Cells(R.Row, 3) = Cells(R.Row, 3) * 1.12 End If Next R Next S End Sub       все отлично работало в англоязычном Office XP, но сейчас установили Office 2003, причем русскоязычный и данный макрос отказывается работать, мотивируя это следующим сообщением:   Цитата:   Compile error:   Invalid Outside Procedure     В чем дело??? Всего записей: 640 | Зарегистр. 07-05-2003 | Отправлено: 13:42 09-01-2006 | Исправлено: Zerguei, 13:43 09-01-2006

Mushroomer Platinum Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Zerguei Зачем так сложно?  =ЕСЛИ(Т(A6)="";A6*1,12;A6) подойдет? Всего записей: 22840 | Зарегистр. 19-01-2002 | Отправлено: 14:09 09-01-2006

Zerguei Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Mushroomer В принципе да - очень просто, я этого не знал. Поскольку действие разворачивается на 50 листах, а столбцы одни и те-же (в моем случае №3) можно все сделать одновременно на всех листах, выделив их и вставив столбец с формулами на одном.. А потом таким же образом скопровать столбец с готовыми цифрами и вставить его в исходник, предварительно сохранив все в виде значений, а не формул. Спасибо, упростил все донельзя -)   Но все же макрос все делал в тех же столбцах, мне исходники то не нужны потом.     Всего записей: 640 | Зарегистр. 07-05-2003 | Отправлено: 14:21 09-01-2006

Mushroomer Platinum Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Zerguei Я в макросах ничего не смыслю. Подожди, может кто-то ответит. Здесь есть отличные специалисты по макросам. Всего записей: 22840 | Зарегистр. 19-01-2002 | Отправлено: 14:33 09-01-2006

Zerguei Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Mushroomer в том то и дело, что я тоже ничего в них не смыслю.. Но твой вариант очень хорош - не поверишь, но я уже все сделал, так что вопрос снят -)))   Спасибо огромное -) Всего записей: 640 | Зарегистр. 07-05-2003 | Отправлено: 14:37 09-01-2006

Yuk Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Zerguei Можно еще проще, без формул и дополнительных ячеек. Ввести 1.12 в отдельную ячейку где угодно, скопировать в буфер. Затем выделить область, специальная вставка, умножить. Обрати внимание, пустые ячейки будут содержать 0. Всего записей: 1182 | Зарегистр. 02-07-2001 | Отправлено: 18:47 09-01-2006

Zerguei Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Yuk Это слишком просто - это я знаю -)) Только ячейки, которые не содержат 0, а содержат буквенные значения будут отображаться диезами -) Всего записей: 640 | Зарегистр. 07-05-2003 | Отправлено: 18:53 09-01-2006

Yuk Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Zerguei У меня макрос работает, Офис 2003 СП1 английский. Русского нет, так что протестировать не могу. Проверь функцию IsNumeric в русском офисе.   Добавлено: Zerguei Цитата: Только ячейки, которые не содержат 0, а содержат буквенные значения будут отображаться диезами Ну, не знаю. Я проверил, буквенный ячейки игнорируются. Очередная "фича" русского офиса? Всего записей: 1182 | Зарегистр. 02-07-2001 | Отправлено: 19:01 09-01-2006

rosalin Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Уважаемые All подскажите такой трабл     Excel 2003 sp2   При редактировании листа не видно заливки ячеек но на предосмотре все видно..   Помогите плиз горю... ---------- Всего записей: 2588 | Зарегистр. 15-04-2003 | Отправлено: 17:12 10-01-2006

jrd32 Newbie Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Помагите!   Надо написатьscript каторый будет запускать через кнопку в EXEL текстовый документ, каторый в себе содержит = допустем:   00.   01.qwertyuiopasdfghEXEL00jklzxcvbnm   02.qwertyuiopasdfghEXEL01jklzxcvbnm   03.qwertyuiopasdfghEXEL02jklzxcvbnm   04.   05.qwertyuiopasdfghEXEL03jklzxcvbnm   06.qwertyuiopasdfghEXEL04jklzxcvbnm   07.qwertyuiopasdfghEXEL05jklzxcvbnm   08.   09.   10.   11.qwertyuiopasdfghEXEL06jklzxcvbnm   12.qwertyuiopasdfghEXEL07jklzxcvbnm   13.qwertyuiopasdfghEXEL08jklzxcvbnm   14.qwertyuiopasdfghEXEL09jklzxcvbnm   15.qwertyuiopasdfghEXEL10jklzxcvbnm   16.qwertyuiopasdfghEXEL11jklzxcvbnm     Вот это всё надо через VB - од страки 19 до 25 "EXEL00" ввести в лист (list1) exel под сабои так чтоб небыли пустые пространства как строки 00. ;08.; итд.....   вот так: EXEL00 EXEL01 EXEL02 EXEL03 EXEL04 EXEL05 EXEL06 EXEL07 EXEL08 EXEL09 EXEL10 EXEL11 (на каждую строку) Потом кокда выйдет токая строница (лист1) с такими данными то надо из этого сделать Диограму в 2D.   Спасибо за рание. Всего записей: 7 | Зарегистр. 22-12-2005 | Отправлено: 08:40 12-01-2006

BBBri Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору jrd32 Юмор в другом топике Всего записей: 56 | Зарегистр. 29-10-2002 | Отправлено: 12:50 12-01-2006

andj25 Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору у меня такой вопрос   есть ряд ячеек которые считаются так   А3=константа В3=В1 + В2 + А3 С3=С1+ С2 + В3 .... и так далее   ну вот мене нужно что бы результат в ячеке В3, С3 ... попадал в заданный инетрвал к примеру от 20000 до 20999 приэтом изменяя ячеку В2, С2 ... соответственно (необходимо также условие что бы В2 было округлено на -3 знака, т.е. было бы к примеру 1000, 33000, 444000 и так далее)     хотелосьбы все это автоматизировать ... простыми ссылками получается зацикливание ячеек друг на друге   может есть какая то формула?   функцию подбор параментра не предлагать смысла нет ... хотя если как то ее автоматизировать ... наверно можно и ее заюзать Всего записей: 141 | Зарегистр. 14-12-2005 | Отправлено: 15:59 12-01-2006 | Исправлено: andj25, 16:07 12-01-2006

Mushroomer Platinum Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору andj25 Формулы понятно как у тебя устроены. А вот дальше непонятно, что ты хочешь. Результат хотя бы в ячейке B3 зависит от В1, В2, А3. Т.е. если ты хочешь, чтобы он попадал в какой-то диапазон, то надо же как-то значения В1, В2, А3 подбирать специально. или ты хочешь чтобы Excel сам за тебя подобрал все значения? У тебя только значение B2 должно быть с 3 нулями? Всего записей: 22840 | Зарегистр. 19-01-2002 | Отправлено: 19:59 12-01-2006

andj25 Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору в строку 1 (то есть ячеки В1, С1 ...) значения попадают из других мест то есть они не завязаны на остальные указанные в формуле значения   то есть мне надо что бы 1 только значение подбиралось экселем   ну например   А3=345 В1=560023 С1=73947 В3=345+560023+(??)    _(1)_ С3=В3+73947+(??)       _(2)_ ....   ну вот .. получается что мне нужно сначала найти в (1) формуле значения, потом во (2) ... и так далее Всего записей: 141 | Зарегистр. 14-12-2005 | Отправлено: 08:03 13-01-2006

Looking Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору andj25 А в курсе, что Excel позволяет проводить итерационные вычисления? Для этого в "Сервис", "Параметры", "Вычисления" надо поставить "Птичку" и соответствующие значения. Например есть уравнение X=3/(1+2*SIN(X)) Численное решение (путем программирования, а не Excel) это решается следующим итерационным процессом. 1. Задается начальное значение X, например X=1. 2. Подставляется в правую часть и вычисляется.     Получаем X=1,1181755... 3. Полученное значение подставляем в правую часть и получаем новое значение     X=1,071961455... 4. Продолжаем процесс     X=1,088423086... При этом контролируем разницу между предыдущим и последующим значением X Процесс может быть сходящимся - когда разница уменьшается и расходящимся - увеличивается (подробности смотри в численных методах). При сходящемся процессе в результате получим значение X с требуемой точностью. Дополнительно контролируется число итераций, что-бы не получить бесконечный цикл.   В Excel данный пример реализуется записью в ячейке С2 формулы =3/(1+2*SIN(B2)), а в ячейке B2 формулы =C2. Имеем циклическую сылку и итерацию (нужно разрешить ее в настройках). Получаем результат X=1,083959... при границе итераций 1000 и точности 0.00001 Всего записей: 1814 | Зарегистр. 02-06-2004 | Отправлено: 11:12 13-01-2006

andj25 Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору ну вот смотрите так я сделал формулы         поставил число итераций 1   результат         а мне то нужно что бы в ячейке В5 было число от 20000 до 20999   ... мне что ли с числом итераций играться? .... тогда опять как то не очень удобно Всего записей: 141 | Зарегистр. 14-12-2005 | Отправлено: 11:59 13-01-2006

Looking Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Число итераций должно быть большим, достаточным для достижения требуемой точности, если процесс сходящийся. При сходящемся процессе увеличении числа итераций точность вычислений должна увеличиваться (в случае, если заданная погрешность еще не достигнута). Сейчас нет времени разбираться с твоим конкретным примером. Попробуй сам, если не получится, позднее посмотрю, что у тебя и как Всего записей: 1814 | Зарегистр. 02-06-2004 | Отправлено: 12:36 13-01-2006

Страницы: 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

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

Widok (01-04-2006 15:33): лимит страниц. переезжаем сюда.

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование