Объединить диапазон ячеек в одну ячейку и вставить значения в активную ячейку - VB
Формулировка задачи:
Доброе время суток!
Подскажите пожалуйста как это сделать?
Sub кнопка1_щелчок()
q = лист1.Cells(9, 1)
w = лист1.Cells(9, 2)
x = q & "," & w
ActiveCell.Cells = x
End Sub
вот на что хватило знаний :) но мне необходимо чтобы был диапазон ячеек в строке,
"сцепить" не предлагайте нужно макросом )
заранее большое спасибо
Подскажите пожалуйста как это сделать?
Sub кнопка1_щелчок()
q = лист1.Cells(9, 1)
w = лист1.Cells(9, 2)
x = q & "," & w
ActiveCell.Cells = x
End Sub
вот на что хватило знаний :) но мне необходимо чтобы был диапазон ячеек в строке,
"сцепить" не предлагайте нужно макросом )
заранее большое спасибо
Решение задачи: «Объединить диапазон ячеек в одну ячейку и вставить значения в активную ячейку»
textual
Листинг программы
activecell=join(application.index(range("A1:R1").value,1,0),",")
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д