|
|
Автор:
|
Kostyan Nata
|
|
Тема:
|
Объединение ячеек
|
|
Дата:
|
18.02.2005 12:40:00
|
Привет всем! Нужна помощь. Кто ответит,тот молодец.
Итак: пишу я прогр-ку на языке VB.net, вывожу таблицу с данными в Word.
После этого объединяю ячейки с одинаковыми значениями, кусочек программки:
For i = 3 To wTab.Rows.Count
For j = 4 To wTab.Rows.Count - 1
If i = j Or j < i Then
j = i + 1
End If
If j > wTab.Rows.Count Then Exit Sub
If wTab.Cell(i, 1).Range.Text = wTab.Cell(j, 1).Range.Text Then
wTab.Cell(j, 1).Range.Text = Nothing
wTab.Cell(i, 1).Merge(wTab.Cell(j, 1))
Else
Exit For
End If
Next
Next
Когда доходит до Exit For выдает ошибку, данное семейство не существует.
Вопрос: КАК ПРОВЕРИТЬ ЯЧЕЙКУ НА СУЩЕСТВОВАНИЕ или КАК ПРОВЕРИТЬ ПРИНАДЛЕЖИТ ЛИ ЯЧЕЙКА ОБЪЕДИНЕНИЮ?
|
|
