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

Вход

Регистрация

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

 

= Мир MS Excel/Как в одной таблице получить данные из другой - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Как в одной таблице получить данные из другой (Формулы/Formulas)
Как в одной таблице получить данные из другой
ldbaikal20202131 Дата: Среда, 29.11.2023, 05:25 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 1
Репутация: 0 ±
Замечаний: 0% ±

2019
Всем привет. Прошу помочь. Как в одной таблице получить данные из другой так чтоб данные из столбца одной выводились в строку в другой с помощью формул и чтоб при добавлении в 1-ю таблицу данных, автоматически добавлялись данные во 2-ю?
Для понимания прилагаю две таблички на двух станицах с уже готовым результатом, сделанные без формул.
Заранее, благодарю за помощь.
К сообщению приложен файл: kniga1.xlsx (11.4 Kb)
 
Ответить
СообщениеВсем привет. Прошу помочь. Как в одной таблице получить данные из другой так чтоб данные из столбца одной выводились в строку в другой с помощью формул и чтоб при добавлении в 1-ю таблицу данных, автоматически добавлялись данные во 2-ю?
Для понимания прилагаю две таблички на двух станицах с уже готовым результатом, сделанные без формул.
Заранее, благодарю за помощь.

Автор - ldbaikal20202131
Дата добавления - 29.11.2023 в 05:25
Nic70y Дата: Среда, 29.11.2023, 11:15 | Сообщение № 2
Группа: Друзья
Ранг: Экселист
Сообщений: 8649
Репутация: 2207 ±
Замечаний: 0% ±

Excel 2010
с доп.столбами
К сообщению приложен файл: 18.xlsx (13.1 Kb)


ЮMoney 41001841029809
 
Ответить
Сообщениес доп.столбами

Автор - Nic70y
Дата добавления - 29.11.2023 в 11:15
bigor Дата: Среда, 29.11.2023, 11:16 | Сообщение № 3
Группа: Проверенные
Ранг: Старожил
Сообщений: 1015
Репутация: 195 ±
Замечаний: 0% ±

нет
ldbaikal20202131,
для поиска уникальных
Код
=INDEX('1 таблица - источник'.$C$2:$C$30;SMALL(IF(MATCH('1 таблица - источник'.$C$2:$C$30;'1 таблица - источник'.$C$2:$C$30;0)='1 таблица - источник'.$A$2:$A$30;MATCH('1 таблица - источник'.$C$2:$C$30;'1 таблица - источник'.$C$2:$C$30;0);"");ROW(A1)))

Для вытаскивания каталогов
Код
=IFERROR(INDEX('1 таблица - источник'.$B$2:$B$30;SMALL(IF($B10='1 таблица - источник'.$C$2:$C$30;ROW('1 таблица - источник'.$B$2:$B$30)-1;"");COLUMN(A1)));"")
К сообщению приложен файл: mir_ldbaikal20202131_1.xlsx (8.9 Kb)
 
Ответить
Сообщениеldbaikal20202131,
для поиска уникальных
Код
=INDEX('1 таблица - источник'.$C$2:$C$30;SMALL(IF(MATCH('1 таблица - источник'.$C$2:$C$30;'1 таблица - источник'.$C$2:$C$30;0)='1 таблица - источник'.$A$2:$A$30;MATCH('1 таблица - источник'.$C$2:$C$30;'1 таблица - источник'.$C$2:$C$30;0);"");ROW(A1)))

Для вытаскивания каталогов
Код
=IFERROR(INDEX('1 таблица - источник'.$B$2:$B$30;SMALL(IF($B10='1 таблица - источник'.$C$2:$C$30;ROW('1 таблица - источник'.$B$2:$B$30)-1;"");COLUMN(A1)));"")

Автор - bigor
Дата добавления - 29.11.2023 в 11:16
Месник Дата: Среда, 29.11.2023, 15:10 | Сообщение № 4
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

2021
Всем, большое спасибо, особенно: bigor и Nic70y.
Сам бы я ни за что не смог это сделать.
 
Ответить
СообщениеВсем, большое спасибо, особенно: bigor и Nic70y.
Сам бы я ни за что не смог это сделать.

Автор - Месник
Дата добавления - 29.11.2023 в 15:10
Месник Дата: Среда, 29.11.2023, 16:04 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

