Выбрать дату в календареВыбрать дату в календаре

Страницы: 1 2 След.
New vs CreateObject Windows 10
 
Добрый день!

У меня в коде присутствуют подобные объявления.
Код
Dim googleService As New MSXML2.XMLHTTP60
На Win10 это не работает и следует заменить на CreateObject, который в свою очередь не работает на той же Win7.
Подскажите, есть ли решение этой проблемы? или нужно каждый раз проверять версию windows?
Если нужно проверять версию, есть ли что-то типа Application.OperatingSystem, чтобы сразу выкидывало версию без текста?
Странное поведение геокодеров при вычислении координат из адреса
 
Добрый день!

Пример не прикрепляется, так как размер больше 100кб, скачать можно по ссылке https://yadi.sk/i/NrX1fxIM3R4TDi
Если в столбце А в полный адрес вставить какой-нибудь адрес и обновить формулы (F9), мы получим в столбце М координаты.
Когда я делаю это пачками, то проблемы начинаются уже после 10 адресов, причем поведение рандомное.
При каждом обновлении формул геокодер не находит разные координаты. В коде я уже делаю паузу потока в 140мс (судя по документации гугл можно отправлять каждые 120мс запрос, у яндекса примерно так же).

Подскажите пожалуйста, в чем может быть проблема?
Изменено: squadgazzz - 28.12.2017 17:15:33
Сортировка ячеек с данными "число-текст"
 
Добрый день!
Во вложении пример со статусами.
При сортировке от А до Я после "1 Готово" идет "10 Ещё какой-то статус", хотя нужно, чтобы после "1" шла "2".
На данный момент это исправлено только добавлением нулей перед первыми цифрами.
Возможно ли как-то настроить форматирование, чтобы скрыть нули или ещё что-то, чтобы сортировка работала ожидаемо?

Пробовал через СЦЕПИТЬ(число;текст), всё равно не работает
Изменено: squadgazzz - 22.11.2017 11:06:56
Как сократить данную формулу СУММЕСЛИМН?
 
Добрый день!

Подскажите, как сократить такую формулу?
По сути отличается только последнее условие в каждой из формул и это условие лежит в диапазоне G2:G8
Код
=СУММЕСЛИМН($E$2:$E$62;$F$2:$F$62;$H70;$D$2:$D$62;'выпад список'!$G$2)+
СУММЕСЛИМН($E$2:$E$62;$F$2:$F$62;$H70;$D$2:$D$62;'выпад список'!$G$3)+
СУММЕСЛИМН($E$2:$E$62;$F$2:$F$62;$H70;$D$2:$D$62;'выпад список'!$G$4)+
СУММЕСЛИМН($E$2:$E$62;$F$2:$F$62;$H70;$D$2:$D$62;'выпад список'!$G$5)+
СУММЕСЛИМН($E$2:$E$62;$F$2:$F$62;$H70;$D$2:$D$62;'выпад список'!$G$6)+
СУММЕСЛИМН($E$2:$E$62;$F$2:$F$62;$H70;$D$2:$D$62;'выпад список'!$G$7)+
СУММЕСЛИМН($E$2:$E$62;$F$2:$F$62;$H70;$D$2:$D$62;'выпад список'!$G$8)
Формирование XML из XLS, конвертер
 
Добрый день!

Необходимо реализовать макрос, который бы конвертировал данные из таблицы excel в код xml(это метки на карте).
Примеры во вложении.
Онлайн конвертеры не работают из-за специфического синтаксиса xml.(не гугл мапс)
Бюджет 800р

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

Пишите пожалуйста в личку
Бюджет 1000р.
Изменено: squadgazzz - 30.03.2017 12:32:25
Градиентная заливка всей таблицы, условное форматирование
 
Добрый день!
Подскажите, как с помощью УФ или как-то иначе залить всю таблицу градиентно на основании значений определенных столбцов.
Пример во вложении. нужно залить все ячейки в тот же цвет, который соответствует столбцу №.
Событие exit не выполняется после change, userform
 
Добрый день!

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

Была задача.
По-умолчанию у textbox3 значение "Номер". захожу в поле, значение меняется на пустое. что-то ввожу, ок.
если не ввел ничего и переключаюсь на дргое поле, то значение "номер" восстанавливается.
стоило мне добавить метод change для проверки ввода символов, так метод exit перестал выполнятся при выходе из textbox.
как решить проблему?
Формула суммы с фильтром
 
Добрый день!
Во вложении пример.
Необходимо в ячейку i2 написать такую формулу, которая бы считала сумму следующих статусов: выполняется, PR.
в реальной таблице статусов больше.

