Каждый раз новая ячейка Excel

14.10.2008, 11:01. **Показов** 1929. **Ответов** 1

Author24 — интернет-сервис помощи студентам

Здраствуйте
Помогите плиз
Надо такой код который, помещал данные с формы в таблицу Excel, но каждый раз в новую ячейку.
Например при нажатии кнопки на форме он значение таймера который размещен на форме в виде Label1, записывает его значение в ячейку А1, при следующем нажатии записывается в А2, при следующем нажатии записывается в А3, ну и так далее.
По идее должно быть просто, но как то я запутался в этих for, if.....

Помогите кодом люди добрые.

@Михайло · 15.10.2008, 20:08

Visual Basic

Dim i As Integer
Private Sub CommandButton1_Click()
  If i = 0 Then
    Do
      i = i + 1
    Loop While ActiveSheet.Cells(i, 1) <> ""
    i = i - 1
  End If
  i = i + 1
  ActiveSheet.Cells(i, 1) = Time
End Sub

Гость, Nikolai
		1
	Каждый раз новая ячейка Excel 14.10.2008, 11:01. Показов 1929. Ответов 1 Метки нет (Все метки) Здраствуйте Помогите плиз Надо такой код который, помещал данные с формы в таблицу Excel, но каждый раз в новую ячейку. Например при нажатии кнопки на форме он значение таймера который размещен на форме в виде Label1, записывает его значение в ячейку А1, при следующем нажатии записывается в А2, при следующем нажатии записывается в А3, ну и так далее. По идее должно быть просто, но как то я запутался в этих for, if..... Помогите кодом люди добрые.

	15.10.2008, 20:08