Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Выбрать дату в календареВыбрать дату в календаре

Страницы: 1 2 3 След.
Пропал сайт
 
был хороший сайт, я им иногда как справочником пользовался (Excel, VBA, FSO, WinAPI и много чего другого):
http://msoffice.nm.ru

сейчас нету.  :(
кто знает - может, переехал куда?
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
VBA. Как игнорировать формат ячеек при копировании диапазона в массив?
 
привет всем.

столкнулся неожиданно.
простой код (в приложенном файле)
Код
Sub test()
  Dim arr()
  With ActiveSheet
    arr = .[a1:a3].Value
    arr = .[b1:b2].Value
    arr = .[b1:b3].Value
  End With
End Sub

третье присвоение приводит к ошибке времени выполнения Run-time error 6 (Overflow)
причина простая: в одной из ячеек (точнее - в B3) с большим числовым значением ошибочно установлен числовой формат Дата
в A1:A3 точно такие же значения, но формат Общий. обрабатываются без проблем.

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

дубль темы: http://www.excelworld.ru/forum/10-18614-1
Изменено: ikki - 1 Авг 2015 07:47:18
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
Кнопка "Цвет текста" недоступна при редактировании примечания
 
привет всем.

проблема в сабже.
хочу изменить цвет части текста в примечании. кнопки (на ленте, на ПБД) недоступны.
хотя другие кнопки форматирования шрифта (название, размер, полужирный и т.п.) - пожалуйста.
можно испугаться и решить, что цвет текст в примечании вообще менять нельзя?
однако это не так: выделил фрагмент - ПКМ - Формат примечания... - открывается диалог - меняй на здоровье.

два момента, ибо сегодня устал уже по менюшкам-диаложкам ползать:
1) мне кажется, что в 2003-м в описанном контексте проблемная кнопочка была таки доступна... или я ошибаюсь?
2) может, с моим экземпляром экселя что-нибудь не так? или в него отверткой куда-нибудь ткнуть? тогда - куда именно?
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
VBA. Автофигуры. Ошибка Run-time error 80070057
 
привет всем. нарисовалась проблема. прошу подсказать.

есть файлик.
в файлике на событие листа SelectionChange задан обработчик
с вполне безобидным кодом.
Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  ' что-то еще...
  If ActiveCell.Column - Me.[a7].Value >= 0 And ActiveCell.Column - Me.[a7].Value <= 17 Then
    wsInv.Shapes("here").Visible = True
    wsInv.Shapes("here").Left = ActiveCell.Left + (ActiveCell.Width - wsInv.Shapes("here").Width) / 2 ' проблема!!! 
  Else
    wsInv.Shapes("here").Visible = False
  End If
End Sub


проблема: на одном из компьютеров заказчика этот код в строке с комментарием вываливается в странную ошибку
Run-time error '-2147024909 (80070057)':
Указанное значение выходит за допустимые пределы


подробности:
на компьютере, на котором это возникает - Excel 2013.
впрочем, на остальных компьютерах заказчика - то же самое.
у меня - Excel 2010.

wsInv - кодовое имя активного листа.
объект (автофигура) с именем "here" на этом листе существует.
впрочем - иначе ошибка возникала бы в предыдущей строке и была бы более внятной.

все значения всех свойств в правой части (после =) - корректные.
вычисленный результат всего выражения - тоже корректный.
не отрицательный. не слишком большой и т.п.
проверено в отладчике, в окне Watches.

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

из-за чего это может быть и как с этим бороться?
пс. офис и винду на проблемном компьютере пока не переустанавливали - хочется обойтись малой кровью.
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
Корректное сравнение вещественных чисел (VBA)
 
доброго времени суток всем.
наверное, я совсем заработался, не могу сейчас сообразить.
прошу помочь разобраться.

суть проблемы: известно, что вычисления с вещественными числами выполняются не абсолютно точно из-за особенностей машинной арифметики.
поэтому, к примеру, результат, на самом деле равный 5-ти, может быть представлен как 5.00000000000000, 5.00000000000001 или 4.99999999999998 - в зависимости от того, как он был получен.
мне нужно производить сравнения таких чисел, но корректно, т.е. с учетом этих самых особенностей.

на равенство проверяю так:
Код
const eps=0.0000001
if abs(a-b) < eps then ' равны


а как проверить на больше-меньше?
я додумался до такого:
Код
const eps=0.0000001
if a-b > -eps then ' a больше b
if a-b < eps then ' a меньше b


но сомневаюсь.