смотрел различные приемы и до конца не понимаю реализацию в данном случае.
Вертикальное выравнивание текста в TextBox в UserForm
 
Добрый день!

В UserForm есть TextBox. Возможно ли каким-то образом при инициализации формы или ещё как-то выравнивать текст в TextBox по вертикали?
Перемещение слоев УФ
 
Добрый день!

Во вложении пример. Excel 2013, неужели нельзя никак переместить слой УФ гистограммы за слой с формулой? чтобы в случае выполнения формулы, гистаграмма перекрывалась заливкой.
СЧЁТЕСЛИ несколько критериев И, не ИЛИ
 
Всем привет!
Во вложении пример. необходимо подсчитать кол-во ячеек, которые не содержать символы "-", "@", "x".
формула, которой пользуюсь работает как ИЛИ, то есть сначала считаются все ячейки первого условия плюс те, что выполняют второе условие и ещё плюс третье условие. А нужно кол-во ячеек в диапазоне, которое не содержит сразу 3 символа.
результат в данном случае должен равняться 3.
Найти в книге "рабочий" в столбце Док строки, в которых есть цифры из книги "источник"
 
Добрый день!

Не могу никак разобраться, как найти в книге "рабочий" в столбце Док строки, в которых есть цифры из книги "источник", столбец объект.
то есть: если в столбце Док(книга рабочий) содержится значение из столбца Объект(книга "источник"), то в каком-нибудь соседнем столбце поставить единицу, например, чтобы потом отфильтровать.
Изменено: squadgazzz - 29.07.2016 21:42:57
Поиск таблицы по имени
 
Добрый день!

В книге есть формулы такого вида:
Код
ВПР(B19;Списки2;3;0)
Как найти эту таблицу "Списки2" в книге? в книге очень много листов и разных таблиц, вручную не понимаю как её найти.
Поиск и сбор значений, срочно!
 
Всем привет!

Очень срочно нужно в одном файлике найти ячейки с определенными значениями и забить их в одну общую таблицу!
пишите в личку! очень срочно!!
Неверный формат TextBox
 
Добрый день!
Во вложении пример.
Ввожу данные в textbox, нажимаю на кнопку, данные заносятся в первую ячейку.
Замечен следующий баг: у некоторых пользователей если ввести цифры с клавиатуры, данные заносятся в непонятном формате, рядом с ячейкой выскакивает восклицательный знак с сообщением о необходимости форматирования значения в число. Это приводит к тому, что в сводные таблицы данные не вносятся или неверно суммируются с другими.

У себя добиться того же результата не удается почему-то, глюк только у определенных пользователей.
Пробовал уже и без Val, всё одно и то же.
Как закрепить UserForm на переднем плане
 
Добрый день!

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

во вложении пример.
хочется с помощью vba добиться эффекта нажатия на кнопку при клике по ней.
а именно: изменение параметра глубины фигуры и соответственно координат по оси Y.
это возможно через VB?
Возвращение логина пользователя, блокирующего файл
 
Добрый день!

В одной книге есть макрос на открытие другой книги excel в режиме редактирования. Файл не в общем доступе.
В случае, если файл кем-то заблокирован(уже открыт на редактирование), выскакивает сообщение о том, что файл заблокирован.

Как вернуть имя пользователя того, кто открыл этот файл на редактирование? Есть какая-то функция для этого?
Фильтр ввода данных в TextBox, есть нюансы
 
Добрый день!

Поискав по форуму, нашел несколько кодов на текстбокс в форме, которые позволяют фильтровать то, что вводишь. например:
Код
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) 
If (KeyAscii < 48 Or KeyAscii > 57) And (KeyAscii <> 44 And KeyAscii <> 46) Then KeyAscii = 0 
End Sub 
Но вопрос о другом.
данные вносятся в мой textbox не вручную, а копируются из других программ и соответственно хотелось бы сделать следующее:
пользователь вставляет скопированные данные в виде 100 000.03руб, а по факту вставляется строго вот так: 100000,03.
то есть, никаких проблелов и символов кроме запятых и цифр.

как это реализовать на форуме не нашел..
Изменено: squadgazzz - 25.04.2016 15:11:15
Создание небольшой системы учета расходов, excel+vba
 
Всем привет!
Во вложении простенькая табличка.
Название листа - это название организации.
Файлик будет лежать в общей папке на сервере.
Задача следующая, используя средства Excel и/или Visual Basic или ещё чего-то другого(возможно и HTML), нужно добиться следующего:
На рабочем столе пользователей будет ссылка на программу, открыв которую будет видно примерно следующее:
Небольшой график с 2 осями на основе сводной таблицы файла Excel и кнопочка с добавлением информации и редактированием.
Если нажать кнопку "добавить", то выходит окно ввода данных для занесения - PR, ЗР 1С, РО, сумма и так по всем столбцам.
Нажав ОК, данные вносятся в общий файл Excel, график обновляется.
Одновременно вносить информацию смогут несколько пользователей(около 15-20 человек).

