Как повторить одно значение ячейки X раз в другой ячейке?

Question

У меня есть такой лист

Как выполнить цикл по столбцу A на основе столбца B и создать записи, разделенные запятымизаканчивающиеся -0, -1 .... в столбце C?

Answer 1

Используйте UDF.

Нажмите Alt + F11 , затем щелкните правой кнопкой мыши в столбце Project.Вставьте новый модуль и вставьте код в module1.

Public Function textMul(ByVal target As String, ByVal n As Long) As String
    Dim tmpStr As String
    Dim i As Long
    For i = 1 To n
        If tmpStr <> "" Then tmpStr = tmpStr & ", "
        tmpStr = tmpStr & target & "-" & i - 1
    Next i
    textMul = tmpStr
End Function

Затем вернитесь на рабочий лист, набрав textmul(A2,B2), и получите результат.