На
Настя
программирование на VBA .вопрос прост
Private Sub CommandButton1_Click()
ListBox1.Clear
k = 1
While Worksheets("Лист1").Cells(k + 1, 1).Value <> 0
k = k + 1
Wend
For i = 2 To k + 1
ListBox1.AddItem Worksheets("Лист1").Cells(i, 1).Value
Next i
End Sub
что значят эти записи k=1 и k =k+1 ?
значат*