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

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

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

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

Спасибо.
...
Рейтинг: 0 / 0
31.03.2009, 10:34
    #35902252
gjghjc
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите поставить степень в тексте
По п.2 глянь сюда
Там есть кусочки кода которые позволяют найти последнюю заполненную строку на листе.
С уважением, Николай.
...
Рейтинг: 0 / 0
31.03.2009, 11:25
    #35902473
ovenbaran
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите поставить степень в тексте
ну то что он находит последнюю заполненную строчку это хорошо конечно, но задача немного другая....у меня тянутся данные сначала в блокнот, а потом уже с помощью макроса расставляются в екселе. Так вот, когда он найдет запись "Отметки Back-office" то он должен вставить эту строчку в конец листа)
Спасибо Николай)
...
Рейтинг: 0 / 0
31.03.2009, 11:33
    #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
31.03.2009, 11:45
    #35902539
ovenbaran
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите поставить степень в тексте
Спасибо Николай, сейчас чуточку позже попробую и напишу результаты)
А по степени можете что нибудь сказать? можно ли её как то прицепить с помощью макроса :)
...
Рейтинг: 0 / 0
31.03.2009, 11:47
    #35902543
ovenbaran
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите поставить степень в тексте
опаньки...а Вы банковский работник тоже))
Случайно не с диасофтом ли работаете?))))))))
...
Рейтинг: 0 / 0
31.03.2009, 11:58
    #35902594
gjghjc
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите поставить степень в тексте
Нет, с диасофтом не знаком. Но по роду деятельности приходится тягать данные из текстовых отчетов в Access, Excell, DBF и FireBird и обратно. :)
С уважением, Николай.
...
Рейтинг: 0 / 0
31.03.2009, 15:09
    #35903480
ovenbaran
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите поставить степень в тексте
Ура, степень победила:
R.Characters(Start:=19, Length:=1).Font.Superscript = True
где Start:=19 - это символ по счету который нужно возвести в степень, а Length:=1 - сколько символов =)
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите поставить степень в тексте / 8 сообщений из 8, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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