Форум программистов, компьютерный форум, киберфорум
Наши страницы

VBA

Войти
Регистрация
Восстановить пароль
 
 
Рейтинг: Рейтинг темы: голосов - 2, средняя оценка - 5.00
аналитика
здесь больше нет...
3332 / 1661 / 184
Регистрация: 03.02.2010
Сообщений: 1,219
#1

Авторские программы, библиотеки, надстройки и шаблоны - VBA

12.02.2010, 17:42. Просмотров 110961. Ответов 143
Метки нет (Все метки)

 Комментарий модератора 
Коллектив модераторов раздела оставляет за собой право использовать данный пост аналитики для размещения и обновления оглавления темы.

Оглавление
- по тематике:

Утилиты


Инструменты программиста

Графические редакторы



Защита программного кода

Офисные операции

Веб-сервис


Игры




- по автору:
A-Z





Конец оглавления

Оригинальное сообщение от аналитики:

Надстройка для VBE "IndenterVBA" - позволяет редактировать стиль оформления программного кода.
27
Вложения
Тип файла: rar IndenterVBA.rar (253.1 Кб, 1498 просмотров)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
12.02.2010, 17:42
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Авторские программы, библиотеки, надстройки и шаблоны (VBA):

Подключение библиотеки в коде программы - VBA
Добрый день, уважаемые форумчане. При переносе макроса из 2003 в 2007 Excel возникла проблема с библиотекой Microsoft Office Web Components...

ошибка в коде надстройки - VBA
Надстройка выдает ошибку 13. В коде ругается на строку: prob = frmMain.txtSignifLevel.Value. :rtfm: Что значит эта строка? Совсем не...