2021
Вопрос вам можно задать?
Мне надо так сделать, чтоб при добавлении в 1-ю таблицу, соответствующая информация появлялась во второй, но с такими формулами как сейчас, это не получается, тем более я так понимаю, что заморожены именно только эти значения: $C$2:$C$30 и $A$2:$A$30 и $B$2:$B$30, значит только с ними и работает формула. Возможно всё таки сделать так как я хочу или нет?


Сообщение отредактировал Месник - Среда, 29.11.2023, 16:05
 
Ответить
СообщениеВопрос вам можно задать?
Мне надо так сделать, чтоб при добавлении в 1-ю таблицу, соответствующая информация появлялась во второй, но с такими формулами как сейчас, это не получается, тем более я так понимаю, что заморожены именно только эти значения: $C$2:$C$30 и $A$2:$A$30 и $B$2:$B$30, значит только с ними и работает формула. Возможно всё таки сделать так как я хочу или нет?

Автор - Месник
Дата добавления - 29.11.2023 в 16:04
Nic70y Дата: Среда, 29.11.2023, 16:53 | Сообщение № 6
Группа: Друзья
Ранг: Экселист
Сообщений: 8649
Репутация: 2207 ±
Замечаний: 0% ±

Excel 2010
может макрос подойдет
[vba]
Код
Sub u_75()
    Application.ScreenUpdating = False
    Sheets("2-я таблица - результат").UsedRange.Clear
    a = Cells(Rows.Count, "a").End(xlUp).Row
        g = 3
    For b = 2 To a
        c = Range("c" & b).Value
        d = Application.Match(c, Sheets("2-я таблица - результат").Range("b:b"), 0)
        If IsNumeric(d) Then
            f = Sheets("2-я таблица - результат").Cells(d, Columns.Count).End(xlToLeft).Column + 1
            Sheets("2-я таблица - результат").Cells(d, f) = Range("b" & b).Value
            If f > g Then g = f
        Else
            e = Sheets("2-я таблица - результат").Cells(Rows.Count, "a").End(xlUp).Row + 1
            Sheets("2-я таблица - результат").Range("a" & e) = Sheets("2-я таблица - результат").Range("a" & e - 1) + 1
            Sheets("2-я таблица - результат").Range("b" & e) = "'" & Range("c" & b).Value
            Sheets("2-я таблица - результат").Range("c" & e) = Range("b" & b).Value
        End If
    Next
    Sheets("2-я таблица - результат").Range(Sheets("2-я таблица - результат").Cells(1, 3), Sheets("2-я таблица - результат").Cells(1, g)) = "№ каталога"
    Sheets("2-я таблица - результат").Range("a1") = "№ поз"
    Sheets("2-я таблица - результат").Range("b1") = "шифр"
    With Sheets("2-я таблица - результат").Range(Sheets("2-я таблица - результат").Cells(1, 1), Sheets("2-я таблица - результат").Cells(1, g))
        .Font.Bold = True
        .HorizontalAlignment = xlCenter
        .VerticalAlignment = xlCenter
        .WrapText = True
    End With
    Application.ScreenUpdating = True
End Sub
[/vba]
К сообщению приложен файл: kniga1.xlsm (22.0 Kb)


ЮMoney 41001841029809
 
Ответить
Сообщениеможет макрос подойдет
[vba]
Код
Sub u_75()
    Application.ScreenUpdating = False
    Sheets("2-я таблица - результат").UsedRange.Clear
    a = Cells(Rows.Count, "a").End(xlUp).Row
        g = 3
    For b = 2 To a
        c = Range("c" & b).Value
        d = Application.Match(c, Sheets("2-я таблица - результат").Range("b:b"), 0)
        If IsNumeric(d) Then
            f = Sheets("2-я таблица - результат").Cells(d, Columns.Count).End(xlToLeft).Column + 1
            Sheets("2-я таблица - результат").Cells(d, f) = Range("b" & b).Value
            If f > g Then g = f
        Else
            e = Sheets("2-я таблица - результат").Cells(Rows.Count, "a").End(xlUp).Row + 1
            Sheets("2-я таблица - результат").Range("a" & e) = Sheets("2-я таблица - результат").Range("a" & e - 1) + 1
            Sheets("2-я таблица - результат").Range("b" & e) = "'" & Range("c" & b).Value
            Sheets("2-я таблица - результат").Range("c" & e) = Range("b" & b).Value
        End If
    Next
    Sheets("2-я таблица - результат").Range(Sheets("2-я таблица - результат").Cells(1, 3), Sheets("2-я таблица - результат").Cells(1, g)) = "№ каталога"
    Sheets("2-я таблица - результат").Range("a1") = "№ поз"
    Sheets("2-я таблица - результат").Range("b1") = "шифр"
    With Sheets("2-я таблица - результат").Range(Sheets("2-я таблица - результат").Cells(1, 1), Sheets("2-я таблица - результат").Cells(1, g))
        .Font.Bold = True
        .HorizontalAlignment = xlCenter
        .VerticalAlignment = xlCenter
        .WrapText = True
    End With
    Application.ScreenUpdating = True
