powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите поставить степень в тексте
8 сообщений из 8, страница 1 из 1
Помогите поставить степень в тексте
    #35902055
ovenbaran
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Доброго времени суток!)
Помогите пожалуйста решить задачки:

1) Как у текста поставить степень в VBA? Например: Надежда ² или Надежда ³.

Вручную в екселе можно это поставить в меню Вставка -> Символ.... Пробовала поставить на запись макрос и потом посмотреть, но у всех степеней получался один и тот же макрос.

2) Как с помощью макроса можно определить в екселе последнюю строчку на странице и поместить туда текст например:
While Range("A" & k2).Value <> "Отметки Back-office" Вставить это значение в последнюю строчку Wend

Спасибо.
...
Рейтинг: 0 / 0
Помогите поставить степень в тексте
    #35902252
Фотография gjghjc
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
По п.2 глянь сюда
Там есть кусочки кода которые позволяют найти последнюю заполненную строку на листе.
С уважением, Николай.
...
Рейтинг: 0 / 0
Помогите поставить степень в тексте
    #35902473
ovenbaran
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
ну то что он находит последнюю заполненную строчку это хорошо конечно, но задача немного другая....у меня тянутся данные сначала в блокнот, а потом уже с помощью макроса расставляются в екселе. Так вот, когда он найдет запись "Отметки Back-office" то он должен вставить эту строчку в конец листа)
Спасибо Николай)
...
Рейтинг: 0 / 0
Помогите поставить степень в тексте
    #35902500
Фотография gjghjc
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
При переборе строк

Код: plaintext
1.
2.
3.
4.
Select Case Instr ( 1 , StringFromNotepad,  "Отметки Back-office") > 0  
   Case Is = True
      tmpString =  "Отметки Back-office"
End Select

Затем после того как все данные разнесены в следующую после последней заполненой ячейки записываем переменную tmpString

В общих чертах как-то так.


С уважением, Николай.
...
Рейтинг: 0 / 0
Помогите поставить степень в тексте
    #35902539
ovenbaran
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо Николай, сейчас чуточку позже попробую и напишу результаты)
А по степени можете что нибудь сказать? можно ли её как то прицепить с помощью макроса :)
...
Рейтинг: 0 / 0
Помогите поставить степень в тексте
    #35902543
ovenbaran
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
опаньки...а Вы банковский работник тоже))
Случайно не с диасофтом ли работаете?))))))))
...
Рейтинг: 0 / 0
Помогите поставить степень в тексте
    #35902594
Фотография gjghjc
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Нет, с диасофтом не знаком. Но по роду деятельности приходится тягать данные из текстовых отчетов в Access, Excell, DBF и FireBird и обратно. :)
С уважением, Николай.
...
Рейтинг: 0 / 0
Помогите поставить степень в тексте
    #35903480
ovenbaran
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ура, степень победила:
R.Characters(Start:=19, Length:=1).Font.Superscript = True
где Start:=19 - это символ по счету который нужно возвести в степень, а Length:=1 - сколько символов =)
...
Рейтинг: 0 / 0
8 сообщений из 8, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите поставить степень в тексте
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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