а с нестрогими условиями (>= и <=) совсем запутался :(

хелпми.
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
большие цифры
 
Цитата
Hello ikki,

As most of you might be aware a massive earthquake struck Nepal and North-East India on Saturday. the 25th of April, 2015. The Earthquake measured 7.8 on the Richter scale, causing immense damage.

The epicenter of the Quake, was a densely populated area near Kathmandu, and the impact extended into northern India.

More than 5,000 people are confirmed dead. More than 9,200 are gravely injured. Over eight million people are affected across Nepal and One million children are in urgent need of help. These are staggering numbers. Hope is what the survivors are existing on. We can help them with the rest.

Excel Forum is a community of almost 1 MILLION members! We can make a difference. So lets get together and help the injured. Nepal needs us. NOW.

People around the world are helping by donating actively. If you haven't done so already, you can rush to the aid of the survivors by Donating NOW..

Lets help Nepal together!

Team Excel Forum
нас почти миллион, но, наверное, последней сволочью, не желающей помочь непальцам, я окажусь один.
вот что значат большие цифры - начинаешь чувствовать себя крайне неуютно - песчинкой, затерянной в пространстве.
пытаюсь представить - вот бы если бы хотя бы каждый десятый да скинулся бы хотя бы по одному бы баксу...
наверное, мне бы хватило на лечение глаз, пострадавших на ниве неустанного экселекопания.
ещё бы и на пиво осталось.
становится таки легче, хотя по-прежнему совестно перед непальцами.

полезная всё-таки штука - большие цифры...

пс. я это, собственно, к чему - если вдруг кто хотел помочь, но не не знал, куда обратиться, ибо не является счастливым подписчиком миллионного форума - пишите. дам координаты.
Изменено: ikki - 1 Май 2015 05:29:50
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
Условное форматирование в "умных" таблицах с включенными фильтрами
 
Всем привет. Бью челом формулистам.

Судьба столкнула меня с "умными" таблицами (как я ни сопротивлялся) и вдобавок ещё и проблемку подкинула.
В приложенном файле - таблица с применёнными правилами УФ для скрытия "повторов" в столбце "магазин".
В общем-то - работает, если не менять стиль.
При смене стиля - нужно менять цвет шрифта в УФ.
Но вопрос не в этом.

Проблема в том, что автоматическая "зебра" зависит от фильтра. Что, конечно, очень хорошо визуально.
Но формулы "едут". И оформление страдает. Тяжко.
Если в приложенном файле, например, отфильтровать столбец "продукт" по значению "молоко" - получается крайне некузяво.
Как это можно решить?
Подозреваю, что с помощью ПРОМЕЖУТОЧНЫЕ.ИТОГИ, но у меня не получилось.
Кроме того - подозреваю, что и в последнем столбце нужно использовать ПРОМЕЖУТОЧНЫЕ.ИТОГИ
Но, опять же - как именно?

пс. у меня Excel 2010 ru, но нужно, чтобы и в 2007-м работало.
Изменено: ikki - 12 Фев 2015 11:18:04 (добавка про 2007-й Excel)
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
где ёлочки?
 
Серж повесил ёлочную веточку.
на кибере уже несколько дней как мигает в уголочке...
а на остальных форумах - вроде как и не праздник.
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
VBA. Активация скрытого листа
 
всем привет. спешу поделиться
тут у меня случилась эврика.
совершенно на ровном месте.
и теперь я в непонятках - то ли в патентное бюро бежать, то ли молчать в тряпочку, чтоб глупость не так видно было.

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

в приложении - файлик с кодом.
на листах 1, 2, 3 в ячейках A1 - соответственно значения 1, 2 и 3.
лист 3 скрыт.
код, имхо, отрабатывает неадекватно - по сути, активирует скрытый лист.

но есть ещё более интересный момент.
аналогичный код
Код
sheets(2).activate:sheets(3).activate:? [a1]
выполняемый в окне Immediate именно в таком виде - даёт 3.
а вот записанный в две строчки:
Код
sheets(2).activate:sheets(3).activate
? [a1]
и выполненный построчно - даёт так ожидаемую мною двойку.

претензий к майкрософту у меня, конечно, нет.
но я так и не понял - это баг или фича?
кто знает?
Изменено: ikki - 25 Дек 2014 03:05:49
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
LibreOffice
 
господа экселисты :)
не сочтите за моветон.
но судьба меня хочет столкнуть с сабжем.
и я волнуюсь.
насколько дико он отличен от любимого Экселя?
так ли страшен чёрт?

у кого что есть сказать по существу?
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
Макросы и прикладное ПО, Макрос, как программа на одной ножке - что это значит?
 
