9th
Фев

Заменить элементы матрицы, лежащие ниже главной диагонали

Все элементы матрицы X (n x n), лежащие ниже главной диагонали, заменить средним арифметическим элементов, значение которых меньше номера столбца.

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

9th

Одномерный массив из элементов матрицы

Сформировать одномерный массив, состоящий из произведений четных элементов, располагающихся в четных строках матрицы X (n x m).

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

9th

Макрос на удаление любого столбца по условию в указанной ячейке (VBA)

Вот макрос на удаление столбца «C» по заданному условию «пусто» в ячейки «c2″. Необходимо изменить макрос таким образом, чтобы при сохранении условия «пусто» в ячейке «c2″ можно было удалять любой другой столбец.

Sub kmd()
For Each c In Range(«c2:c2″)
If c = пусто Then c.EntireColumn.Delete
Next
End Sub

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

7th
Фев

Кодировка и вложения при отправке почты через Indy

Нужна отправлялка по электронной почте письма с вложением.
Отправлялку я имею, но вот есть две проблемы на данный момент:
1. Не отображается в тексте полученного письма русский текст, а вместо него вопросительные знаки;
2. Не отправляется вложение, ответ приходит в программу, что типа почтовый сервер принимает мое вложение за спам и посылает меня в поддержку.
(читать всё…)

1st
Фев

Shape в группе. Как понять в VBA, что выделена не просто группа, но и Shape (объект на группе)?

Выделяю группу (сгруппированы Shap’ы и надписи) щелчком. По периметру высвечиваются 8 белых кружочков. Все хорошо. Я в VB работаю, как с группой и надо мне сделать Ungroup. И работает.
А вот если сгоряча щелкнуть дважды (в руке дрогнул пистолет), то выделяется не просто группа, а еще и её элемент (он обрамляется своими ручками управления – серыми кружочками).  И вот в этом случае при попытке Ungroup получаю: Run-time error…
Данный компонент недоступен на объекте из группы. Как распознать эту ситуацию в VBA (Word 2003)?

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

30th
Янв

Из введенного предложения вывести на экран все слова, содержащие заданную букву

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

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

29th
Янв

Слияние для нескольких строк (VBA)

Как осуществить слияние таблицы Excel с шаблоном Word, если нужно разместить несколько строк на одном листе шаблона? То есть, в Excel у меня десять строк, а в шаблон нужно вставить данные из двух строк, соответственно если применить «слияние» должно получится 5 листов.

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

28th
Янв

Подсчёт нажатий на гиперссылку (VBA)

Подскажите, можно ли вести учёт количества нажатий на гиперссылку, в соседней ячейки, что-бы можно было отследить, какой документ открывается чаще?

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

28th

Удаление строк (VBA)

Необходим макрос удаления каждой 2,3,4,5,6 ячейки и так по циклу, оставляя при этом 1,7,13 и так далее.
(читать всё…)

28th

Получить все папки

Как в C# получить все папки, у которых нет расширения?

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



Облако меток

папка регулярные выражения реестр word ListView ассемблер timer ShellExecute дата random MySQL SQL массив SaveToFile Microsoft Office Excel pos советы программы RichEdit сеть form LoadFromFile html строки база данных php indy Win Api tstringlist ListBox Pascal Image Edit мысли макросы memo графика C/C++ canvas office StringGrid Файлы поиск форма файл excel интернет winapi журнал ПРОграммист Delphi