workbooks("").Act...выбрать открытую книгу, зная часть имени

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

workbooks("").Act...выбрать открытую книгу, зная часть имени (Макросы/Sub)

lFJl

Дата: Среда, 24.08.2016, 07:30 | Сообщение № 1

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 236

Репутация: 6 ±

Замечаний: 0% ±

Excel 2013

Доброго дня, программа формирует отчет, и открывает его в excel файле с именем типа report*..., после * идет рандомный набор символов.
Как используя workbooks("").Activate сделать эту книгу активный, вообще это реально?

Ответить

buchlotnik

Дата: Среда, 24.08.2016, 09:17 | Сообщение № 2

Группа: Заблокированные

Ранг: Участник клуба

Сообщений: 3442

Репутация: 929 ±

Замечаний: 20% ±

2010, 2013, 2016 RUS / ENG

что за программа? на каком языке написана? тогда и обсудим

Цитата

это реально?

Ответить

Manyasha

Дата: Среда, 24.08.2016, 10:33 | Сообщение № 3

Группа: Модераторы

Ранг: Старожил

Сообщений: 2198

Репутация: 901 ±

Замечаний: 0% ±

Excel 2010, 2016

lFJl, как-то так, наверное:
[vba]

Код

Sub activateWbReport()
    Dim Wb As Workbook
    For Each Wb In Workbooks
        If Wb.Name Like ["report*"] Then Wb.Activate
    Next
End Sub

[/vba]

ЯД: 410013299366744 WM: R193491431804

Ответить

KuklP

Дата: Среда, 24.08.2016, 10:41 | Сообщение № 4

Группа: Проверенные

Ранг: Старожил

Сообщений: 2369

Репутация: 486 ±

Замечаний: 0% ±

2003-2010

Здесь подобное обсуждали

Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728

Ответить

lFJl

Дата: Четверг, 25.08.2016, 09:42 | Сообщение № 5

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 236

Репутация: 6 ±

Замечаний: 0% ±

Excel 2013

Цитата buchlotnik, 24.08.2016 в 09:17, в сообщении № 2

что за программа? на каком языке написана?

Программа "Microsoft Dynamics AX", на каком языке написана не интересовался, но это думаю в данной задаче не важно, т.к. работать в итоге нужно будет с excel'ем

Цитата lFJl, 24.08.2016 в 07:30, в сообщении № 1

открывает его в excel файле с именем типа report*

Manyasha, KuklP, Спасибо, все получилось!

Ответить

workbooks("").Act...выбрать открытую книгу, зная часть имени (Макросы/Sub)

Страница 1 из 1
1