Цитата
Мотя пишет: макрос - это "программа на 1-ой ножке": для корректной работы должны соблюдаться все условия, которые макрос "оговаривает".
Мотя, не сочтите за придирки - но Вы знаете другие программы? которые при несоблюдении "всех условий" работают корректно?
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
Не обновляется фильтр сводной, печалька (
 
доброго времени суток всем.
редко пользуюсь сводными, а сейчас понадобилось решить один вопрос.
в приложенном файле по исходным данным (табличка слева) построена сводная (на этом же листе справа)
после этого я обнаруживаю опечатку в исх.данных.
исправляю "Алег" на "Олег" (яч. A6)
на сводной - ПКМ, Обновить
сама сводная - замечательно обновляется.
а вот в выпадающем списке для строк (яч. D1) как был в списке "Алег", так и остался.
хотя в исх.данных таких значений уже нет.

что делать? как быть?
решение интересует как стандартными средствами (через интерфейс), так и на VBA.
желательно - не создавая сводную заново. такой вариант - в последнюю очередь.
Excel 2010
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
Не удается очистить буфер обмена
 
Мне оч.стыдно - я почти уверен, что тема такая была, и решение было.
Но поиск результатов не дал.

А бесит жутко
суть: я привык копировать ячейки/диапазоны с помощью мышки с зажатой клавишей Ctrl
недавно установленный Excel 2010 (вдобавок к тому на недавно установленной Win 7) такой способ никак не хочет переваривать и каждый (!) раз после завершения (успешного) такого копирования вываливает сообщение "Не удается очистить буфер обмена. Возможно, буфер обмена используется другим приложением."
то же самое - при копировании мышкой по ПКМ с выбором "копировать" из контекстного меню.
то же самое - при перемещении (и по ЛКМ, и по ПКМ)

кнопки и горячие клавиши такого эффекта не дают.
в других приложениях (в т.ч. Word) - тоже всё нормально. при любом способе.

внимание, вопрос! кому набить за это морду что делать-то, а?
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
Excel 2010. Настройка мини-панели инструментов
 
собственно сабж.
можно ли настроить и, если да, то как?
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
xlCompiler, кто смелый? )
 
"сбылась мечта идиота" (с)
свершилось!

то, о чем так долго говорили большевики мечтали многие посетители форума (и не только этого), периодически задаваясь вопросом "как сделать экзешник из VBA".

прошу любить и жаловать: xlCompiler
абсолютно бесплатно, то есть даром.

вопрос, собственно, один: кто смелый поюзать этого зверя? :)
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
IE 11
 
кто работает в этом чуде - последнем достижении программерских технологий?
как его закрыть нафиг, не закрывая открытых вкладок?
то есть чтобы я открыл в следующий раз - а все нужные вкладки уже открыты.
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
Марианская впадина перевернулась
 
началось отсюда.

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

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

имхо, у Заказчика должно быть право выбора Исполнителя.
а ложная скромность и "корпоративность" старожилов, когда после первой отписки больше никто и не пишет, и не предлагет - только во вред.
и Заказчику, и Исполнителям.
ибо перебиваются такие заказы залётными новичками влёгкую.
а местные "зубры" сидят и курят бамбук.
Изменено: ikki - 13 Июл 2014 16:45:16
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
Как визуально отобразить на листе все именованные диапазоны
 
случайно наткнулся на одном сайте:
Цитата
10. How to View All Named Ranges in Sheet?
Set zoom level of less than 40%, You can view all the named ranges.
не поверил.
проверил - таки да! от 39% и меньше.

внимание - вопрос(ы):
1) кто знал о такой возможности и не предупредил?!
2) как это отключить к чёртовой бабушке?
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
Обёртка для RegExp и сабматчи
 
я запутался.  :(  

суть:
надоело мне писать "многабукаф" при работе с регулярками.
склероз, опять же (иногда я пытаюсь создать объект "scripting.regexp" и не могу понять, за что меня обругали)
сподобился на класс-обёртку.

из плюсов:
- синтаксис покороче,
- задание свойств в шаблоне (а ля Perl),
- получение результатов в более удобном виде (массив/строка);
- потакание лени и склерозу.

простенький пример в приложенном файлике.

основной вопрос - как мне теперь использовать этот класс в других проектах, не копируя модуль класса в них?
пробую так: присвоил проекту уникальное имя (vbpRE)
в Tools - References нового проекта указываю ссылку на vbpRE
в новом проекте создал стандартный модуль - копию Module1 из приложенного примера.

ругается. здесь:
Код
Dim x As New re
User-defined type not defined
пробую объявлять переменную с явным указанием проекта:
Код
Dim x As New vbpRE.re
всё одно ругается.
чяднт?

попутный вопрос: кто-нибудь знает простой способ получить для каждого сабматча значения начальной позиции в исходной строке и длины? ну, в принципе, длину необязательно (сабматчи-то у нас будут).
Изменено: ктулху - 22 Июн 2014 10:44:08
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
ребрендинг, странности лс
 
хех...
я тут недавно ребрендинг произвёл...
а сегодня столкнулся со следующим:
в почте (не лс) есть письмо о получении лс на форуме (почту-то не менял).
захожу под новым брендом на форум - нет новых лс!
то есть совсем нет - ни прочитанных, ни непрочитанных.
такое ощущение, что движок форума мой ребрендинг тихо саботирует.

за что он так, а?
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
Скорость работы UPDATE в ADO
 
и снова о любимой мозоли... :)

