Как добавить в функцию Range2TXT еще один параметр?
Т.е. у меня есть диапазоны ячеек такого вида:
Параметр 1
Параметр 2
...
Параметр n
к нему присоединяется разделитель (ColumnsSeparator - у меня это "="), затем другой разделитель (RowsSeparator - у меня это ссылка на ячейку, значение в которой меняется (например "450")), а нужно присоединить еще один разделитель(","), чтобы в итоге получилось следующее:
Параметр 1=450, Параметр 2=450,..., Параметр n=450
При переписке с администратором excelvba.ru он написал, что "Проще новый макрос написать, чем переделывать эту функцию..." и дал ссылку на пример "http://excelvba.ru/XL_Files/Sample__11-02-2012__12-07-17.zip"
функцию прислал:
function parameters() as string
Dim param As Range, cell As Range
Set param = Range([A1], Range("A" & Rows.Count).End(xlUp))
v$ = Range("d2")
For Each cell In param.Cells
txt = txt & ", " & cell & "=" & v$
Next cell
parameters = Mid(txt, 3)
End Sub
как оформить это в виде Пользовательской функции, чтобы можно было выбирать все параметры (диапазоны ячеек, разделители)?
Т.е. у меня есть диапазоны ячеек такого вида:
Параметр 1
Параметр 2
...
Параметр n
к нему присоединяется разделитель (ColumnsSeparator - у меня это "="), затем другой разделитель (RowsSeparator - у меня это ссылка на ячейку, значение в которой меняется (например "450")), а нужно присоединить еще один разделитель(","), чтобы в итоге получилось следующее:
Параметр 1=450, Параметр 2=450,..., Параметр n=450
При переписке с администратором excelvba.ru он написал, что "Проще новый макрос написать, чем переделывать эту функцию..." и дал ссылку на пример "http://excelvba.ru/XL_Files/Sample__11-02-2012__12-07-17.zip"
функцию прислал:
function parameters() as string
Dim param As Range, cell As Range
Set param = Range([A1], Range("A" & Rows.Count).End(xlUp))
v$ = Range("d2")
For Each cell In param.Cells
txt = txt & ", " & cell & "=" & v$
Next cell
parameters = Mid(txt, 3)
End Sub
как оформить это в виде Пользовательской функции, чтобы можно было выбирать все параметры (диапазоны ячеек, разделители)?