powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Циклы с поиском пустой ячейки и вычислениями
1 сообщений из 1, страница 1 из 1
Циклы с поиском пустой ячейки и вычислениями
    #35684992
Юрий08
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Нужен ваш хелп!

Как написать формулу, здесь мне уже объяснили. Теперь хочу написать макрос.


Есть неизвестный диапазон ячеек в столбцах "А" "В" и "С". Но, предположим, на 25 строке столбца "А" и "В" пустые ячейки, в столбце "С" сумма по диапазону В1:В24. Надо посчитать процент в С1, С2 и т.д. от суммы в этом диапазоне (или от ячейки В25, что одно и тоже). Дальше снова идет неизвестный диапазон, где будут встречаться пустые ячейки и суммы напротив них. Кол-во строк в диапазонах не извесно.

Я смог написать только эту чать макроса. Как сделать, чтобы он искал пустую ячейку в данном диапазоне, брал сумму и делил на нее значения столбца "С"?

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Sub RaschetProcentov()

FinalRow = Cells( 65536 ,  2 ).End(xlUp).Row

    For i =  2  To FinalRow

If Cells(i,  1 ).Value <> "" Then
         
    Cells(i,  1 ).Offset( 0 ,  3 ).Value = Cells(i,  1 ).Offset( 0 ,  2 ) / на значение слева от пустой ячейки в соответсвующем диапазоне
   

End If

Next i

End Sub
...
Рейтинг: 0 / 0
1 сообщений из 1, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Циклы с поиском пустой ячейки и вычислениями
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]