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

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

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

Восстановить пароль
Повторная активизация e-mail

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

Ответ
 
Опции темы Поиск в этой теме
Старый 22.05.2011, 16:49   #1
valerij
Старожил
 
Аватар для valerij
 
Регистрация: 12.05.2007
Сообщений: 2,339
По умолчанию Вход в интернет

Можно ли макросом, прописать
Основной шлюз: 192.168.1.1
Затем, если закрыть Книгу, удалить, запись - Основной шлюз?

На лок. ПК, стоит антивирусник MSE(Microsoft Security Essentials), переодически нужно обновлять.
valerij вне форума Ответить с цитированием
Старый 22.05.2011, 18:08   #2
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

чисто Экселевские задачи...
из командной строки это делается...
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 22.05.2011, 18:19   #3
valerij
Старожил
 
Аватар для valerij
 
Регистрация: 12.05.2007
Сообщений: 2,339
По умолчанию

Цитата:
Сообщение от IgorGO Посмотреть сообщение
чисто Экселевские задачи......
Да
Цитата:
из командной строки это делается...
Не пойдет, меня в офисе нет, бух-ра сделают??
valerij вне форума Ответить с цитированием
Старый 22.05.2011, 18:25   #4
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

Цитата:
Не пойдет, меня в офисе нет, бух-ра сделают??
Ответ достоен 100 баллов.
бухгалтера сделают Shell("Текст команды")
Анализ,обработка данных Недорого
doober вне форума Ответить с цитированием
Старый 22.05.2011, 18:37   #5
valerij
Старожил
 
Аватар для valerij
 
Регистрация: 12.05.2007
Сообщений: 2,339
По умолчанию

Цитата:
Сообщение от doober Посмотреть сообщение
Ответ достоен 100 баллов.
Неужто нельзя ответить, нормально.
Я же не спрашиваю как вкл. откл. интернет.
Я спрашиваю о макросе....
valerij вне форума Ответить с цитированием
Старый 22.05.2011, 23:14   #6
R Dmitry
Форумчанин
 
Регистрация: 07.03.2010
Сообщений: 796
По умолчанию

Цитата:
Сообщение от valerij Посмотреть сообщение
Неужто нельзя ответить, нормально.
Я же не спрашиваю как вкл. откл. интернет.
Я спрашиваю о макросе....
не уверен , но что то типа того

если change не прокатит то может сначала удалить а потом добавить
Код:
Sub Test()

    Dim wsh As Object
     Set wsh = CreateObject("WScript.Shell")
     wsh.Run "%comspec% /c route change 192.168.0.2 mask 255.255.255.0 192.168.0.1"
    Set wsh = Nothing
   'ipconfig
End Sub
Логика?!.... она где то рядом... E_mail: dg_rusak@mail.ru Если спасибо мало: Яндекс . Деньги - 41001731366021 WM R269866874234
R Dmitry вне форума Ответить с цитированием
Старый 22.05.2011, 23:29   #7
R Dmitry
Форумчанин
 
Регистрация: 07.03.2010
Сообщений: 796
По умолчанию

и еще тут почитай
ссылочка
Логика?!.... она где то рядом... E_mail: dg_rusak@mail.ru Если спасибо мало: Яндекс . Деньги - 41001731366021 WM R269866874234
R Dmitry вне форума Ответить с цитированием
Старый 23.05.2011, 00:28   #8
R Dmitry
Форумчанин
 
Регистрация: 07.03.2010
Сообщений: 796
По умолчанию

Код:
Sub Test()
    Dim wsh As Object
     Set wsh = CreateObject("WScript.Shell")
     wsh.Run "%comspec% /c netsh interface ip set address ""Подключение по локальной сети"" source=static 195.200.104.15 255.255.255.0 192.168.1.1 1"
         Set wsh = Nothing
  
End Sub
Вот так у меня все поменяло
идет ip, маска, потом шлюз и последнее 1-честно не знаю, возможно номер интерфейса
Логика?!.... она где то рядом... E_mail: dg_rusak@mail.ru Если спасибо мало: Яндекс . Деньги - 41001731366021 WM R269866874234
R Dmitry вне форума Ответить с цитированием
Старый 23.05.2011, 09:26   #9
valerij
Старожил
 
Аватар для valerij
 
Регистрация: 12.05.2007
Сообщений: 2,339
По умолчанию

Цитата:
Сообщение от R Dmitry Посмотреть сообщение
Вот так у меня все поменяло
R Dmitry!
Спасибо, на работе попробую, отпишусь.
valerij вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Подключение интернет-планшета к компьютеру для выхода в интернет елена13091980 Помощь студентам 0 19.05.2011 13:46
Вход в БД VHomer БД в Delphi 12 12.06.2010 02:58
Звуковой вход Betty Компьютерное железо 2 08.05.2009 01:38
Вход 5 рублей...))))) Seriy8888 Помощь студентам 23 29.03.2009 13:59
Вход limon PHP 4 14.01.2009 17:46