Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.05.23;
Скачать: [xml.tar.bz2];

Вниз

программное выделение ячеек в Excel   Найти похожие ветки 

 
I.Ru.Ru   (2004-05-11 23:16) [0]

Подскажите плиз как программно выделить несколько ячеек в Excel например желтым цветом, а также как программно создать границы ячеек?


 
TUser ©   (2004-05-12 06:13) [1]


> выделить несколько ячеек в Excel например желтым цветом

Т.е. выделить, а потом залить? Range. Потом Interior.ColorIndex Надо запустить в Ёкселе макрос и посмотреть, что он туда напишет.

> как программно создать границы ячеек

Это что значит? У ячеек всегда есть границы.


 
Fedia   (2004-05-12 06:33) [2]

>> как программно создать границы ячеек?
Если под границами в Excel имеется ввиду выделение границ черным цветом, то это можно сделать так:


kl1:=’A1’; kl2:=’B2’;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlEdgeLeft].LineStyle := xlContinuous;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlEdgeLeft].Weight := xlThin;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlEdgeTop].LineStyle := xlContinuous;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlEdgeTop].Weight := xlThin;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlEdgeBottom].LineStyle := xlContinuous;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlEdgeBottom].Weight := xlThin;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlEdgeRight].LineStyle := xlContinuous;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlEdgeRight].Weight := xlThin;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlInsideVertical].LineStyle := xlContinuous;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlInsideVertical].Weight := xlThin;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlInsideHorizontal].LineStyle := xlContinuous;
Excel.WorkBooks[1].WorkSheets[1].Range[kl1, kl2].Borders[xlInsideHorizontal].Weight := xlThin;


Не говорю, что это идеальный вариант, но он стабильно работает.
Конечно проще всегда смотреть как что-либо делается макросом, а затем пробовать переносить это в свое приложение.


 
evvcom ©   (2004-05-12 08:28) [3]

Смотри [1] по поводу записи в самом Excel макроса.



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2004.05.23;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.035 c
8-1078724110
Артем К.
2004-03-08 08:35
2004.05.23
как залить градиентом регион произвольной формы


14-1083087967
ИМХО
2004-04-27 21:46
2004.05.23
Выход в Инет через мобильник


14-1083261184
Verg
2004-04-29 21:53
2004.05.23
Favorit или favourite?


1-1083741812
Alek_1
2004-05-05 11:23
2004.05.23
Преобразование типов


14-1083743013
WondeRu
2004-05-05 11:43
2004.05.23
DMClient





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский