Как в ворде разделить число на разряды
Перейти к содержимому

Как в ворде разделить число на разряды

  • автор:

Добавление и удаление разделитель групп разрядов в число в текстовое поле или поле выражения

Примечание: Мы стараемся как можно оперативнее обеспечивать вас актуальными справочными материалами на вашем языке. Эта страница переведена автоматически, поэтому ее текст может содержать неточности и грамматические ошибки. Для нас важно, чтобы эта статья была вам полезна. Просим вас уделить пару секунд и сообщить, помогла ли она вам, с помощью кнопок внизу страницы. Для удобства также приводим ссылку на оригинал (на английском языке) .

В Microsoft Office InfoPath вы можете добавить форматирование текстовом поле, поле выражения и элементов управления выбора даты шаблона формы для указания способа отображения дат, времени и чисел после ввода их в формы, основанных на шаблоне формы данных.

Вы можете добавить разделитель групп разрядов только для текстовых полей, которые имеют тип данных decimal или всей номера или элементе управления поле выражения, отформатированных как десятичное или целое число. В зависимости от языкового стандарта, можно выбрать Разделитель может отделять больше или меньше трех десятичных разрядов. Добавление или удаление разделитель групп разрядов затрагивает только отображаемое значение, а не значение, которая хранится в источнике данных.

  1. Дважды щелкните элемент управления текстового поля или управления поле выражения, данные которого нужно отформатировать.
  2. В диалоговом окне Свойства элемента управления выполните одно из указанных ниже действий.
    • Если вы используете управления текстовым полем, перейдите на вкладку данные.
    • Если вы используете управления поле выражения, откройте вкладку Общие.
  3. Выполните одно из указанных ниже действий.
    • Для надписи убедитесь, что отображается в списке тип данных соответствующего типа данных и нажмите кнопку Формат.
    • Поле выражения убедитесь, что в списке Форматировать как отображает соответствующие типы данных и нажмите кнопку Формат.
  4. В диалоговом окне Формат типа данных выполните одно из указанных ниже действий.
    • Чтобы добавить разделитель групп разрядов число, установите флажок использовать цифры групп разрядов, в разделе другие параметры.
    • Чтобы удалить разделитель групп разрядов число, снимите флажок использовать цифры групп разрядов, в разделе другие параметры.

Как в ворде разделить число на разряды

Как автоматически в Word разбить пробелами большие числа по 3 символа? Напр. 2303004,1 на 2 303 004,1

В вордовском документе нужно большие числа
из формата 230000115,0 переделать в 230 000 115,0

с пробелами после 3 символов
по 3 знака, можно ли это автоматически сделать?

Регистрация: 24.01.2011
Сообщений: 3,031
то есть любые четыре и более подряд идущие цифры разделять??
можно
Финдом

Ципихович Эндрю
Посмотреть профиль
Найти ещё сообщения от Ципихович Эндрю

Регистрация: 27.08.2011
Сообщений: 2
3 подряд, заменой не получается
Регистрация: 24.01.2011
Сообщений: 3,031

‘специальные символы и подстановочные знаки
‘в операциях поиска и замены MS Word 97/2000/XP
http://artefact.lib.ru/design/text_khozyainov.shtml

Ципихович Эндрю
Посмотреть профиль
Найти ещё сообщения от Ципихович Эндрю

Особый статус
Участник клуба
Регистрация: 24.11.2008
Сообщений: 1,535
Лиха беда.

Функцией Format. Формат попробуйте сконструировать сами.

Я применил функцию FormatNumber, и она работает в соотствии с установками в региональных стандартах Windows.

If IsNumeric(Selection) Then Selection = FormatNumber(Selection)

Весь код можете посмотреть (и попытать) по Alt-F11 в приложенном файле.

FormatNumber.doc (43.0 Кб, 49 просмотров)

покупка

Как добавить разделитель тысяч к числам в документе Word?

В Excel вы можете использовать функцию «Использовать разделитель 1000» для автоматического добавления разделителя 1000 к числам, но знаете ли вы, как добавить разделитель 1000 к числам в документе Word? Здесь я расскажу о некоторых приемах выполнения этой работы в Word.

Добавить разделитель 1000 с помощью Kutools for Word

Добавить разделитель 1000 с помощью ярлыков

В Word вы можете добавить разделитель тысяч с помощью ярлыков.

Поместите курсор в то место, в которое вы хотите вставить разделитель 1000, нажмите другой клавишу и нажмите 044 на цифровой клавиатуре.

