Название листа с ссылкой

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

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

Название листа с ссылкой (Формулы/Formulas)

Maksim156

Дата: Вторник, 13.10.2015, 07:07 | Сообщение № 1

Группа: Пользователи

Ранг: Участник

Сообщений: 56

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

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

Excel 2003

Добрый день. Возможно ли что бы название листа в файле №1 подставлялось из ячейки А1 файла №2

К сообщению приложен файл: 243653.rar (3.0 Kb)

Сообщение отредактировал Maksim156 - Вторник, 13.10.2015, 08:06

Ответить

Serge_007

Дата: Вторник, 13.10.2015, 07:37 | Сообщение № 2

Группа: Админы

Ранг: Местный житель

Сообщений: 16475

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

Замечаний: ±

Excel 2016

Maksim156, здравствуйте

1. Возможно, макросом
2. Возможно, функцией ДВССЫЛ()

Это две совершенно разных задачи, поэтому читайте правила форума, пп 4

ЮMoney:41001419691823 | WMR:126292472390

Ответить

Maksim156

Дата: Вторник, 13.10.2015, 08:19 | Сообщение № 3

Группа: Пользователи

Ранг: Участник

Сообщений: 56

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

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

Excel 2003

Serge_007, а можно пример макроса?

Ответить

Pelena

Дата: Вторник, 13.10.2015, 10:28 | Сообщение № 4

Группа: Админы

Ранг: Местный житель

Сообщений: 19210

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

Замечаний: ±

Excel 365 & Mac Excel

Цитата Maksim156, 13.10.2015 в 08:19, в сообщении № 3

пример макроса

[vba]

Код

Public Sub ReName()
    Dim wb As Workbook
    Application.ScreenUpdating = False
    Set wb = Workbooks.Open(Filename:=ThisWorkbook.Path & "\Файл 2.xls")
    For i = 1 To ThisWorkbook.Sheets.Count
        If Len(wb.Sheets("Лист3").Range("A" & i)) Then ThisWorkbook.Sheets(i).Name = wb.Sheets("Лист3").Range("A" & i)
    Next i
    wb.Close SaveChanges:=False
    Application.ScreenUpdating = True
End Sub

[/vba]
Файлы должны быть в одной папке

К сообщению приложен файл: Excel.rar (35.0 Kb)

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816

Ответить

Maksim156

Дата: Пятница, 16.10.2015, 06:32 | Сообщение № 5

Группа: Пользователи

Ранг: Участник

Сообщений: 56

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

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

Excel 2003

Pelena, спасибо, а как сделать что бы макрос запускался автоматически при запуске файла? и будет ли он сильно тормозить, если нужно переименовать 200 листов?

Ответить

Название листа с ссылкой (Формулы/Formulas)

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