Неразрывный пробел средствами VBA - Microsoft Office Word

tolikman · 15.01.2009, 20:39

Снова здраствуйте.
Столкнулся с проблемой. Необходимо посредством VBA поставить неразрывный пробел. т.е. сэмитировать нажатие Ctrl+Shift+Space(Пробел). Макрорекордер ничего не показал, в хелпе не нашол. Памагите...

viter.alex · 15.01.2009, 21:08

Получено макрорекордером, но использовал вставку символа

Код:

  Selection.InsertSymbol Font:="Times New Roman", CharacterNumber:=160, Unicode:=True

Sasha_Smirnov · 15.01.2009, 21:58

Код:

Selection.TypeText ChrW(160)

Это также соответствует вводу 0160 (где NumLock) с удерживанием левого альта.

Код:

SendKeys "^+ ", True

непосредственно имитирует нажатие "контрол-шифт-пробел".

tolikman · 15.01.2009, 22:26

спасибо всем! помогли.

Vas'ka · 23.03.2009, 02:55

Помогите!)
У меня проблема с пробелом! он удаляет впереди стоящие буквы...я не помню, как вернуть все обратно( чтобы он просто пропускал

Sasha_Smirnov · 23.03.2009, 05:11

Insert нажми. Помогло?

15.01.2009, 20:39	#1
tolikman Форумчанин Регистрация: 25.08.2008 Сообщений: 159	Неразрывный пробел средствами VBA Снова здраствуйте. Столкнулся с проблемой. Необходимо посредством VBA поставить неразрывный пробел. т.е. сэмитировать нажатие Ctrl+Shift+Space(Пробел). Макрорекордер ничего не показал, в хелпе не нашол. Памагите...

15.01.2009, 21:08	#2
viter.alex Балуюсь кодами Участник клуба Регистрация: 09.01.2009 Сообщений: 1,837	Получено макрорекордером, но использовал вставку символа Код: `Selection.InsertSymbol Font:="Times New Roman", CharacterNumber:=160, Unicode:=True` Лучше день потерять — потом за пять минут долететь!©

15.01.2009, 21:58	#3
Sasha_Smirnov Особый статус Участник клуба Регистрация: 24.11.2008 Сообщений: 1,535	Код: `Selection.TypeText ChrW(160)` Это также соответствует вводу 0160 (где NumLock) с удерживанием левого альта. Код: `SendKeys "^+ ", True` непосредственно имитирует нажатие "контрол-шифт-пробел". Формула 1 (календарь чемпионата-2016): 26.11.2016 15:55 — Абу-Даби: http://ru.wikipedia.org/wiki/Гран-при_Абу-Даби — (квалификация)! Эфир: http://lion-tv.com/28-match-tv.html Последний раз редактировалось Sasha_Smirnov; 15.01.2009 в 22:27.

23.03.2009, 05:11	#6
Sasha_Smirnov Особый статус Участник клуба Регистрация: 24.11.2008 Сообщений: 1,535	Insert нажми. Помогло? Формула 1 (календарь чемпионата-2016): 26.11.2016 15:55 — Абу-Даби: http://ru.wikipedia.org/wiki/Гран-при_Абу-Даби — (квалификация)! Эфир: http://lion-tv.com/28-match-tv.html

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Условное форматирование средствами VBA	Acro	Microsoft Office Excel	5	01.12.2008 16:40
Как средствами VBA получить доменное имя пользователя?	Прохожий	Microsoft Office Excel	3	04.10.2008 18:28
каксделать пробел	VolkasHanas	Microsoft Office Access	2	21.09.2008 17:00
Пробел в браузере	russian-stalker	Общие вопросы Delphi	1	11.09.2008 17:23
неразрывный диапазон	zetrix	Microsoft Office Excel	0	31.10.2006 07:26

15.01.2009, 22:26	#4
tolikman Форумчанин Регистрация: 25.08.2008 Сообщений: 159	спасибо всем! помогли.

23.03.2009, 02:55	#5
Vas'ka Новичок Джуниор Регистрация: 23.03.2009 Сообщений: 2	Помогите!) У меня проблема с пробелом! он удаляет впереди стоящие буквы...я не помню, как вернуть все обратно( чтобы он просто пропускал