Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 30.09.2009, 16:50   #1
iago
Новичок
Джуниор
 
Регистрация: 30.09.2009
Сообщений: 2
По умолчанию помогите нужен макрос

нужен макрос чтоб при открытии листа отображаллая вся инфа по системе моего компа
по примеру:


______________________ Сведения об организации______________________
Наименование
ИНН:
КПП:
ТЕЛ:
Адрес:
_______________________ Сведения о дисках_______________________
Диск: A Тип: 1 Кб. Имя :
Диск: C Тип: 2 Ф.С.: FAT32 Своб.: 20 812 192 Кб. Имя : OSNOVA SN: 170528990
Диск: D Тип: 2 Ф.С.: NTFS Своб.: 28 955 360 Кб. Имя : VIDEO SN: -1137781640
Диск: E Тип: 2 Ф.С.: FAT32 Своб.: 10 667 784 Кб. Имя : RAB SN: 948406620
Диск: F Тип: 2 Ф.С.: NTFS Своб.: 1 975 152 Кб. Имя : INSTALLS SN: 1881682236
Диск: G Тип: 4 Кб. Имя :
_______________________ Сведения о системе_______________________
2-QQQ
Разделитель Даты .
Разделитель Времени :
Разделитель Десятичный .
Имя компьютера: _____________2-QQQ
Путь к Windows: _____________D:\WINDOWS
Язык: _______________________Russian
Страна: _____________________Russia
Денежный символ: ____________р.
Формат даты: ________________d MMMM yyyy 'г.'
Полное название дней недели: _понедельник
Полное название дней недели: _вторник
Полное название дней недели: _среда
Полное название дней недели: _четверг
Полное название дней недели: _пятница
Полное название дней недели: _суббота
Полное название дней недели: _воскресенье
Короткое название дней недели: _Пн
Короткое название дней недели: _Вт
Короткое название дней недели: _Ср
Короткое название дней недели: _Ср
Короткое название дней недели: _Чт
Короткое название дней недели: _Пт
Короткое название дней недели: _Сб
Короткое название дней недели: _Вс
Разрешение экрана: __________1024 X 768
Версия ОС __________________Windows NT 5.1 (Build 2600)
Процессор : Intel Pentium
Полная Физическая Память: ____272 296K
Доступная Физическая Память: ____2 097 024K
Полная Виртуальная Память: ____1 980 716K
Доступная Виртуальная Память: _______1 980 716K
Локальный IP адрес:________192.168.1.111
=================================== ==============================
ПО ПРИНЦИПУ ЭТОЙ ПРОГРАММЫ
НО БЕЗ ЗАПУСКА ЕЁ
ПРЯМО ЧТОБ В ИКСЕЛЕ ПРИ ЗАПУСКЕ ОТОБРАЖАЛОСЬ
Вложения
Тип файла: zip os_inform.zip (34.6 Кб, 11 просмотров)

Последний раз редактировалось iago; 30.09.2009 в 18:05.
iago вне форума Ответить с цитированием
Старый 30.09.2009, 18:52   #2
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,858
По умолчанию

Могу сделать, но не бесплатно.
Делал раньше что-то подобное - при открытии файла excel срабатывал скрипт, который собирал информацию о компе, и помещал её в файл на том же носителе, откуда запущен файл Excel.

Цитата:
_______ Сведения об организации________
Наименование
ИНН:
КПП:
ТЕЛ:
Это уже перебор... откуда в компе появится такая информация?
Её крайне сложно откопать (а в большинстве случаев вообще невозможно)

Цитата:
_______________________ Сведения о системе_______________________
2-QQQ
Разделитель Даты .
Разделитель Времени :
ИМХО, абсолютно бесполезная информация.
Не вижу смысла тратить время на её сбор.

Цитата:
ПРЯМО ЧТОБ В ИКСЕЛЕ ПРИ ЗАПУСКЕ ОТОБРАЖАЛОСЬ
Это сработает лишь в том случае, если в настройках Excel разрешён запуск макросов.
Можно и это обойти, но сложнее.

Сколько Вы готовы заплатить?
EducatedFool вне форума Ответить с цитированием
Старый 30.09.2009, 19:00   #3
iago
Новичок
Джуниор
 
Регистрация: 30.09.2009
Сообщений: 2
По умолчанию

Цитата:
Сообщение от EducatedFool Посмотреть сообщение
Могу сделать, но не бесплатно.
Делал раньше что-то подобное - при открытии файла excel срабатывал скрипт, который собирал информацию о компе, и помещал её в файл на том же носителе, откуда запущен файл Excel.


Это уже перебор... откуда в компе появится такая информация?
Её крайне сложно откопать (а в большинстве случаев вообще невозможно)


ИМХО, абсолютно бесполезная информация.
Не вижу смысла тратить время на её сбор.


Это сработает лишь в том случае, если в настройках Excel разрешён запуск макросов.
Можно и это обойти, но сложнее.

Сколько Вы готовы заплатить?
384-757-108 МОЯ АСЬКА
iago вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Сложная задача, наверно нужен макрос.. Quatro_Drive Microsoft Office Excel 14 01.09.2009 11:56
нужен макрос Angel-A Microsoft Office Excel 0 07.06.2009 21:22
Нужен Макрос Valeriy1983 Microsoft Office Excel 4 30.04.2009 21:37
Нужен Макрос, для решения конкретной задачи IREN_27 Microsoft Office Excel 5 23.04.2009 12:42
Нужен макрос Excel по поиску и замене Михалыч01 Microsoft Office Excel 2 06.11.2008 18:03