Добавка к значениям ячеек в столбце - одинакового символа

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

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

Добавка к значениям ячеек в столбце - одинакового символа (Макросы/Sub)

radioamator

Дата: Среда, 06.03.2019, 14:27 | Сообщение № 1

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

Ранг: Новичок

Сообщений: 16

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

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

Excel 2016

Здравствуйте друзья.
Подскажите как перенести значения ячеек из одного столбца в другой, с добавкой к ним - одинакового символа с левой стороны.

Формулой это делается вот так:

Код

="*"&G4

Простое копирование диапазона - это макрос:

Код

[C4]=[G4]

А как макросом - скопировать содержимое диапазона G4:G16 - в диапазон C4:C16 с подобной добавкой символа * с левой стороны ?
Сам я что-то никак не могу до этого додуматься.

К сообщению приложен файл: 6702049.xls (31.0 Kb)

Сообщение отредактировал radioamator - Среда, 06.03.2019, 14:28

Ответить

китин

Дата: Среда, 06.03.2019, 14:52 | Сообщение № 2

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

Ранг: Экселист

Сообщений: 7029

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

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

Excel 2007;2010;2016

вот как то ( наспех писал, на коленке)
[vba]

Код

Sub ttttRR()
    Dim tt_&, i&
    tt_ = Cells(Rows.Count, 7).End(xlUp).Row

    For i = 4 To tt_
        Range("C" & i).Value = "*" & Range("G" & i).Value
    Next
End Sub

[/vba]