Спасибо всем за помощь

to gling, файл могу выложить, но не вижу смысла нагружать форум, все значения (начало, конец, период) в своих ячейках т.е. три ячейки. Значения должны в конечном счете оказаться в массиве, но можно и промежуточный вывод на лист в разные ячейки

Добрый день, прошу совета в таком вопросе. Есть временной промежуток заданный в виде 100000 235000, что 10:00 и 23:50 соответственно, причем задам строковыми переменными (экспорт в эксель из другой программы, но с переводом строки в число проблем нет). Есть временной период заданный в минутах, например 30 (5, 15 и т.п.) Как поделить промежуток времени на периоды и записать эти периоды в виде 103000, 110000, 113000 и т.д. Заранее благодарен.

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

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

Добрый день, помогите решить такую проблему
При работе средствами VBA создается файл xlsx, затем этот файл либо удаляется, либо сохраняется. При первом сохранении вылетает окно проводника с указанием на папку Документы. Вопрос, можно ли сделать так, чтобы при первом сохранении проводник открывался на папке по известному адресу (путь к файлу из которого был запущен макрос на создание книги). Менять настройки сохранения в excel не вариант, т.к. пути все время разные. Сохранять файл при создании тоже не вариант, т.к. 99% файлов удаляются после просмотра, и это очень засорит папки. Должен же быть где-то прописан этот путь, ведь при повторном сохранении проводник не появляется значит путь где-то есть. С уважением.

В ручную установить проблем нет, вопрос именно программно (автоматически)
Наткнулся на одном иностранном форуме и решил вопрос таким образом, может кому пригодится:

Добрый день,
прошу помощи в решении такого вопроса.
Есть данные на листе, вот такой строкой устанавливаю область печати: ActiveSheet.PageSetup.PrintArea = Range(Cells(1, 1), Cells(iLastRow, iLastColumn)).Address, но она печатается на двух страницах. Как сделать чтобы весь диапазон печатался на одной странице (программный аналог синей пунктирной линии в страничном режиме)
Заранее спасибо.

Добрый день уважаемые форумчане, прошу помочь с такой проблемой.
Есть база и в ней код на VBA. При открытии базы появляется панель (лента) надстройки и на ней создается поле ввода (msoControlEdit). Далее из любой книги вводим в поле ввода текст, он ищется в базе, и должен выводиться в книгу из которой был сделан запрос. Проблема в том, что результат выводится в книгу базы, я так понимаю, что ввод в текста в поле ввода, делает активной книгу базы. Как запомнить или вернуться в книгу из которой был сделан запрос?
С уважением.

Не получится, там различные данные и встречаются в разных столбцах. Решил проблему пока так: проверяю массив на наличии 0 в качестве первого символа и дописываю к этим значениям апостроф, потом вывожу на лист. На быстродействии вреде бы не сказалось. Думаю проблему можно считать решенной.
Спасибо за Ваш труд.

Делать весь лист текстовым нельзя, а конкретную ячейку я не знаю. На ум приходит тольк вывод на лист через цикл с проверкой каждого значения на первый символ. Может есть более изящное решение?

.text не получилось - при копировании в массив результат тот же.
при выводе не лист ошибка "Нельзя установить свойство Text класса Range"

Добрый день, уважаемые форумчане
помогите с такой проблемой:
есть коды оборудования начинающиеся с нуля (001, 011 и т.п.) на листе записаны через апостроф т.е. ('001, '011 и т.п.) при копировании с листа в массив копируются только цифры (001, 011) проблема в том, что при копировании на лист эти значения превращаются в (1, 11 и т.д.). Можно ли как то сохранить нули при копировании массива на лист?
P.S. Массив на лист копирую так:
Sheets("TempTable").Range("a2").Resize(UBound(temparr, 1), UBound(temparr, 2)).Value = temparr

С уважением.

Спасибо за ответы. Реализовал предложение ikki.
To: Юрий М передача фокуса результата не дала. Видимо где-то хранится значение ДО начала редактирования и если оно совпадает с тем что есть на момент окончания редактирования (нажатие Enter), то макрос не вызывается.
Еще раз всем спасибо. Вопрос решен.

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

Добрый день, уважаемые форумчане
обращаюсь к Вам с такой проблемой:
есть объект msoControlEdit на ленте, при вводе в него значения и нажатия Enter происходит выборка из базы по условию из msoControlEdit, создается временный лист и на него выводится результат. После выбора нужного значения лист автоматически удаляется. Проблема состоит в том, что если мне необходимо сделать выборку второй раз с тем же самым условием т.е. значение в msoControlEdit не меняется (выделяю текст в msoControlEdit и нажимаю Enter), то вызов макроса не происходит. Не происходит он даже в том случае, если удалить один символ и потом его написать снова. Вопрос как сделать так, чтобы макрос вызывался каждый раз, даже если значение не изменялось.

Заранее спасибо!
С уважением.

Спасибо огромное и за ответ, за сайт и  за код

Успехов!

Добрый день,
помогите разобраться с таким вопросом
на Ленте "Надстройки" создаю Выпадающий список (msoControlComboBox)
Список создается, но невозможно изменить его ширину т.е. Width = 100 не вызывает ошибку, но и не выполняется.
Смотрел в отладчике width = 23 что до выполнения строки, что после выполнения. Пробовал даже вручную изменить, меняется на любое потом опять становиться 23.
Как это можно победить?

P.S. Office 2010