Предположим, есть папка "folder", в ней расположен файл "файл.xls", с которым и работаем. Например используем функцию LoadPicture , парметр [filename] задаёт, как я понял, имя загружаемого файла, может включать имя папки.
Папка "Pict" с картинками лежит в папке "folder"  
 
Как сослаться на файл folder\Pict\1.gif ???  
Т.е. как сделать так, чтобы не писать полный путь к картинке, а указать его относительно папки "folder" ???

Извиняюсь за корявый вопрос, явно лишённый особого смысл. Сейчас поясню, что же на самом деле нужно.  
Есть переменная    
Public TimeInterval As Integer  
Она присваивает себе значение из TextBox4 формы. В инициализации формы стоит TextBox4.value = 20, это значение себе присваивает TimeInterval  
Затем я вручную меняю значение текстбокса на, предположим, 30.  
 
Как терь сделать, чтобы значение 30 сохранилось в инициализации формы? Другими словами, нужно, чтобы при след. запуске Эксель TextBox4 имел значение 30 ??  
 
------  
Это возможно сделать, сохраняя значение TextBox4 в ячейку листа, и извлекая его оттуда при инициалайзе или активации формы, но очень реализовать это не трогая эксель, а как бы это сказа.... на уровне VBA что-ли, простите за делетантские формулировки.

Есть форма, в ней TextBox.  
Хочу сделать возможным менять интервал времени автосохранения из формы, посредством ввода необходимого интервала автосохранения в TextBox.  
Автосохраненение основано на методе onTime (пару тем назад я вопрошал по этому поводу)  
 
По замыслу, для нормальной работы необходимо, чтобы в текстбокс можно было ввести данные в формате 0, 0, 10 (если буду использовать onTime Now + TimeSerial(0, 0, 10))  
либо чтобы в текстбок можно ввести данные только в виде "00:00:10" (если буду использовать onTime Now + TimeValue("00:00:10")  
 
Помогите пожалуйста, не знаю, как описать TextBox в инициалайзе формы, чтоб туда можно было ввести данные только в таком формате, что я указал выше?

предположим есть    
sub sub_1()  
код...  
end sub  
 
И есть ещё sub_2, в процессе выполнения которой должна останавливаться sub_1  
sub sub_2()  
код...  
ВЫРУБИТЬ sub_1    
снова код...  
end sub  
 
Вот как в этом случае остановить выполнение sub_1

Есть форма. На ней кнопки, много кнопок. Можно ли одной командой сделать с ними что-то, аналогичное тратата.enabled = false ??? А то описывать каждый элемент нецелесообразно.  
Заранее спасибо, тк чую, что явно такая возможность предусмотрена, а раз предусмотрена, вы о ней точно знаете :)

Возникла такая вот необходимость...    
Строка    
Excel.Application.ThisWorkbook.SaveCopyAs ("Резервная_копия_xuDB.xls")  
должна выполняться через заданые промежутки времени.  
В VBA Excel можно это реализовать?

Есть MultiPage с Page1  и Page2.  
Никак не могу найти, как отловить, какая страница активна. Суть вопроса примерно такая:  
If активна Page1 then  
код1  
else  
код2  
 
Попогите разрешить загвоздку пожалуйста.

Помогите пожалуйста - никак не могу домыслить...  
Есть активный лист. ActiveCell может находится в любой ячейке.  
Как сделать так, чтобы код выполнялся только тогда, когда ActiveCell находится в первой строке листа???  
должно быть что-то типа    
If ActiveCell находится в первой строке then  
код  
endif

См. пример. Очень необходим счётчик. Форма для него готова. Счёт чик должен работать так. Выбираем где искать. Выбираем что искать. Код ищет в указанном месте заданое слово и при совпадении добавляет к значению счётчика +1ю И так до тех пор, пока не просмотрит всю указаную область. После чего в TextBox1 возвращает полученное значение счётчика.  
 Буду безмерно счастлив, если покажете в моём примере, как это лучше сделать.

См. пример.  
Есть заготовка формы, которая при нажатии на переключатель осущ. поиск. Диапазон поиска довольно обширен, на просмотр всего диапазона уходит около 4-5 сек на моём компе.  
Очень нужно сделать некий индикатор, который бы во время просмотра диапазона сообщал что-нить типа "Погодите, идёт поиск, ничё не трогайте :)"  
Для меня смое удобное - это вставит Label, который меняет своё свойство с visible = false на visible = true непосредственно СРАЗУ после нажатия на переключатель, акивирующий поиск ( я так и сделал, см. пример). Однако он похоже его отрисовывае уже после того, как просмотрел диапазон поиска... :( и никакого толка.  
 
Помогите пожалуйста довести до рабочего состояния то, что есть либо предложите что-то иное. Оооочень буду признателен.

Помнится, пол года назад я здесь спрашивал, как в Эксель отключить все минюхи, скроллбары и прочее, в тч и т.н. "Ленту". Тогда никто не знал, как эту ленту отключить из VBA или ещё как то.    
Времени прошло прилично, возможно кто-то сейчас владеет этим вопросом?

См. пример.  
Суть: есть форма, вызываемая кнопкой с первого листа, и по идее, должна искать в другом листе, который скрыт. Так вот если сделать поиск, а потом схватить окно формы после удачного поиска и подвигать им туда-сюда, то он оставляет жуткие следы на экране.  
 
Что очень хочется:  
- чтобы не было этого безобразия при скрытии листа  
--ИЛИ--  
- Мне нужно, чтобы при поиске не отображался тот лист, на котором идёт поиск. То есть он может быть и не скрытым, лишь бы при нажатии "найти" в моей форме она бы искала на другом листе, продолжая отображать текущий.  
 
Помогите пожалуйста решить затруднение.

Есть проект, в нём две формы.  
В первой форме используется переменная обявленая так Dim strPribor As String  
во второй форме нужно значение этой переменной вогнать в Textbox1.  
 
Понимаю, что нужно объявить переменную strPribor как Public, но где и как это делается не знаю.    
Помогите пожалуйста

Есть форма, в ней раскрывающийся список. Выглядит так:  
 
Private Sub ComboBox1_change()  
ComboBox1.RowSource = "dev!A2:A6"  
End Sub  
 
Мне удалось активировать выпадающий список только с помощью ComboBox1_change , что нужно вписать вместо change, чтобы список выпадал при нажатии на треугольничек списка?  
 
И ещё, у меня данные для списка лежат на другом листе: dev!A2:A6  
 
Данных немного, можно их хранить не на листе, а прямо внутри текста программы, и как это сделать?

в общем есть форма. На свободном месте нужен индикатор раскладки, aka виндовский, который рядом с часами.  
Если кто-нить знает код вставки, подскажите пожалуйста, буду признателен.

Вот есть такой меседжбокс:  
----------  
MsgBox "Прибор " & strPribor & " не найден!" & Chr(10) & "Проверьте правильность ввода.", 16, "Ошибка"  
TextBox1 = ""  
TextBox1.SetFocus  
----------  
 
Как сделать, чтобы при выскакивании меседжбокса strPribor выделялся каким-нить цветом? на всякий случай strPribor As String.

В общем есть обядинённая ячейка. Относительно её мне нужно выбрать ячейку при помощи Offset(  ,  ). Но ничего не выходит.  
См. прикреплённый файл, я там закоментил те строки кода которые не хотят работать.