Здравствйте,    
подскажите, пожалуйста, необходимо найти количество пробелов вначале (слева) в ячейке с текстом. С макросами совсем мало знакома. Написала примерно, но что-то видимо нетак. Ругается на строчке  Do While s(i) = " "  
Я не знаю, как правильно в VBA обращаться к элементу массива строки. Помогите, пожалуйста, подправить код.  
 
Пояснения к коду:  
1) Сначала строковой переменной присвоила значение конкретной ячейки  
2) определила длину ячейки  
3) а дальше пытаюсь найти количество пробелов вначале строки... но не получается(  
 
Sub additional2()  
 
Dim s As String  
Dim i, n, k As Integer  
 
Range("B12").Select  
s = ActiveCell.Value  
 
MsgBox ("s=" & s)  
 
n = Len(s)  
 
MsgBox ("n=" & n)  
 
i = 1  
k = 0  
Do While s(i) = " "  
k = k + 1  
i = i + 1  
Loop  
 
MsgBox ("k=" & k)  
 
End Sub  
 
 
Заранее спасибо!!!