Существует ли какой нибудь способ отсортировать столбцы на листе Ексель макросом по первой строке выделенных столбцов? Записанные действия макрорекордером после подвески его кода на кнопку не выполняются..

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

Есть такая проблема: есть файл с исходными данными, информацию которого необходимо скопировать сразу в несколько книг, а именно:
необходимо скопировать первый лист файла «шаблон» в несколько сотен файлов, все файлы с разными названиями. Хотелось бы сделать это макросом. Возможно?

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

Получаю массив данных для комбобокс так

With Sheets("Список")
        arrЗаказОпл = .Range(.Cells(1, 2), .Cells(Rows.Count, 2).End(xlUp)).Value
    End With
ComboBox_НЗ.List = arrЗаказОпл

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

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

Необходимо экспортировать 2 страницы в PDF так, чтобы названия PDF-файлов были взяты из определённых ячеек на каждой из исходных страниц (D3,D7). Пока добился только присвоение имён «Калькуляция» и «Нормирование». Вместо слов (нужны значения) необходимы значения вышеуказанных ячеек исходного файла.

Имеется ли возможность сделать следующее:
Код запускается автоматически перед закрытием книги, а сама книга автоматически сохраняется. При этом полученные PDF отображаются на экране?

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

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

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

Формула деление на пустую ячейку или 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?

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

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

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

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