Официальный сайт студ.городка НГТУ
Программирование и БД » [Excel] Взять значение ячейки 

#1  29.07.09 21:01

[Excel] Взять значение ячейки

Подскажите пожалуйста, как в экселе, средствами экселя(не VB) взять значение крайней справа ячейки в строке, имеющей значение.

 

#2  29.07.09 21:10

Re: [Excel] Взять значение ячейки

Реализовал так
=ЕСЛИ(адрес_ячейки="";ЕСЛИ(адрес_ячейки-1="";ЕСЛИ(адрес_ячейки-2 ="";ЕСЛИ(адрес_ячейки-3="";адрес_ячейки-4;адрес_ячейки-3);адрес_ячейки-2);адрес_ячейки-1);адрес_ячейки)

но тут проблема, функция должна быть способной взять значение в строке где 30 ячеек. Т.е. если использовать мое решение, то будет 30 вложений ЕСЛИ в ЕСЛИ, что нельзя реализовать ибо эксель поддерживает только 7-8 уровней вложения. Помогите плиз.

 

#3  01.08.09 19:55

Re: [Excel] Взять значение ячейки

ну, делаешь ссылку на другую ячейку, а в другой еще 8 вложений...

но для личного компа все равно удобней юзать VB в нормалдоте.

Offline

#4  01.08.09 21:40

Re: [Excel] Взять значение ячейки

drug_detei, спасибо, а ларчик просто открывался:) ВБ юзать не умею, ибо не программер.

 

#5  02.08.09 09:35

Re: [Excel] Взять значение ячейки

Если вдруг захочешь стать крутым программером:) Этот код поместить кликнув правой на имени листа и в контекстном меню выбрать "Исходный текст"

Код: vb:

'Вызывается при переходе от одной ячейки к другой:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 
   Dim i As Integer
 
   'Идем справа налево. Для столбцов с 30 (то есть AD) по 1 (то есть A)
   For i = 30 To 1 Step -1
 
      'Для первой строки. Если значение не пустое, то...
      If ActiveSheet.Cells(1, i).Value <> "" Then
 
         'выводим значение в месиджбоксе
         MsgBox ("Последнее значение " & ActiveSheet.Cells(1, i).Value)
         'Записываем значение в A2
         ActiveSheet.Cells(2, "A").Value = ActiveSheet.Cells(1, i).Value
         ' и выходим из цикла
         Exit For
 
      End If
 
   Next
 
End Sub

Исправлено drug_detei (02.08.09 10:30)

Offline

#6  02.08.09 11:17

Re: [Excel] Взять значение ячейки

drug_detei, разобрался. Прикольно. Еще раз спасибо.

 

Программирование и БД » [Excel] Взять значение ячейки 

ФутЕр:)

© Hostel Web Group, 2002-2025.   Сообщить об ошибке

Сгенерировано за 0.067 сек.
Выполнено 11 запросов.