Подскажите, пожалуйста, как кодом определить длину (Len(Me.ListBox1.List(x))) самой длинной строки в списке ListBox1 на форме? (vba excel 2003).

(читать всё…)

Ставлю компонент Image, туда запихиваю файл gif, но когда запускаю проект, GIF отображается как картинка, а не анимация, почему так происходит, и встречался ли кто нибудь с подобным???

(читать всё…)

Формула деление на пустую ячейку или 0 выдает ошибку №ДЕЛ/О. Как сделать так что бы вместо ошибки стоял 0?

(читать всё…)

В файле 2 колонки. в первом столбце идет порядковый номер объекта в объеденной ячейке, которая равна кол-ву ячеек второго столбца. Во втором столбце идет построчно информация, которая соответствует объекту в ячейке первого столбца.
Необходимо объединить ячейки второго столбца, которые принадлежат объекту первого столбца. То есть, где то их 3 строки, где то 10, а где то и одна, которую нужно пропустить.

(читать всё…)

Скажите пожалуйста, как исправить код ниже (vba excel 2003), чтобы форма открывалась располагаясь сразу под кнопкой («Shapes(имя)»), щелкая по которой эта формы и вызывается?

Private Sub UserForm_Initialize()
With Me
 .StartUpPosition = 0
 .Top = ActiveSheet.Shapes(имя).Top
 .Left = ActiveSheet.Shapes(имя).Left
End With
End Sub

(читать всё…)

Подскажите пожалуйста как запретить следующее действие: при вводе значения в textbox1 (на форме) и последующего нажатия клавиши ESC происходит очищение textbox1?

(читать всё…)

Подскажите пожалуйста, есть конструкция типа:

function TagCat($tags, $itemid){
    foreach($tags as $tag){
        if($tag->itemID == $itemid AND $tag->type == '8'){
            $taglink = urldecode(
              JRoute::_(K2HelperRoute::getTagRoute(urlencode($tag->name)))
            );
            return '<a href="'.$taglink.'" class="category">'.$tag->name.'</a>';
        }
    }
}

Которая отвечает за вывод тега определенного типа объекта.

Вопрос: как изменить функцию чтобы она выводила не один тег данного типа, а всё множество тегов соответствующего типа?

(читать всё…)

Покажите, пожалуйста, пример в коде.
Если страница загружена не по HTTPS, то отображаем текст «Войти, что бы получить или отравить файл», он же ссылка на загрузку страницы по HTTPS.
Если страница загружена по HTTPS, то отображаем форму с полями ввода.

(читать всё…)

нужна помощь. я далёк от программирования(30 лет назад изучал). если не трудно ответьте попроще.
копирую(тупо через блокнот в эксел) таблицы с сайта(одна и та же ежедневно обновляемая) . в одном столбце в ячейках текст, при наведении на который всплывает title с небольшим текстом. он мне нужен в виде ещё одного столбца таблицы или ещё как. то есть чтоб он был виден не только при наведении курсора. как быть?

(читать всё…)

Честно говоря, несколько ошарашен отсутствие в VBA подобных встроенных функций (push, pop, shift, unshift, sort и т.д.), без них становиться совсем грустно…
Нормального справочника с примерами по VBA тоже не могу найти. Кстати, может подскажите такой?

Как же, все-таки, наиболее быстро и грамотно сортировать массивы строк?

(читать всё…)