Сделать начертания текст обычным

Вход

Регистрация

Напомнить пароль

= Мир MS Excel/Сделать начертания текст обычным - Мир MS Excel

Старая форма входа

Страница 1 из 1 1
Модератор форума: _Boroda_, китин

Сделать начертания текст обычным

tulakov77

Дата: Среда, 27.10.2021, 19:12 | Сообщение № 1

Группа: Пользователи

Ранг: Участник

Сообщений: 68

Репутация: 0 ±

Замечаний: 80% ±

начертания первого строка текста таблици сделать обычним

К сообщению приложен файл: Soliqlar_va_sol.docx (18.0 Kb)

Ответить

Pelena

Дата: Среда, 27.10.2021, 19:46 | Сообщение № 2

Группа: Админы

Ранг: Местный житель

Сообщений: 19403

Репутация: 4555 ±

Замечаний: ±

Excel 365 & Mac Excel

Выделить и нажать Ctrl+B

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816

Ответить

tulakov77

Дата: Среда, 27.10.2021, 20:28 | Сообщение № 3

Группа: Пользователи

Ранг: Участник

Сообщений: 68

Репутация: 0 ±

Замечаний: 80% ±

Pelena, таких таблиц в файле 1000

Ответить

Pelena

Дата: Среда, 27.10.2021, 21:42 | Сообщение № 4

Группа: Админы

Ранг: Местный житель

Сообщений: 19403

Репутация: 4555 ±

Замечаний: ±

Excel 365 & Mac Excel

Об этом в топике не сказано.
Тогда макросом
[vba]

Код

Sub FirstRow()
    Dim tbl As Table
    For Each tbl In ActiveDocument.Tables
        tbl.Rows(1).Range.Font.Bold = False
    Next tbl
End Sub

[/vba]

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816

Ответить

tulakov77

Дата: Четверг, 28.10.2021, 18:12 | Сообщение № 5

Группа: Пользователи

Ранг: Участник

Сообщений: 68

Репутация: 0 ±

Замечаний: 80% ±

Pelena, Спасибо большой.

Ответить

Сделать начертания текст обычным

Страница 1 из 1
1