Пишите пожалуйста сюда или на почту удалено
Скрыть панель задач и вообще всё, кроме самого excel, excel 2013
 
Добрый день!
Возможно ли как-то войти в полноэкранный режим excel, чтобы скрылась панель задач и вообще всё, кроме самого excel.

и параллельно второй вопрос.
Как скрыть ленту, но при этом оставить ТОЛЬКО панель быстрого доступа??




Макрос Application.DisplayFullScreen = True
не делает того, что нужно, а делает так же, как на последнем скрине
Изменено: squadgazzz - 12.09.2014 13:51:39 (приложил пример))
Изменение регистра ячейки с формулой
 
Добрый день!
Есть ячейка
Код
=ДАТА(ГОД(СЕГОДНЯ());МЕСЯЦ(СЕГОДНЯ());1) 
Как возможно изменить регистр на верхник?
если использовать "ПРОПИСН", то в других ячейках, в формулах которых используется ячейка выше - возникает ошибка.

как это можно сделать с помощью VBA? UCASE - это понятно, но как сам макрос выглядеть будет?
спасибо.
Заливка соседних ячеек по условию, VBA
 
Добрый день!
Помогите пожалуйста с написанием кода/формулы. разобраться не могу никак.

на листе произвольно закрашиваются ячейки, не вручную.
возможно ли как-то в модуле листа прописать формулу которая выполняла бы следующее:
если цвет какой-то ячейки изменился на, например, rgb(255;0;0), то закрашиваем тем же цветом 4 соседние справа ячейки.
только чтобы не получилось, что закрашиваться будет до бесконечности.
вот закрасилась ячейка G2 например и 4 справа тоже закрасились.
УФ тут видимо не поможет. нужен VBA.
Изменено: squadgazzz - 26.08.2014 21:14:01
Ищется специалист по powerpivot
 
Добрый день!
На основании нескольких таблиц на нескольких листах книги необходимо отображать некоторую информацию на карте с помощью powerpivot. office 2013
Пишите, пожалуйста,  за подробностями в личку или на почту.
Неудаляемое подчеркивание таблицы
 
Добрый день!
В примере таблица. последняя запись подчеркивается белой линией. как её убрать? я уже всё перепробовал.. ничего не помогает...
расскажите, что нужно сделать?
спасибо
Изменено: squadgazzz - 15.08.2014 13:49:34
Ежемесячное фиксирование значений ячеек
 
Добрый день!
файл сюда не помещается.
примерно так:
в документе около 10 листов, на каждом листе есть по одной ячейке, каждая в разных местах, можете перенести в любое удобное.
требуется следующее:
когда я захожу первый раз в текущем месяце в файл, в табличку будет записываться текущее значение каждой ячейки и так каждый месяц.
табличка должна быть примерно такая:
название компании/месяцкомпания1компания2
январь4,0      4,2
февраль3,05,0
и так далее..

пишите мне на почту пожалуйста с предложениями.
[ Закрыто] Помогите разобраться в коде, vba
 
Добрый день!
Вот файл(пароль squadgazzz)
На листе Диаграмма строится табличка в листе Кэш на основе других листов (sub collect), кнопка Обновить
Сейчас приходится добавить новый столбец между B и С. со всеми макросами я разобрался, а вот с sub collect никак не могу.
код писал не я. помогите разобраться, что нужно поменять в этом макросе, чтобы всё снова заработало?
файл с новым столбцом, пароль тот же.

спасибо!
Изменено: squadgazzz - 14.07.2014 10:57:54
Запись значений ежемесячно
 
            Добрый день!
Есть несколько листов, в которых есть по одной ячейке с циферками(например 5), эта циферка постоянно меняется.
так вот хотелось бы, чтобы каждый месяц показания этих цифр заносились в табличку и на её основе строилась диаграмма. ну диаграмму я сделаю, а вот табличку как организовать - не ясно.
Изменение названия листа по условию
 
Добрый день!
Возможно ли штатными средставми excel или vba по условию менять фон или текст названия листа?
Например, если ячейка А1="УРА", то название листа "Котроль" меняется на "Спокойно", либо фон становится зеленый?
Изменено: squadgazzz - 09.07.2014 18:39:00
Страницы: 1 2 След.
Наверх