есть файл t.xls с одним листом tn - таблица с заголовками (7 столбцов)
есть другой файл с листом mmm и таблицей из трёх столбцов

нужно изменить данные в первом файле на основе данных второго файла
в первом файле 29364 записи
во втором 216

делаю так:
только не смейтесь...


выполняется всё это из второго файла при закрытом первом
на не слишком тормозном ноуте "2 ядра - 3 гига" :) мой Excel 2003 отрабатывает вторую процедуру за 14,5сек., первую - примерно за 4,2сек.

кроме обычных "что делать?" и "кто виноват?" закрадывается сомнение - а нет ли другого варианта для апдейта, чтоб жужжало побыстрее? само собой - через ADO и SQL, а иначе неинтересно (точнее - иначе оно мне не надо)

примеры файлов не прикладываю.
вообще не знаю, что с ними делать... :(
заархивированный первый весит чуть больше 400 килобайт.
а на маленьком объеме и вопроса не будет.
но, может быть, профи и без примера подскажут чего?..

(желающим могу выслать файлики на мейл - ничего секретного там нет)
Изменено: ikki - 13 Апр 2014 11:16:23
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
никуда не спрятаться от контекста?
 
добрый день.
сразу скажу - я чел в инет-технологиях не шибко продвинутый.
темнота, короче.

может, кто подскажет?
суть дела - дёрнул меня чёрт недавно тут, на планете, щёлкнуть по ссылке ТС-а и попасть на сайт долбаных воздухоотводов и прочей вентиляции  :|
ещё два-три щелчка по страничкам сайта - и всё!!!
второй день (или уже третий? этот кошмар бесконечен!!!) на КАЖДОМ сайте, где есть реклама, мне со всех сторон предлагают приобрести, установить, сделать монтаж и что-то там ещё этих дол-ба-ных воздухоотводов. оцинкованых, прямоугольных и даже спиральных к чёртовой бабушке.
:o

чё делать? куда жмакнуть? где снять галку?
помогите!!! хелп!!!
погибнет ноут ато (удар об стенку он вряд ли переживет...)
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
Глас Народа
 
помнится, была на старой планете такая (полу)шутливая тема...

итак, номер 1
Nic70y,
Цитата
Машака пишет: просто гений и человечище!
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
Office Recent Files, привет от Джона Уокенбаха :)
 
собственно сабж
http://j-walk.com/orf/
может, кому пригодится такая приблуда  :D

ps в полевых условиях не испытана - WinXP + Office 2003, однако :(
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
навигация по форуму
 
сейчас заметил - если, находясь на второй странице темы - например, здесь: http://www.planetaexcel.ru/forum/index.php?PAGE_NAME=read&FID=1&TID=51328&PAGEN_1=2 - нажать ссылку Вопросы по Microsoft Excel наверху, то попадаешь не на первую страницу со списком тем, а на предпоследнюю.
на текущий момент - 196-ю.
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
Office Tab, кто-нибудь пользуется?
 
собственно, сабж.
если кто пользуется или пользовался - просьба поделиться впечатлениями.

об чём базар
Изменено: ikki - 24 Авг 2013 18:27:55
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
Приёмы
 
доброго всем времени суток ;)

господа, мне кажется или на самом деле ссылок из тем форума на статьи в разделе "Приёмы" на новой планете стало в разы меньше, чем на старой?

имхо, новый вариант разбиения статей на категории, да и сами статьи (переработанные и объединенные) - менее понятны и удобны :(
или это таки нездоровый консерватизм во мне взыграл?

кто что думает?
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
ячейки с зада :), и такое бывает
 
вещдок:
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
SQL в Excel. Инструкция DELETE
 
добрый день всем.
ну вот пришла и моя очередь задавать глупые вопросы.

пытаюсь решить "классическую" задачу удаления из одного списка значений, встречающихся в другом.
"хитрым" способом.
менее хитрые - просьба не предлагать.  :)

в приложенном файле Excel - 2 листа и неработающий макрос.
выдаёт ошибку "Невозможно удаление записей из указанных таблиц"

в файле Access - аналогичные таблички и аналогичный запрос.
работающий.

товарищи, дорогие, в чем разница??!  :oops:  
что делать дальше и кто виноват?

"за раннее спасибо", "мозг уже кипит", "спасите-помогите" ну и всё остальное, что положено - искренне прилагаю :D
Изменено: ikki - 17 Мар 2013 16:08:41
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
sql.ru
 
кто знает - когда закончится переезд?
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
Страницы: 1 2 3 След.
Наверх