End Sub
[/vba]

Автор - Nic70y
Дата добавления - 29.11.2023 в 16:53
bigor Дата: Среда, 29.11.2023, 16:54 | Сообщение № 7
Группа: Проверенные
Ранг: Старожил
Сообщений: 1015
Репутация: 195 ±
Замечаний: 0% ±

нет
Возможно всё таки сделать так как я хочу
возможно
Поправил файл, теперь до 100 строки, если нужно больше, то меняете все 100 на нужное значение, и на первом листе, протягиваете формулу в столбце C сколько нужно.
ps у вас 2021 офис, там уже есть =фильтр() и первая формула сильно укорачивается с ним
К сообщению приложен файл: 8569580.xlsx (10.6 Kb)
 
Ответить
Сообщение
Возможно всё таки сделать так как я хочу
возможно
Поправил файл, теперь до 100 строки, если нужно больше, то меняете все 100 на нужное значение, и на первом листе, протягиваете формулу в столбце C сколько нужно.
ps у вас 2021 офис, там уже есть =фильтр() и первая формула сильно укорачивается с ним

Автор - bigor
Дата добавления - 29.11.2023 в 16:54
Месник Дата: Среда, 29.11.2023, 17:09 | Сообщение № 8
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

2021
Nic70y, Кстати у вас в отличии от решения bigor, можно добавлять в первую таблицу данные и они автоматически появятся во второй таблице. Но как можно сделать так, чтоб я мог в первую таблицу добавлять информацию сверху, в 1-ю строку, а во второй таблице эта информация появлялась снизу, в последней строке?
 
Ответить
СообщениеNic70y, Кстати у вас в отличии от решения bigor, можно добавлять в первую таблицу данные и они автоматически появятся во второй таблице. Но как можно сделать так, чтоб я мог в первую таблицу добавлять информацию сверху, в 1-ю строку, а во второй таблице эта информация появлялась снизу, в последней строке?

Автор - Месник
Дата добавления - 29.11.2023 в 17:09
Nic70y Дата: Среда, 29.11.2023, 17:13 | Сообщение № 9
Группа: Друзья
Ранг: Экселист
Сообщений: 8649
Репутация: 2207 ±
Замечаний: 0% ±

Excel 2010
сверху, в 1-ю строку, а во второй таблице эта информация появлялась снизу, в последней строке?
ну это точно макросом, но смогу написать только завтра,
т.к. заканчивается рабочий день,
а дома нельзя пользоваться экселем - только пить водку.


ЮMoney 41001841029809
 
Ответить
Сообщение
сверху, в 1-ю строку, а во второй таблице эта информация появлялась снизу, в последней строке?
ну это точно макросом, но смогу написать только завтра,
т.к. заканчивается рабочий день,
а дома нельзя пользоваться экселем - только пить водку.

Автор - Nic70y
Дата добавления - 29.11.2023 в 17:13
Месник Дата: Среда, 29.11.2023, 17:18 | Сообщение № 10
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

2021
bigor, при удалении любой строки в 1-й таблице, всё исчезает во 2-й, этого никак не избежать? и можно сделать так, чтоб я мог в первую таблицу добавлять информацию сверху, в 1-ю строку, а во второй таблице эта информация появлялась снизу, в последней строке?
 
