Генерация строки с конкретными значениями в диапазоне ячеек в Excel

Question

Например, у меня есть 4 ячейки на листе «данные» с некоторыми данными, как ниже

 ----------------------------
 Param1|Param2|Param3|Param4|
 ----------------------------
 Value1|Value2|Value3|Value4|

И я поместил кнопку в этой же книге, чтобы сгенерировать строку с этими значениями в соответствии с этим конкретным форматом (иллюстративным):

cmd.exe "-Value1-Value2-Value3-Value4-"

Но мне нужно поместить эту сгенерированную строку во многие ячейки в другом листе согласно конкретные условия, связанные со значением в другой ячейке, например

-----------------------------------------------------
description | lorem ipsun lorem ipsun lorem ipsun lor|
------------------------------------------------------
command     | cmd.exe "-Value1-Value2-Value3-Value4-"|
------------------------------------------------------
description2| abra cadabra                           |
------------------------------------------------------
command     | cmd.exe "-Value1-Value2-Value3-Value4-"|
------------------------------------------------------

Мне нужно поместить сгенерированную строку только в те строки, где ячейка А1 имеет значение «команда»

Может ли кто-нибудь помочь с этой проблемой, добавив код vba? Я не ленивый пользовательский интерфейс, но я думаю, что проще и эффективнее спросить на специализированном форуме, чем пытаться найти его в беспорядке на веб-сайтах, и решить эту проблему быстро

Большое спасибо

Answer 1

Вот некоторый (нерабочий!) Скелетный код для начала работы:

Sub Fill_In_These_Cells

    Dim InsertThis as string
    InsertThis = _
        activeworksheet.range("Value1'sRange") & "-" & _
        activeworksheet.range("Value2'sRange") & "-" & _
        activeworksheet.range("Value3'sRange") & "-" & _
        activeworksheet.range("Value4'sRange")

    Dim OutputRange as string
    OutputRange= "A1:B4"
    Dim i as integer
    For i = 1 to 4
        if activeworksheet.cells(i,1).value="Command" then _
            activeworksheet.cells(i,2).value=InsertThis
    Next i
End Sub

Я не знаю, что ответить, но Почему вы помещаете командные строки в файл Excel? И почему вы смешиваете их с другим текстом?

Редактировать

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