На
Настя

программирование на 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 ?

значат*

АК
Алексей Коннов

k=1 - присвоение переменной k значения 1
k=k+1 - увеличение значения переменной k на 1

ДС
Дмитрий Струков

переменной к присваивается значение 1
в цикле пока не кончатся ненулевые ячейки к увеличивается на 1. Это счётчик ненулевых ячеек.

Похожие вопросы
программирование в VBA Ecxel адача в дополнениях
программирование в VBA задача в дополнениях к вопросу, помогите плиз
Программирование в среде VBA
Программирование в VBA
простая задача по VBA
Стоит ли учить язык программирования VBA?
VBA -программирование
Две задачи по программированию на языке VBA
Помогите пожалуйста с заданием по программированию VBA
Помогите, пожалуйста, с программированием в excel (VBA)