Ответить
Сообщениеbigor, при удалении любой строки в 1-й таблице, всё исчезает во 2-й, этого никак не избежать? и можно сделать так, чтоб я мог в первую таблицу добавлять информацию сверху, в 1-ю строку, а во второй таблице эта информация появлялась снизу, в последней строке?

Автор - Месник
Дата добавления - 29.11.2023 в 17:18
bigor Дата: Среда, 29.11.2023, 17:22 | Сообщение № 11
Группа: Проверенные
Ранг: Старожил
Сообщений: 1015
Репутация: 195 ±
Замечаний: 0% ±

нет
этого никак не избежать?
формулами нельзя, и второй вопрос формулами не решить.
ps вы оговорите все условия, а то завтра Nic70y макрос напишет, а окажется если вы во вторую строку данные вводите, нужно что бы они в предпоследней появились или еще чего.


Сообщение отредактировал bigor - Среда, 29.11.2023, 17:28
 
Ответить
Сообщение
этого никак не избежать?
формулами нельзя, и второй вопрос формулами не решить.
ps вы оговорите все условия, а то завтра Nic70y макрос напишет, а окажется если вы во вторую строку данные вводите, нужно что бы они в предпоследней появились или еще чего.

Автор - bigor
Дата добавления - 29.11.2023 в 17:22
Месник Дата: Среда, 29.11.2023, 17:28 | Сообщение № 12
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

2021
bigor, Ясно, но и на этом большое спасибо. :ok:
 
Ответить
Сообщениеbigor, Ясно, но и на этом большое спасибо. :ok:

Автор - Месник
Дата добавления - 29.11.2023 в 17:28
Месник Дата: Среда, 29.11.2023, 17:29 | Сообщение № 13
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

2021
Nic70y, Большое спасибо, ничего, подождём. :ok:
 
Ответить
СообщениеNic70y, Большое спасибо, ничего, подождём. :ok:

Автор - Месник
Дата добавления - 29.11.2023 в 17:29
Месник Дата: Среда, 29.11.2023, 17:48 | Сообщение № 14
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

2021
Nic70y, hands Спасибо БОЛЬШОЕ, очень и очень помогли. Теперь мне надо разобраться как этот макрос вставить в другие документы.
 
Ответить
СообщениеNic70y, hands Спасибо БОЛЬШОЕ, очень и очень помогли. Теперь мне надо разобраться как этот макрос вставить в другие документы.

Автор - Месник
Дата добавления - 29.11.2023 в 17:48
Nic70y Дата: Четверг, 30.11.2023, 09:27 | Сообщение № 15
Группа: Друзья
Ранг: Экселист
Сообщений: 8649
Репутация: 2207 ±
Замечаний: 0% ±

Excel 2010
как этот макрос вставить в другие документы

1) сохраните файл как:
тип файла: книга с поддержкой макросов
или - двоичная книга
2) нажмите Alt+F11
3) см. картинку

4) в созданный модуль скопипастить макросы
5) "2-я таблица - результат" заменить на правильное имя листа
6) нарисовать кнопки и присвоить им макросы

макросы в файле
К сообщению приложен файл: 19.xlsm (27.2 Kb) · 4921291.gif (16.1 Kb)


ЮMoney 41001841029809

Сообщение отредактировал Nic70y - Четверг, 30.11.2023, 09:29
 
Ответить
Сообщение
как этот макрос вставить в другие документы

1) сохраните файл как:
тип файла: книга с поддержкой макросов
или - двоичная книга
2) нажмите Alt+F11
3) см. картинку

4) в созданный модуль скопипастить макросы
5) "2-я таблица - результат" заменить на правильное имя листа
6) нарисовать кнопки и присвоить им макросы

макросы в файле

Автор - Nic70y
Дата добавления - 30.11.2023 в 09:27
Месник Дата: Четверг, 30.11.2023, 15:52 | Сообщение № 16
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

2021
Nic70y, СПАСИБО ВАМ БОЛЬШОЕ. Буду пробовать, никогда этим не занимался. :ok:
 
Ответить
СообщениеNic70y, СПАСИБО ВАМ БОЛЬШОЕ. Буду пробовать, никогда этим не занимался. :ok:

Автор - Месник
Дата добавления - 30.11.2023 в 15:52
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Как в одной таблице получить данные из другой (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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