Спасибо большое. Все очень понятно объяснили.  
Правда, не понял смысл двойного отрицания (Not Not).  
Если не затруднит, просветите.

{quote}{login=The_Prist}{date=06.06.2010 11:30}{thema=}{post}Впишите в ячейку А1 формулу:  
=НЕ(НЕ(A1=0))  
 
Вычислите её пошагово и все поймете.{/post}{/quote}  
 
Вписал в ячейку B1 формулу =НЕ(НЕ(A1=0)),  
в ячейку B2 формулу =A2=0.  
Поигрался с нулями,цифрами и пустотами - разницы в работе обеих формул не увидел.

Еще раз спасибо огромное.

{quote}{login=KuklP}{date=06.06.2010 01:27}{thema=Re: }{post}{quote}{login=The_Prist}{date=06.06.2010 12:22}{thema=}{post}  
В общем-то можно и так записать для достижения цели:  
(Not avArr) = 0    
{/post}{/quote}    
Дим, ты наверное хотел сказать  
(Not avArr) = -1 Then массив пустой{/post}{/quote}Нет, Сергей, я написал ровно то, что хотел.  
 
"В общем-то можно и так записать для достижения цели:  
(Not avArr) = 0    
Но все равно придется добавлять Not, чтобы было вроде как понятней(или поменять условия местами)."  
 
Это же конструкция сравнения. С нулем как-то смотрится более информативно.

Да, а Not(-1) как раз и дает 0.

Да нет же, Дим(вот я не умею так понятно объяснять как ты)  
Это константы:  
true в Exsel = -1  
False=0  
В твоей конструкции  (Not avArr) = 0 никогда не наступит, ибо для пустого массива  
(Not avArr) = -1  
Для непустого напрмер -2390769 (у меня эта цифра меняется).  
Поэтому твоя программа всегда будет выводить МСГ - "массив заполнен чем-то".

А, ну да. Чет я сразу не догнал.  
Но первый вариант - (Not Not avArr) = 0 - работает на ура! :-)

Извиняюсь, что вклиниваюсь в беседу, но у меня  
первый вариант The_Pristа If (Not Not avArr) = 0 Then  
прошел изумительно.

Вообще главная фишка такой проверки в том, что можно проверить даже неинициализированный массив. Т.к. неинициализированный массив при помощи UBound() не проверить - выдаст ошибку.

Массивы бывают разные.  
В частности, переменная типа Variant тоже может стать массивом,  
и в таком случае (Not Not Arr) = 0 глюканет.  
Пример:  
 
Sub Test1()  
 Dim a(), b  
 Debug.Print "a", (Not Not a) = 0  
 Debug.Print "b", (Not Not b) = 0  
 ReDim a(1 To 1)  
 ReDim b(1 To 1)  
 Debug.Print "a1", (Not Not a) = 0  
 Debug.Print "b1", (Not Not b) = 0 ‘ <-- выдает ошибку  
End Sub  
 
Это потому, что в переменной типа Variant хранится не указатель на массив, а указатель на указатель на массив :-)  
 
Поэтому надежнее так:  
 
Function IsArrayEmpty(x) As Boolean  
 Dim i&  
 On Error Resume Next  
 i = LBound(x)  
 IsArrayEmpty = Err <> 0  
End Function  
 
Sub Test2()  
 Dim a(), b  
 Debug.Print "a", IsArrayEmpty(a)  
 Debug.Print "b", IsArrayEmpty(b)  
 ReDim a(1 To 1)  
 ReDim b(1 To 1)  
 Debug.Print "a1", IsArrayEmpty(a)  
 Debug.Print "b1", IsArrayEmpty(b)  
End Sub

{quote}{login=ZVI}{date=06.06.2010 03:34}{thema=}{post}Массивы бывают разные.  
Поэтому надежнее так:  
{/post}{/quote}  
Тоже вкусно. Имхо такие фишки как:  
(Not Not avArr) = 0 (The_Prist)  
IsArrayEmpty = Err <> 0 (Ваша ZVI)  
If wsSh.Cells(1, 1).End(xlDown) <> "" (проверка на пустую строку от Слэн)  
и им подобные должны быть в приемах.  
Или, на худой конец, как писал вчера kim:  
"Пора копать землянку макросописателей/(писцев)...". Но это будет не так доступно(разве что беседку, избушку и землянку прилепить в начало форума. Мож как-то к тем 300 советам добавить(это я к модераторам)?

{quote}{login=ZVI}{date=06.06.2010 04:26}{thema=}{post}{quote}{login=Егор}{date=06.06.2010 04:20}{thema=}{post}В моем массиве каждый элемент это название,состоящее из 2-10 букв.  
(Not Not Arr) = 0 Когда-нибудь глюканет или не глюканет?{/post}{/quote}  
Не глюканет, если переменная Arr объявлена так: Dim Arr()  
Глюканет, если переменная Arr не будет никак объявлена, или если будет объявлена так: Dim Arr{/post}{/quote}  
 
Я объявил массив Dim Arr() As Variant в процедуре обработки события в юзерформе, а затем передал его в качестве аргумента в другую процедуру, которая находится в модуле. В модуле делаю проверку на пустой\непустой.  
Так считается , что я его объявил?