Объекты в VBA (Excel)

@dimok5 · Регистрация: 04.10.2010

Author24 — интернет-сервис помощи студентам

Разработать подпрограмму нахождения в выделенном диапазоне рабочей таблицы максимального и минимального значения по строкам и по столбцам. Элементы массива задать самостоятельно через функцию Inputbox.

Ввод элементов массива получился, но как найти максимальное и минимальное значения в выделенном диапазоне рабочей таблицы я не знаю:

Visual Basic

Public Sub r()
Dim stl As Integer
Dim str As Integer
Dim i As Integer
Dim j As Integer
stl = InputBox("Введите количество столбцов")
str = InputBox("Введите количество строк")
For i = 1 To stl
For j = 1 To str
Sheets("Лист1").Cells(i, j) = InputBox("Введите" & j & "элемент" & i & "строки")
Next j
Next i
End Sub

@Alex77755 · 23.02.2011, 22:01

dimok5,
Функция определена для несвязанных диапазонов до 30 штук.
В том числе и для одиночных ячеек
Ничто не мешает выбрать связанный диапазон

Можно вызвать так:

Visual Basic

1
2
3

Sub Кнопка1_Щелкнуть()
MsgBox Min_D(Selection)
End Sub

@~~Busine2009~~ · 23.02.2011, 22:12

dimok5,
можно для выделения диапазона ячеек во время выполнения кода использовать метод InputBox (не путайте с функцией).

@dimok5 · 23.02.2011, 22:39 **[ТС]**

Метод InputBox??? Впервые слышу

И в чём заключается этот метод???

Добавлено через 3 минуты

Сообщение от Alex77755

dimok5,
Функция определена для несвязанных диапазонов до 30 штук.
В том числе и для одиночных ячеек
Ничто не мешает выбрать связанный диапазон

Можно вызвать так:

Visual Basic

1
2
3

Sub Кнопка1_Щелкнуть()
MsgBox Min_D(Selection)
End Sub

Попробую и этот код, может больше понравиться

@~~Busine2009~~ · 23.02.2011, 22:50

dimok5,
учебник какой-нибудь есть по VBA в Excel?

@dimok5 · 23.02.2011, 22:57 **[ТС]**

Сообщение от Busine2009

dimok5,
учебник какой-нибудь есть по VBA в Excel?

Эм, лекции по VBA в размере 50 страниц....

@~~Busine2009~~ · 23.02.2011, 23:00

dimok5,
значит вам и не нужно знать, что такое метод InputBox, раз у вас нет его в лекциях. Поэтому разбивайте код на 2 части, как я уже писал.

@dimok5 · 23.02.2011, 23:04 **[ТС]**

Ну ладно, и на этом спасибо

@mlab · 20.10.2011, 18:13

Объект Application. Метод InputBox.
expression.InputBox(Prompt, Title, Default, Left, Top, HelpFile, HelpContextID, Type)

@dimok5 2 / 2 / 1 Регистрация: 04.10.2010 Сообщений: 85
	23.02.2011, 22:57 [ТС]	25
	Сообщение от Busine2009 dimok5, учебник какой-нибудь есть по VBA в Excel? Эм, лекции по VBA в размере 50 страниц.... 0

@~~Busine2009~~ Заблокирован
	23.02.2011, 23:00	26
	dimok5, значит вам и не нужно знать, что такое метод InputBox, раз у вас нет его в лекциях. Поэтому разбивайте код на 2 части, как я уже писал. 0

@dimok5 2 / 2 / 1 Регистрация: 04.10.2010 Сообщений: 85
	23.02.2011, 23:04 [ТС]	27
	Ну ладно, и на этом спасибо 0

@mlab 0 / 0 / 0 Регистрация: 12.09.2017 Сообщений: 1
	20.10.2011, 18:13	28
	Объект Application. Метод InputBox. expression.InputBox(Prompt, Title, Default, Left, Top, HelpFile, HelpContextID, Type) 0

@~~Busine2009~~ Заблокирован
	23.02.2011, 22:12	22
	dimok5, можно для выделения диапазона ячеек во время выполнения кода использовать метод InputBox (не путайте с функцией). 1

@~~Busine2009~~ Заблокирован
	23.02.2011, 22:50	24
	dimok5, учебник какой-нибудь есть по VBA в Excel? 0