Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Создание и открытие окон из книги - в определенных координатах экрана с определенными размерами
 
#1
15.09.2017 21:08:31
Добрый вечер, специалисты по экселю.
Помогите с решением.

Пытаюсь сделать скрипт - открывающий по щелчку кнопки - некоторые листы экселя - как окна - в определенных координатах монитора с определенными размерами.
Но что-то не получается.

Подскажите - как заставить окна книги эксель - открываться в определенных координатах с определенными размерами окна ?
Код
Sub Макрос1()

    Sheets("Лист2").Select
    ActiveWindow.NewWindow
    
    With Application
        .Left = 100
        .Top = 150
        .Width = 400
        .Height = 400
    End With
    
    Windows("3498765.xls:1").Activate

    Windows("3498765.xls:2").Activate
    Windows("3498765.xls:1").Activate
    Sheets("Лист3").Select
    ActiveWindow.NewWindow
    
    With Application
        .Left = 700
        .Top = 600
        .Width = 400
        .Height = 400
    End With
Windows("3498765.xls:3").Activate
Sheets("Лист1").Select
End Sub
Изменено: visors16 - 15.09.2017 21:09:25
 
 
 
#2
15.09.2017 21:37:56
Цитата
visors16 написал:
не получается
Попробуйте заменить
Код
With Application
на
Код
With ActiveWindow
PHP Битрикс24 REST API, Google Apps Script, Excel VBA Windows Mac
 
 
 
#3
15.09.2017 21:54:03
Inexsu, не работает.

Выдает ошибку :
Run-time error '1004':  Нельзя установить свойство Left класса Window
 
 
 
#4
15.09.2017 23:12:21
Цитата
visors16 написал:
Нельзя установить свойство Left класса Window
после  
Код
With ActiveWindow
добавьте .
Код
WindowState = xlNormal
PHP Битрикс24 REST API, Google Apps Script, Excel VBA Windows Mac
 
 
 
#5
15.09.2017 23:27:16
Inexsu, добавил.
Выдает ту же ошибку.

Run-time error '1004':  Нельзя установить свойство Left класса Window
 
 
 
#6
15.09.2017 23:42:31
Цитата
visors16 написал:
Выдает ту же ошибку.
Это мой косячок.
Пожалуйста, приложите скриншот как должно выглядеть расположение окон по окончании работы макроса.
PHP Битрикс24 REST API, Google Apps Script, Excel VBA Windows Mac
 
 
 
#7
15.09.2017 23:48:52
Inexsu, примерно вот так это должно выглядеть:
Изменено: visors16 - 15.09.2017 23:49:59
 
 
 
#8
16.09.2017 00:06:55
У Вас открыто три экземпляра Excel?
С этим я, пока, не справлюсь.
А вот как в моём скриншоте, могу.
PHP Битрикс24 REST API, Google Apps Script, Excel VBA Windows Mac
 
 
 
#9
16.09.2017 00:41:38
Inexsu, нет - я спрашивал именно про размещение окон из книги - в определенных координатах экрана с определенными размерами.
 
 
 
#10
16.09.2017 07:25:34
Разрешение экрана у Вас какое?
PHP Битрикс24 REST API, Google Apps Script, Excel VBA Windows Mac
 
 
 
#11
16.09.2017 09:16:06
Inexsu, разрешение экрана 2560х1600
 
 
 
#12
16.09.2017 09:31:59
Цитата
visors16 написал:
2560х1600
У меня такого разрешения нет и окна Excel у меня не открываются как на Вашем скриншоте. Если у Вас ошибается на
Код
With Application        .
 .Left = 100
то замените на  
Код
 With Application
    .WindowState = xlNormal
    .Left = 100
PHP Битрикс24 REST API, Google Apps Script, Excel VBA Windows Mac
 
 
 
#13
16.09.2017 09:37:00
Inexsu, вот сейчас все заработало !!!

Огромное вам спасибо за помощь.
 
 
 
Страницы: 1
Читают тему
Наверх