Добавить разделитель 1000 с символом

Или вы можете вставить разделитель 1000 с помощью функции символа.

док добавить разделитель тысяч 1

1. Поместите курсор в то место, в которое вы хотите вставить разделитель 1000, щелкните Вставить > Символ > Другие символы.

док добавить разделитель тысяч 2

2. в Символ диалога под Символы выбор вкладки Verdana от шрифт раскрывающийся список, затем выберите Основной латинский от Подмножество раскрывающийся список, теперь выберите разделитель 1000 из списка, нажмите Вставить чтобы вставить его.

Внимание: С помощью двух вышеупомянутых методов одновременно можно вставить только один разделитель тысяч. Если вы хотите вставить сразу несколько разделителей тысяч в длинное число, попробуйте следующий метод.

Добавить разделитель 1000 с помощью VBA

Иногда для одного числа нужно было вставить несколько разделителей 1000. В этом случае вы можете использовать код VBA.

1. Выберите число, которое вы хотите вставить разделитель тысяч, нажмите Alt + F11 ключи для открытия Microsoft Visual Basic для приложений окно.

2. Нажмите Вставить > Модулископируйте и вставьте приведенный ниже код в Модули.

VBA: добавьте 1000 разделителей к числу

Sub AddCommasToNumbers() 'UpdatebyExtendoffice20181106 Dim xWarp As Integer If Selection.Type = wdSelectionIP Then ActiveDocument.Range(0, 0).Select xWarp = wdFindContinue Else xWarp = wdFindStop End If With Selection.Find .ClearFormatting .Text = "[0-9]" .Replacement.Text = "" .Forward = True .Wrap = xWarp .Format = False .MatchCase = False .MatchWholeWord = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = True Do While .Execute Selection.Text = Format$(Selection.Text, "#,##0") If xWarp = wdFindContinue Then Selection.Collapse wdCollapseEnd Else Exit Sub End If Loop End With End Sub

док добавить разделитель тысяч 3

3. Нажмите F5 key, к выбранному числу добавлены разделители тысяч.

Добавить разделитель 1000 с помощью Kutools for Word

Если вы хотите вставить разделители для нескольких чисел в выделенном фрагменте или всего документа в Word, Добавить разделитель тысяч полезности Kutools for Word можно решить эту задачу щелчком мыши.

После установки Kutools for Word, сделайте, как показано ниже: (Бесплатная загрузка Kutools for Word прямо сейчас!)

док добавить разделитель тысяч 4

Чтобы добавить разделитель тысяч ко всем числам во всем документе, просто не выбирайте никаких данных, нажмите Кутулс > Добавить разделитель тысяч.

Появятся некоторые диалоговые окна, чтобы убедиться, что вы хотите применить эту функцию ко всему документу, нажмите Да > OK.
док добавить разделитель тысяч 5 док добавить разделитель тысяч 6

док добавить разделитель тысяч 7

Теперь все числа были вставлены разделителем 1000.

док добавить разделитель тысяч 8

Если вы хотите добавить разделитель 1000 к выделенным числам, выберите числа и щелкните Кутулс > Добавить разделитель тысяч.

Внимание: Если вы хотите удалить разделитель тысяч, вы можете нажать Kutools> Удалить> Удалить разделитель тысяч.

Как автоматически в Word разбить пробелами большие числа по 3 символа? Напр. 2303004,1 на 2 303 004,

с пробелами после 3 символов
по 3 знака, можно ли это автоматически сделать?

_MBK_
Пикирующий бомбардировщик

15 лет на форуме
Сообщения 33 105 Реакции 10 832

Ответ: Как автоматически в Word разбить пробелами большие числа по 3 символа? Напр. 2303004,1 на 2 303 004,1

Для начала перебираете все слова в тексте на предмет число это или нет. Такой вот функцией, например:

Declare Function StrSpn Lib «SHLWAPI» Alias _
«StrSpnW» (ByVal psz As Long, ByVal pszSet As Long) As Long

Public Function IsDecimal (ByVal sString As String) As Boolean
Const DECIMAL_NUM As String = «0123456789,-»
Dim iPos

iPos = StrSpn (StrPtr(sString), StrPtr(DECIMAL_NUM)
‘ если возвращается значение, не равное длине исходной строки,
‘ то значит найдены символы, не являющиеся цифрами
IsDecimal = (iPos = Len(sString))
End Function

Потом в от позиции запятой до конца слова в обе стороны через каждые 3 символа вставлять пробел.

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *