{quote}{login=Kap}{date=26.05.2011 09:52}{thema=Функция которая возвращает значение}{post}Нужно написать функцию которая возвращает true или false в зависимости от результатов проверки  
Function proverka(i)  
if Cells(1,i)="" then msgbox("Пусто")  
End Function  
 
Что бы ее можно было так использовать  
 
a=proverka(10)  
if a=false then Exit sub  
Даже буквы знакомые встречаются!  
else ....{/post}{/quote}

Может так?  
 
Function proverka(i As Long) As Boolean  
proverka = Cells(1, i) = ""  
End Function  
 
'Использовать так:  
 
If proverka(10) Then  
   'действия если пусто  
Else  
   Exit Sub  
End If

Вот бредо функция она выдает ошибку при выполнении а мне нужно что бы она что то хоть возвращала.  
Мне просто понять как это работает дальше сам все сделаю.  
 
Private Sub Com(i, y)  
i = 2  
y = 2  
End Sub  
 
Private Sub CommandButton1_Click()  
A = Com(1, 1)  
MsgBox A  
End Sub

Всосал  
 
Function Com(i As Integer)  
Com = 1  
End Function  
 
Private Sub CommandButton1_Click()  
A = Com(0)  
MsgBox A  
End Sub  
 
нужно было просто хелп почитать)

Игорь, не спеши(ты прав, конечно). Мож автор разродится понятным сообщением, на примере - что ему надо. Я так и не понял до сих пор. Попытки гадать ни к чему не привели. Давай подождем:-)

Так он же уже "всосал" :)  
Но я тоже не понимаю, что у этой функции на входе...  
 
Может так?  
 
 
Function Com(i As Integer)  
Com = i Mod 2 = 0  
End Function

Mod Operator    
 
Used to divide two numbers and return only the remainder.  
 
Syntax  
 
result = number1 Mod number2  
 
The Mod operator syntax has these parts:  
 
Part Description    
result Required; any numeric variable.    
number1 Required; any numeric expression.    
number2 Required; any numeric expression.    
 
Remarks  
 
The modulus, or remainder, operator divides number1 by number2 (rounding floating-point numbers to integers) and returns only the remainder as result. For example, in the following expression, A (result) equals 5.  
 
A = 19 Mod 6.7  
   
 
Usually, the data type of result is a Byte, Byte variant, Integer, Integer variant, Long, or Variant containing a Long, regardless of whether or not result is a whole number. Any fractional portion is truncated. However, if any expression is Null, result is Null. Any expression that is Empty is treated as 0.  
 
Example  
This example uses the Mod operator to divide two numbers and return only the remainder. If either number is a floating-point number, it is first rounded to an integer.  
 
Dim MyResult  
MyResult = 10 Mod 5    ' Returns 0.  
MyResult = 10 Mod 3    ' Returns 1.  
MyResult = 12 Mod 4.3    ' Returns 0.  
MyResult = 12.6 Mod 5    ' Returns 3.