powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / как экспортировать форматирование из ячейки эксель в бейсик?
6 сообщений из 6, страница 1 из 1
как экспортировать форматирование из ячейки эксель в бейсик?
    #37937161
gerra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Проблема следующая: я ячейках эксель хранятся химические формулы типа Н2О, естественно все цифры отформатированы как подстрочные символы. Но при экспорте данных в бейсик форматирование теряется и цифры становятся обычными. После этого из формул и проч. формируется текст, который снова пересылается в ячейку эксель. Но текст уже с большими цифрами.
Кто-нибудь посоветует, как сохранить исходное форматирование? Или еще какие-то пути решения проблемы, например тупо пролистать формулу, полученную из ячейки и все цифры сделать подстрочными (но я не знаю, как это сделать в бейсике). Help!!!
...
Рейтинг: 0 / 0
как экспортировать форматирование из ячейки эксель в бейсик?
    #37937191
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
gerraКто-нибудь посоветует, как сохранить исходное форматирование?не тянуть это в бейсик. так как не описано, зачем это делается, то и совет дать сложноgerraИли еще какие-то пути решения проблемы, например тупо пролистать формулу, полученную из ячейки и все цифры сделать подстрочнымиможно, если это устраивает.
...
Рейтинг: 0 / 0
как экспортировать форматирование из ячейки эксель в бейсик?
    #37937403
gerra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Shocker.Pro, лист экселя используется для хранения химических формул, программно некоторые из них включаются в текст. На листе это я сделать не могу.
...
Рейтинг: 0 / 0
как экспортировать форматирование из ячейки эксель в бейсик?
    #37937444
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
gerraтупо пролистать формулу, полученную из ячейки и все цифры сделать подстрочными
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
Dim i As Integer, t As String
With Cells(5, 5)
t = .Value
For i = 1 To Len(t)
  If Mid$(t, i, 1) >= "0" And Mid$(t, i, 1) <= "9" Then .Characters(i, 1).Font.Subscript = True
Next
End With

проделывает это в ячейке E5
...
Рейтинг: 0 / 0
как экспортировать форматирование из ячейки эксель в бейсик?
    #37937450
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Чуть покороче
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
Dim i As Integer, t As String
With Cells(5, 5)
t = .Value
For i = 1 To Len(t)
  If Mid$(t, i, 1) Like "[0-9]" Then .Characters(i, 1).Font.Subscript = True
Next
End With
...
Рейтинг: 0 / 0
как экспортировать форматирование из ячейки эксель в бейсик?
    #37937589
gerra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Shocker.Pro,
спасибо, все работает!
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / как экспортировать форматирование из ячейки эксель в бейсик?
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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