|
Объеденить ячейки Excell
Гость
|
 |
« : 10-06-2004 05:21 » |
|
BCB6
Win2000
MS Office 97
Кто нибуть делал это.
Весь хел излазил в Excell
так и не понял.
Макрос такой
(но макросы использовать не хочу так как если убрать предупреждение можно нарваться на вирусы)
Range("B23:C23").Select
With Selection
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = 0
.ShrinkToFit = False
.MergeCells = False
End With
Selection.Merge
Код в программе
App.OlePropertyGet("Range","B23:C23").OlePropertyGet("Select");
App.OlePropertyGet("Merge"); // ошибка
App.OlePropertyGet("Selection").OlePropertyGet("Merge"); // ошибка
Может быть еще подскажете ссылочку где все популярно расписывается
а то так и буду тыкаться ...
|
