Вопрос по Макросам: свободно заполняемые массивы данных в формулах

[katherinebere]

Необходимо в рамках дипломной работы написать ряд макросов для Excel (2007, если что), так вот в них необходимо свободное заполнение данных, если так можно выразиться.
Понимаю, что звучит непонятно, поэтому объясню на примере:

=СУММ(C82:C98)

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

а можно ли записать ячейки так, чтобы выполнение макроса проводилось только с теми, которые выделяет пользователь (совершенно произвольно), например, не 16 ячеек, как я привела в примере, а только шесть ему сложить надо по нажатию кнопки макроса и не по вертикали, а по горизонтали они расположены.

пы.сы. формула суммы приведена для примере, знаю что такая кнопка есть)

уж помогите блондинке))))

[nilem]

Может быть, как-то так:

Sub сумма()
Dim RNG As Range

Set RNG = Application.InputBox("Выделите диапазон", Type:=8)
MsgBox "Сумма значаний ячеек в диапазоне " & _
    Application.WorksheetFunction.Sum(RNG)

End Sub

[katherinebere]

Может просто немного непонятно я выразилась...
вот пример моего макроса:

Sub Пример()
'
' Пример Макрос
'

'
    Range("G14").Select
    ActiveCell.FormulaR1C1 = "=CORREL(R[-3]C[-4]:R[12]C[-4],R[-3]C[-3]:R[12]C[-3])"
    
End Sub

но ячейки фиксированные.. хотя может я просто не до конца поняла предыдущего автора((

[motorway]

Работайте с Selection! Пример:

For Each cell In Selection
cell.Value = "1"
Next cell

[nilem]

Можно и Selection. А если 2 диапазона? Вот для корреляции:

Sub корреляция()
Dim rng1 As Range, rng2 As Range

Set rng1 = Application.InputBox("Выделите 1-й диапазон", Type:=8)
Set rng2 = Application.InputBox("Выделите 2-й диапазон", Type:=8)
    If rng1.Cells.Count <> rng2.Cells.Count Then MsgBox _
            "Диапазоны не совпадают": Exit Sub
[g14] = "=CORREL(" & rng1.Address & "," & rng2.Address & ")"
End Sub

По-моему, тот случай, когда "выполнение макроса проводилось только с теми, которые выделяет пользователь (совершенно произвольно)". Не так?

[motorway]

Если 2, можно запомнить сначала 1-ый Selection, потом второй. Дальше с ними работать. В общем, как больше нравится/подходит

[katherinebere]

Благодарю)
Я еще добавила "ActiveCell" и прописала условия отмены и все летает)