Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Я тоже думал ,что это фигня...(VBA Excel) / 4 сообщений из 4, страница 1 из 1
05.09.2005, 10:57:49
    #33250983
Задумщик
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Я тоже думал ,что это фигня...(VBA Excel)
Сравните 2 куска кода:

авторSub Формат()
With ActiveCell.Characters(Start:=9, Length:=4).Font
.Name = "Arial Cyr"
.Size = 10
End With
End Sub


авторSub Формат()
Dim i As Integer

i = Len(ActiveCell.Value)
With ActiveCell.Characters(Start:=i, Length:=4).Font
.Name = "Arial Cyr"
.Size = 10
End With
End Sub

Хочу спросить у более опытных товарищей:
Первый работает, это понятно. А вот почему не работает второй?

P.S. Синтаксис в поряде...
...
Рейтинг: 0 / 0
05.09.2005, 11:22:47
    #33251087
e121
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Я тоже думал ,что это фигня...(VBA Excel)
Потому что это
i=Len(ActiveCell.Value)
-глупость.
...
Рейтинг: 0 / 0
05.09.2005, 11:38:40
    #33251153
Задумщик
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Я тоже думал ,что это фигня...(VBA Excel)
Согласен...
...
Рейтинг: 0 / 0
05.09.2005, 16:39:50
    #33252281
sergeyvg
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Я тоже думал ,что это фигня...(VBA Excel)
i=Len(ActiveCell.Value)
вполне нормальный оператор, только вот дальше
With ActiveCell.Characters(Start:=i, Length:=4).Font
идет попытка менять фонт за пределами текста, м.б. так сделать
i=Len(ActiveCell.Value) - 4
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Я тоже думал ,что это фигня...(VBA Excel) / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]