Редактирование надстройки EXCEL - VBA
Ситуация: есть файл start.xla (при запуске сам не показывается, а формирует и запускает временный файл _start.xls с главным меню...

Временно отключить надстройки - VBA
Здравствуйте! Необходимо в начале действия макрос отключить (или приостановить) действие всех надстроек, а в конце снова включить....

Вызов надстройки через VBA - VBA
Здравствуйте. Очень нужна Ваша помощь. Задача следующая: В VBA для Excel 2003 необходимо написать макрос с использованием (вызовом)...

Всё про надстройки .XLA - VBA
Предлагаю в этой теме обсудить все аспекты надстроек .XLA . Частично эти вопросы затрагивались в теме ...

143
fever brain
oh my god
920 / 471 / 89
Регистрация: 05.01.2016
Сообщений: 1,405
Записей в блоге: 7
12.12.2016, 03:42 #136
Посмотрите, тут тоже без длл и прочей ерунды простая реализация календаря на форме
Реализованно почти 2 года назад Календарь, который понравится всем (готовое решение)
0
anton-sf
17 / 17 / 4
Регистрация: 29.03.2015
Сообщений: 64
12.12.2016, 11:23 #137
fever brain,
я видел, в том числе и другие реализации, мне же хотелось плоский интерфейс с подсветкой кнопочек под мышью и с возможностью менять размер кнопочек не сильно утруждаясь

Добавлено через 31 минуту
И моему интерфейсу другие календари не подходят, вот небольшое видео как выглядит календарик https://www.youtube.com/watch?v=DT0knjft2CE
0
dzug
676 / 216 / 15
Регистрация: 17.01.2011
Сообщений: 539
Записей в блоге: 1
22.01.2017, 20:48 #138
Нашёл в архиве старую поделку, скачанную лет 15 назад. Это программа учёта по складу и там есть шикарный демо-ролик. Особенно понравился демо-ролик блока закупки в графическом виде.
Автор указан в прилагаемых файлах.
Запускать в "старых" версиях Экселя: 1997, 2003 г. и раньше.
Что бы Вас не раздражали настройки , распакуйте файлы в папку по адресу : C:\Doors
1
Вложения
Тип файла: rar Doorspk.rar (3.60 Мб, 22 просмотров)
Volobuev Ilya
87 / 94 / 42
Регистрация: 25.07.2014
Сообщений: 1,745
Записей в блоге: 2
07.04.2017, 18:33 #139
Сортировка выбором. Начинающим, наверно будет полезно.
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Sub VSort()
    For i = 1 To 10 Step 1
        For j = i + 1 To 10 Step 1
            If ActiveSheet.Cells(i, 1) > ActiveSheet.Cells(j, 1) Then
                ActiveSheet.Cells(i, 1) = ActiveSheet.Cells(i, 1) + ActiveSheet.Cells(j, 1)
                ActiveSheet.Cells(j, 1) = ActiveSheet.Cells(i, 1) - ActiveSheet.Cells(j, 1)
                ActiveSheet.Cells(i, 1) = ActiveSheet.Cells(i, 1) - ActiveSheet.Cells(j, 1)
            End If
        Next j
    Next i
End Sub
Добавлено через 4 минуты
Сортировка пузырьком:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Sub VSort()
    For i = 1 To 10 Step 1 ' ячейки расположены вертикально, их 10
        For j = 1 To 10 - i Step 1
            If ActiveSheet.Cells(j, 1) > ActiveSheet.Cells(j + 1, 1) Then
                ActiveSheet.Cells(j, 1) = ActiveSheet.Cells(j, 1) + ActiveSheet.Cells(j + 1, 1)
                ActiveSheet.Cells(j + 1, 1) = ActiveSheet.Cells(j, 1) - ActiveSheet.Cells(j + 1, 1)
                ActiveSheet.Cells(j, 1) = ActiveSheet.Cells(j, 1) - ActiveSheet.Cells(j + 1, 1)
            End If
        Next j
    Next i
End Sub
0
Владимир_Сар
58 / 57 / 13
Регистрация: 10.09.2009
Сообщений: 250
16.09.2017, 15:57 #140
Игра 2048 может, кому нравится! Сам доходил только до 1024
2048.zip
0
Владимир_Сар
58 / 57 / 13
Регистрация: 10.09.2009
Сообщений: 250
26.09.2017, 10:09 #141
В цветном виде и с возможностью вернуть ход
Цифра Цветная.xls
0
Zheka_VEYDER
0 / 0 / 0
Регистрация: 29.09.2017
Сообщений: 10
01.10.2017, 19:45 #142
Да, макрос действительно орегинальный!

Добавлено через 7 минут
Цитата Сообщение от fever brain Посмотреть сообщение
Посмотрите, тут тоже без длл и прочей ерунды простая реализация календаря на форме
Реализованно почти 2 года назад Календарь, который понравится всем (готовое решение)
Прикольная реализация, спасибо.
0
Dmitrii_Mas
0 / 0 / 0
Регистрация: 14.09.2017
Сообщений: 17
12.10.2017, 22:34 #143
отличная штука!
А доступ к коду возможен?
0
fever brain
oh my god
920 / 471 / 89
Регистрация: 05.01.2016
Сообщений: 1,405
Записей в блоге: 7
03.11.2017, 21:24 #144
Архивация подпапок в определенной папке, с учетом исключений + установка пароля с пробелом


Автор: fever.brain


Топик:



0
03.11.2017, 21:24
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
03.11.2017, 21:24
Привет! Вот еще темы с ответами:

Хранение картинок в теле надстройки - VBA
Добрый день! Возможно ли хранить картинку в самом файле ("надстрока.xlsx") и вставлять ее на лист средствами VBA? к примеру:...

Добавление надстройки Excel в Ribbon - VBA
Здравствуйте. Написал я две надстройки на VBA для Excel, и захотелось мне поместить две кнопки для запуска этих надстроек на ленту в...

Вызов окна функции из надстройки - VBA
Добрый день. Сделал надстройку типа RIBBON. В меню перечислил свои пользовательские функции. Хочу, чтобы при щелчке по пункту меню,...

Назначение комбинации клавиш макроса у надстройки - VBA
Есть надстройка в ней полезные макросы.....для вызова которых есть комбинации клавиш.... и так возникла потребность написания....новых...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
144
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.