Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Excel [D7, XP]


MAX3 ©   (2007-02-12 18:10:00) 

Как програмно удалить колонку в Excel?


YurikGL   (2007-02-13 20:44:00) [1]


>    Columns("D:D").Select
>    Selection.Delete Shift:=xlToLeft
>

Делфи и офиса под рукой нет, но получиться должно что-то вроде

uses Excel2000

xlapp:=createoleobject('Excel.Application');
...
xlapp.Columns("D:D").Select; //(или xlapp.ActiveBook.Columns("D:D").Select);
xlapp.Selection.Delete(xlToLeft);


Кстати, можно попробовать сразу
xlapp.Columns("D:D").Delete(xlToLeft);


@dimon   (2007-02-13 01:45:00) [2]


> YurikGL ©


Тогда как использовать такой код.
   Columns("D:D").Select
   Selection.Delete Shift:=xlToLeft


YurikGL   (2007-02-12 20:59:00) [3]

Для того чтобы узнать, как что-то сделать из Delphi во Excel-e надо во Excel-е зайти в меню сервис/макрос/начать запись... Потом сделать во Excel-e то, что надо сделать из Delphi и закончить запись макроса. И наконец сервис/макрос/макросы...выбираем записанный...изменить и смотрим, как он устроен. После этого перевод синтаксиса VBA в синтаксис Delphi осуществляется просто и непринужденно.


Наверх

Титульная страница Поиск, карта сайта Написать письмо