powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Я тоже думал ,что это фигня...(VBA Excel)
4 сообщений из 4, страница 1 из 1
Я тоже думал ,что это фигня...(VBA Excel)
    #33250983
Задумщик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Сравните 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
Я тоже думал ,что это фигня...(VBA Excel)
    #33251087
e121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Потому что это
i=Len(ActiveCell.Value)
-глупость.
...
Рейтинг: 0 / 0
Я тоже думал ,что это фигня...(VBA Excel)
    #33251153
Задумщик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Согласен...
...
Рейтинг: 0 / 0
Я тоже думал ,что это фигня...(VBA Excel)
    #33252281
sergeyvg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
i=Len(ActiveCell.Value)
вполне нормальный оператор, только вот дальше
With ActiveCell.Characters(Start:=i, Length:=4).Font
идет попытка менять фонт за пределами текста, м.б. так сделать
i=Len(ActiveCell.Value) - 4
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Я тоже думал ,что это фигня...(VBA Excel)
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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