Конференция VBStreets

**IvanFR** » 26.10.2005 (Ср) 14:58

Помогите пожалуйста для ячейки в книге Excel сделать выравнивание по середке и бордер.

пробовал
objExl.Range("E4").HorizontalAlignment = xlCenter
objExl.Range("E4").Borders(xlEdgeBottom).LineStyle = xlContinuous

Нехочет

**GSerg** » 26.10.2005 (Ср) 15:00

Как не хочет?

**IvanFR** » 26.10.2005 (Ср) 15:07

Говорит:

Run-time error '1004'
Нельзя установить свойство HorizontalAlignment класса Range

У меня VB6 и Excel2002, может из за этого?

**GSerg** » 26.10.2005 (Ср) 15:27

Видимо нельзя.
Кстати, не xlCenter, а xlHAlignCenter, хотя не суть.

А что, другие свойства диапазона E4 работают?

**IvanFR** » 26.10.2005 (Ср) 16:59

В том то и дело, работают такие свойства, как:
objExcel.Range("E4").Value = "1" Валуе работает, а выравнивание нет

.WrapText = True тоже работает.
Может как раз из за параметров типа xlCenter не работает? Может в VB они как то по другому называются?

**GSerg** » 26.10.2005 (Ср) 17:49

Ох...

Чел.
Если ты библиотеку excel подключил, юзай переменные, но смирись с тем, что с другими версиями офиса твоя прога работать не будет.
А если ты библиотеку excel не подключал, то поставь для начала самой первой строкой своего кода

Option Explicit

**IvanFR** » 26.10.2005 (Ср) 19:41

Спасибо. "библиотеку excel - подключил" - "Переменные юзаю" :lol:

с траблой смирился

**mar_val** » 26.10.2005 (Ср) 19:46

Извиняюсь за ламерский вопрос, а как подключать библиотеку Excel? (и совсем уж извиняюсь - куда? VB6 или тут речь о VBA?)

**gjghjc** » 26.10.2005 (Ср) 20:19

2 mar_val Project -> Preferences -> Microsoft Excel XX.X Object Library

А если попробовать так objExc.Range("E4").Select
objExc.SELECTION.HorizontalAlignment = (тупо поставь числовое значение переменной)

**mar_val** » 26.10.2005 (Ср) 20:35

gjghjc
А если нету Microsoft Excel XX.X Object Library?

**gjghjc** » 26.10.2005 (Ср) 21:14

Если нет то значит эксель не установлен на машине и прога просто не будет работать а под XX.X я подразумевал версию библиотеки у меня стоит офис ХР и ХХ.Х соответсвенно = 10.0

**mar_val** » 27.10.2005 (Чт) 19:23

gjghjc
Да про иксы я понял, другого не понял - Офис-то у меня есть, а Excel Object Library в списке подключаемых компонентов нет. Потому и вопрос такой родился... Может как-то иначе называется, но я весь список просмотрел и библиотеки Excel не нашел.

**gjghjc** » 27.10.2005 (Чт) 22:53

Быть того не может. Если стоит Excel то в references его можно подключить к проекту
Project -> Preferences -> Microsoft Excel 10.0 Object Library

**mar_val** » 28.10.2005 (Пт) 9:08

gjghjc
Ой, извиняюсь - не там смотрел (VB русский вот и попутал пункты меню). Я почему-то подумал на компоненты...

Конференция VBStreets

Редактирование свойств ячеек Excel через VB

Редактирование свойств ячеек Excel через VB

Кто сейчас на конференции