Объединение данных из разных ячеек

Вход

Регистрация

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

= Мир MS Excel/Объединение данных из разных ячеек - Мир MS Excel

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

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

Объединение данных из разных ячеек (Макросы/Sub)

Объединение данных из разных ячеек

Espada

Дата: Вторник, 06.12.2022, 16:33 | Сообщение № 1

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

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

Сообщений: 121

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

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

Доброго дня, помогите, пожалуйста с одной штукой... есть макрос, который копирует данные из одного файла в другой.
[vba]

Код

Workbooks.Open ("\\server2014\Справочник цен\Справочник цен.xlsm")
Workbooks(b).Sheets("Прайс").Range("B1:G5000").Value = Workbooks("Справочник цен.xlsm").Sheets("Прайс").Range("B3:G5000").Value

[/vba]
заполняются столбцы от B до G. А как ещё доработать этот код, что бы в столбце A были данные из столбца B и столбца G?
пример: B = Краска, G = 123, A = Краска - 123.

Ответить

_Boroda_

Дата: Вторник, 06.12.2022, 16:55 | Сообщение № 2

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

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

Сообщений: 16714

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

Замечаний: ±

2003; 2007; 2010; 2013 RUS

Вариантов несколько. Например, так
[vba]

Код

    With Range("A1:A5000")
        .FormulaR1C1 = "=RC[1]&""-""&RC[6]"
        .Value = .Value
    End With

[/vba]
Только обратите внимание, что в книге b у Вас диапазон 1:5000, а в справочнике 3:5000

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995

Ответить

Объединение данных из разных ячеек (Макросы/Sub)

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