powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Простой скрипт не везде работает!
6 сообщений из 6, страница 1 из 1
Простой скрипт не везде работает!
    #33615019
Михаил
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Привет,

Написал на VB Script код для задания именованой области (named range).
На одной машине с Office2003 все работает, а на другой с Office2000 область не создается, а если с таким именем уже была - то удаляется!
(файл bt.xls один и тот же в обоих случаях!)

Код: plaintext
1.
2.
3.
4.
5.
6.
Set xls = CreateObject("Excel.Application")
	xls.visible = false
	xls.Workbooks.Open "d:\bt.xls"
	Set book = xls.Workbooks( 1 )
             book.Names.Add "price_range",  "=tabelle1!R11C3:R15C6"
	book.close true
	xls.quit

Может кто сталкивался?

Не подскажете также как:
отвязаться от имени листа (tabelle1) и привязаться к его порядковому номеру

заставть Ексель не выдавать сообщений и в частности:

не спрашивать в каком формате сохранять (файл надо оставить в формате 5.0)

Заранее спасибо!
...
Рейтинг: 0 / 0
Простой скрипт не везде работает!
    #33615097
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Переопределение именованной области
ActiveWorkbook.Names("выделенное").RefersTo = "=Лист1!$A$1:$F$10"
...
Рейтинг: 0 / 0
Простой скрипт не везде работает!
    #33615192
Михаил
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Попробовал - убивает область! (зараза...)
...
Рейтинг: 0 / 0
Простой скрипт не везде работает!
    #33615742
По поводу порядкового номера.

Код: plaintext
    xls.Workbooks( 1 ).Worksheets( 1 ...n)

По поводу формата. Указывай принудительно при сохранении.

Код: plaintext
1.
    ActiveWorkbook.SaveAs Filename:="D:\1\Книга1.xls", _
      FileFormat:= 39 
...
Рейтинг: 0 / 0
Простой скрипт не везде работает!
    #33617491
Михаил
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо! Все сделал!

А как можно выразить мысль если я хочу выделить range по самую нижнюю заполненную ячейку?
А то я беру с запасом и в результате зачитываю базу на несколько тысяч ячеек больше (пустых).
...
Рейтинг: 0 / 0
Простой скрипт не везде работает!
    #33618665
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
МихаилСпасибо! Все сделал!

А как можно выразить мысль если я хочу выделить range по самую нижнюю заполненную ячейку?
А то я беру с запасом и в результате зачитываю базу на несколько тысяч ячеек больше (пустых).
melamoryпоследнюю строку можно найти так

Cells.SpecialCells(xlLastCell).Row

Вчера кто то спрашивал и кто то отвечал
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Простой скрипт не везде работает!
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]