Функция Если подскажите начинающему

Программирование на Visual Basic for Applications
Kesar
Начинающий
Начинающий
 
Сообщения: 15
Зарегистрирован: 04.04.2007 (Ср) 7:58
Откуда: Екатеринбург

Функция Если подскажите начинающему

Сообщение Kesar » 04.04.2007 (Ср) 8:17

Есть список в Экселе нужно возпользоваться функцией Если
поидее проще простого но не работает
А В С D
Nokia N73-1 Music Edition 500 441.98 500.00
Nokia N91-2 Black 587 441.98 587.00
Samsung SGH-C300 Черный 79 72.05 79.00
Samsung SGH-P310 Черный 360 333.71 360.00

Если в столбце А слово Samsung присутствует то берется значение из столбца В Если нет такого слова то из столбца С

Формулу написал в столбце D =ЕСЛИ(A1<>"Samsung";С1;ЕСЛИ(A1="Samsung";B1)) и такая формула =ЕСЛИ(A1="Samsung";B1;C1))

но они не работают не пойму почему
помогите кто может кто может помогите

Viper
Артефакт VBStreets
Артефакт VBStreets
Аватара пользователя
 
Сообщения: 4394
Зарегистрирован: 12.04.2005 (Вт) 17:50
Откуда: Н.Новгород

Сообщение Viper » 04.04.2007 (Ср) 8:47

А Samsung то небось с добавкой в ячейке "Samsung SGH-C300"?
Весь мир матрица, а мы в нем потоки байтов!

Pavel55
Обычный пользователь
Обычный пользователь
 
Сообщения: 90
Зарегистрирован: 27.10.2006 (Пт) 20:11

Сообщение Pavel55 » 04.04.2007 (Ср) 9:19

может быть "*Samsung*" ?

Kesar
Начинающий
Начинающий
 
Сообщения: 15
Зарегистрирован: 04.04.2007 (Ср) 7:58
Откуда: Екатеринбург

Сообщение Kesar » 04.04.2007 (Ср) 9:23

пробовал

Kesar
Начинающий
Начинающий
 
Сообщения: 15
Зарегистрирован: 04.04.2007 (Ср) 7:58
Откуда: Екатеринбург

Сообщение Kesar » 04.04.2007 (Ср) 9:26

помогает только функция Найти("SAMSUNG";A1) но при этом где его нет сразу же ставиться #ЗНАЧ!

Kesar
Начинающий
Начинающий
 
Сообщения: 15
Зарегистрирован: 04.04.2007 (Ср) 7:58
Откуда: Екатеринбург

Сообщение Kesar » 04.04.2007 (Ср) 9:42

Разобрался
=ЕСЛИ(B91<="Samsung";AE91;G91)

нехватало <

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 04.04.2007 (Ср) 9:53

Вообще-то ты не разобрался совершенно.
Но ты и не хочешь разбираться.
Lasciate ogni speranza, voi ch'entrate.

Pavel55
Обычный пользователь
Обычный пользователь
 
Сообщения: 90
Зарегистрирован: 27.10.2006 (Пт) 20:11

Сообщение Pavel55 » 04.04.2007 (Ср) 9:58

А может функцую ? ))

Код: Выделить всё
Option Compare Text 'добавить в самый верх модуля

Function MyCheck(CheckCell As Range, iWord As String, iTrue As Range, iFalse As Range) As String 'или double, если в столбцах B и С числа
    If CheckCell Like "*" & iWord & "*" Then
        MyCheck = iTrue
    Else
        MyCheck = iFalse
    End If
End Function

Чудовище под кроватью
Обычный пользователь
Обычный пользователь
 
Сообщения: 88
Зарегистрирован: 27.11.2006 (Пн) 14:46
Откуда: А из ника не ясно?

Сообщение Чудовище под кроватью » 04.04.2007 (Ср) 10:59

=ЕСЛИ(НАЙТИ("samsung";A1);B1:C1)
У-у-у!!

Pavel55
Обычный пользователь
Обычный пользователь
 
Сообщения: 90
Зарегистрирован: 27.10.2006 (Пт) 20:11

Сообщение Pavel55 » 04.04.2007 (Ср) 11:13

Чудовище под кроватью писал(а):=ЕСЛИ(НАЙТИ("samsung";A1);B1:C1)

У мя выдаёт #ЗНАЧ! везде и у вас там двоеточие между B1 и С1

Добавлено:
аа, эта функция чувствительна к регистру, поэтому #ЗНАЧ!


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот и гости: 81

    TopList