powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Не могу получить значение ячейки
9 сообщений из 9, страница 1 из 1
Не могу получить значение ячейки
    #36140703
daunito
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не пинайте сильно, VBA в руки не брал со школы. Надо в макросе перебрать все значения столбца, чтобы найти максимальный, пишу так
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Sub MySuperMacroc()
 Const Items =  30 
 Dim Cel(Items) As Integer
 Max = Worksheets( 1 ).Cells( 2 ,  4 ).Value
 For Each Item In ActiveSheet.Range(Cells( 2 ,  4 ), Cells(Items +  1 ,  4 ))
  If Item.Value > Max Then Max = Item
 Next
End Sub
но на строке Max = Worksheets(1).Cells(2, 4).Value, точнее после ее выполнения Max=empty. Почему? где я косячу?
...
Рейтинг: 0 / 0
Не могу получить значение ячейки
    #36140723
Эксперементатор
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вы уверены, что ячейка Д2 не пустая?
...
Рейтинг: 0 / 0
Не могу получить значение ячейки
    #36140860
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Поиск максимума в A1:A10.
Код: plaintext
Application.WorksheetFunction.Max(range("A1:A10"))
...
Рейтинг: 0 / 0
Не могу получить значение ячейки
    #36141134
daunito
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ЭксперементаторВы уверены, что ячейка Д2 не пустая? огромное тебе спасибо! Перепутал колонку
...
Рейтинг: 0 / 0
Не могу получить значение ячейки
    #36141253
daunito
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
big-dukeПоиск максимума в A1:A10.
Код: plaintext
Application.WorksheetFunction.Max(range("A1:A10"))
я знаю. Короче, мне надо загнать весь столбец в массив в порядке убывания, чтобы составить рейтинг. А рядом с каждым значением из первоначального столбца поставить место, которое он занимает. Если есть идеи получше - буду рад
...
Рейтинг: 0 / 0
Не могу получить значение ячейки
    #36141393
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
daunito,

есть функция Rank();
...
Рейтинг: 0 / 0
Не могу получить значение ячейки
    #36141397
Фотография qwrqwr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
daunitoА рядом с каждым значением из первоначального столбца поставить место, которое он занимает. Если есть идеи получше - буду раднапишите в B1 формулу =RANK(A1;A:A) и протяните её вниз.
...
Рейтинг: 0 / 0
Не могу получить значение ячейки
    #36141947
daunito
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ранг работает наоборот, мне надо чтобы первое место было у того, у кого меньше значение. Пробовал сделать max-rank(...), где max - количество записей, но если есть записи с одинаковым рангом, то работает не правильно. Может есть такая функция? А то уже думаю сделать значения обратными (не 1739, а 1/1739) и после этого считать ранг.
...
Рейтинг: 0 / 0
Не могу получить значение ячейки
    #36142033
Фотография qwrqwr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
daunitoРанг работает наоборот, мне надо чтобы первое место было у того, у кого меньше значение. Пробовал сделать max-rank(...), где max - количество записей, но если есть записи с одинаковым рангом, то работает не правильно. Может есть такая функция? А то уже думаю сделать значения обратными (не 1739, а 1/1739) и после этого считать ранг.есть еще 1 вариант - прочитать встроенную справку :)
F1Syntax

RANK(number,ref,order)

Number is the number whose rank you want to find.

Ref is an array of, or a reference to, a list of numbers. Nonnumeric values in ref are ignored.

Order is a number specifying how to rank number.

If order is 0 (zero) or omitted, Microsoft Excel ranks number as if ref were a list sorted in descending order.
If order is any nonzero value, Microsoft Excel ranks number as if ref were a list sorted in ascending order. =RANK(A1;A:A;1)
...
Рейтинг: 0 / 0
9 сообщений из 9, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Не могу получить значение ячейки
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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