Релиб / Программирование / VBA / Как передать условие в оператор IF / Latest Posts

RE: Как передать условие в оператор IF

rank1 — Mon, 26 Nov 2007 17:52:52 GMT

Модуль 1:
Option Explicit

Sub UsingScriptControl()
'Подключите Microsoft Script Control 1.0 в References
Dim x As New ScriptControl
x.Language = "VbScript"
Dim stg As StorageClass
Set stg = New StorageClass
stg.a = 1
stg.b = 2
stg.c = 3
x.AddObject "St", stg, True
MsgBox x.Eval("a+b+c") 'Вычислили динамически

End Sub
Класс StorageClass:
Option Explicit
Public a, b, c

RE: Как передать условие в оператор IF

Excel — Thu, 01 Nov 2007 13:02:29 GMT

PS: Форум зверски глючит и не хочет принимать больше одного предложения в пост. Буду благодарен за ответы на мыло: aleko101[гав-гав]yandex.ru

RE: Как передать условие в оператор IF

Excel — Thu, 01 Nov 2007 13:01:03 GMT

Если имеется ввиду VBIDE, то не хотелось бы связываться с безопасностью (Excel 2003).
Неужели нет другого способа?

RE: Как передать условие в оператор IF

Excel — Thu, 01 Nov 2007 13:00:21 GMT

[quote][b]Gacol (31.10.2007)[/b][hr]Можно добавлять Str в строку кода. Правда переменныеиспользуемые в строке должны быть глобальными.[/quote]

RE: Как передать условие в оператор IF

Excel — Thu, 01 Nov 2007 12:59:33 GMT

Идеально было бы составить строку из полного условия (поропустив пустые ячейки), а затем подкинуть его оператору IF.
Но как?....

RE: Как передать условие в оператор IF

Excel — Thu, 01 Nov 2007 12:58:54 GMT

Следовательно нужно каждый раз проверять IsEmpty.А это время.

RE: Как передать условие в оператор IF

Excel — Thu, 01 Nov 2007 12:58:13 GMT

Тупое
If cells(row,1)[в источнике]=cells(2,1)[условие]
не совсем подходит, т к cells(2,1)[условие] может быть и пустой ячейкой.

RE: Как передать условие в оператор IF

Excel — Thu, 01 Nov 2007 12:57:11 GMT

А там их обычно будет больше половины (пользователю ведь не всегда нужен фильтр сразу по всем столбцам да ещё и нескольким условиям по столбцу)

RE: Как передать условие в оператор IF

Excel — Thu, 01 Nov 2007 12:56:38 GMT

Так вот: необходимо просто из всех вписанных условий составить типа запрос.
Причём пропуская все пустые ячейки из таблицы(условий).

RE: Как передать условие в оператор IF

Excel — Thu, 01 Nov 2007 12:55:36 GMT

К тому-же в таблице-источнике присутсвуют объединённые ячейки, с которыми встроенный фильтр в моём случае работает некорректно.