Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Присвоение имени листа переменной, который выберет юзер - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Присвоение имени листа переменной, который выберет юзер (Макросы/Sub)
Присвоение имени листа переменной, который выберет юзер
Awallon Дата: Вторник, 23.09.2014, 19:34 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 32
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Добрый день.
Я хочу, чтобы пользователю макроса, который я пишу, открывалось какое-то диалоговое окно с различными уточняющими вопросами:
один из них - на каком листе находятся такие-то данные.
Пользователь кликает на нужный лист и макрос продолжает работу.
Application.Inputbox в этом как-то не очень хочет помогать - ему не достаточно выбора только листа, все время на что-нибудь ругается в зависимости от различных type:=

Для примера, как я это вижу:

[vba]
Код
Option Explicit
Public strData as String 'Переменная для наименования листов в книге

'Переменные для листов
Public shtData1 as Worksheet
Public shtData2 as Worksheet
Public shtData3 as Worksheet

'----Еще куча разных переменных, не относящихся к посту

Public Sub Links_Values()

strData = 'Здесь вызывается диалог с пользователем, где он кликает на один из листов в текущей книге
Set shtData1 = Thisworkbook.Worksheets(strData)
strData = 'Здесь вызывается диалог с пользователем, где он кликает на один из листов в текущей книге
Set shtData2 = Thisworkbook.Worksheets(strData)
strData = 'Здесь вызывается диалог с пользователем, где он кликает на один из листов в текущей книге
Set shtData2 = Thisworkbook.Worksheets(strData)

'----Дальнейшее выполнение макроса

End Sub
[/vba]

Возможен такой вариант и с помощью чего это можно осуществить?
 
Ответить
СообщениеДобрый день.
Я хочу, чтобы пользователю макроса, который я пишу, открывалось какое-то диалоговое окно с различными уточняющими вопросами:
один из них - на каком листе находятся такие-то данные.
Пользователь кликает на нужный лист и макрос продолжает работу.
Application.Inputbox в этом как-то не очень хочет помогать - ему не достаточно выбора только листа, все время на что-нибудь ругается в зависимости от различных type:=

Для примера, как я это вижу:

[vba]
Код
Option Explicit
Public strData as String 'Переменная для наименования листов в книге

'Переменные для листов
Public shtData1 as Worksheet
Public shtData2 as Worksheet
Public shtData3 as Worksheet

'----Еще куча разных переменных, не относящихся к посту

Public Sub Links_Values()

strData = 'Здесь вызывается диалог с пользователем, где он кликает на один из листов в текущей книге
Set shtData1 = Thisworkbook.Worksheets(strData)
strData = 'Здесь вызывается диалог с пользователем, где он кликает на один из листов в текущей книге
Set shtData2 = Thisworkbook.Worksheets(strData)
strData = 'Здесь вызывается диалог с пользователем, где он кликает на один из листов в текущей книге
Set shtData2 = Thisworkbook.Worksheets(strData)

'----Дальнейшее выполнение макроса

End Sub
[/vba]

Возможен такой вариант и с помощью чего это можно осуществить?

Автор - Awallon
Дата добавления - 23.09.2014 в 19:34
Alex_ST Дата: Вторник, 23.09.2014, 22:37 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3198
Репутация: 606 ±
Замечаний: 0% ±

2003
Application.InputBox("...", "...", Type:=8), который по идее необходимо использовать для получения ссылок на диапазоны, не корректно работает на других листах и на листах, в которых есть ячейки с УФ формулой
Для уверенного получения ссылок на диапазоны я использую такой "костыль":



С уважением,
Алексей
MS Excel 2003 - the best!!!


Сообщение отредактировал Alex_ST - Вторник, 23.09.2014, 22:38
 
Ответить
СообщениеApplication.InputBox("...", "...", Type:=8), который по идее необходимо использовать для получения ссылок на диапазоны, не корректно работает на других листах и на листах, в которых есть ячейки с УФ формулой
Для уверенного получения ссылок на диапазоны я использую такой "костыль":

Автор - Alex_ST
Дата добавления - 23.09.2014 в 22:37
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Присвоение имени листа переменной, который выберет юзер (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!