Помогите с макросом плиз

[damien666]

Всем привет, я полный ноль в VBA, но в универе задали задачку которую надо решить с помощью макроса:
"Имеется столбец целых чисел от 1 до 10 (высота столбца заранее неизвестна). Записать в ячейку B2 количество вхождений в столбец заданного числа X. Число X записано в ячейку B1."

нашел вот такой код

Sub Macroz()

On Error Resume Next
Dim cc As Range, se As Range, n As Long
Columns("B:C").Clear
Set se = Range(Cells(1, 1), Cells(Columns(1).Cells.Count, 1).End(xlUp))
For Each cc In se.Cells
If WorksheetFunction.CountIf(se, cc.Value) > 1 Then
If WorksheetFunction.CountIf(se.Offset (0, 1), cc.Value) < 1 Then
n = n + 1
Cells(n, 2) = cc.Value
Cells(n, 3) = WorksheetFunction.CountIf(se, cc.Value)
End If
End If
Next cc


End Sub

но он записывает все повторяющиеся числа в другой ячейке, а мне нужно
чтобы записывались количество повторений только заданного числа.
Подскажите пожалуйста что надо изменить в данном макросе или предложите свой вариант, заранее спасибо!

[SAS888]

Пусть в ячейке "B2" требуется подсчитать количество вхождений значения ячейки "B1" в столбец "A". Вот весь макрос:

Sub Main(): [B2] = Application.CountIf([A:A], [B1]): End Sub

[maks585]

Помогите пожалуйста с заданием, тоже в VBA не шарю, а уже зачетная неделя....

Кусочно-линейная функция f(x) представлена в виде таблицы, состоящей из двух одинаковых по высоте столбцов чисел. В первом столбце находятся значения x, во втором — значения f. Значения x строго монотонно возрастают. Высота столбцов n заранее неизвестна, но она точно больше одного (таким образом, задан как минимум один линейный участок). Создать третий столбец высоты n, содержащий значения интеграла от f(x) по x от самого первого значения x до текущего значения x.

Спасибо!

[Tison]

У меня токая же проблема, я дуб-дубом в этом, а сдать надо
ПОМОГИТЕ!!!!!!!!!!!!!!!!!!!!!!!! ПОЖАЛУЙСТА!!!!!!!!!!!
Задание у меня такое
Имеется столбец, состоящий из одного или более столбцов меньшей высоты, содержащих числа; соседние столбцы разделены между собой одной или более пустыми ячейками. Во второй столбец записать высоты этих столбцов.

[damien666]

Огромное Спасибо!

[EducatedFool]

Ввиду резко возросшей активности студентов-бездельников
темы, не содержащие своих наработок, будут закрываться.

В этом разделе форума помогают разобраться в Вашем решении, а не штампуют лабы одну за другой.

Нет желания делать работу самостоятельно - обращайтесь в раздел Фриланс (там Вам всегда помогут, но не бесплатно)
Нет желания платить - выкладывайте свои наработки, и говорите, что конкретно у Вас не получается.

Ну а если наработок нет, а Вам все же нужен совет профессионалов, - сразу указывайте цену, которую Вы готовы заплатить за решение.