Выделить вторую строку после последней заполненной ячейки G

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

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

Выделить вторую строку после последней заполненной ячейки G (Макросы/Sub)

timo64uk

Дата: Понедельник, 11.11.2024, 12:34 | Сообщение № 1

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

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

Сообщений: 94

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

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

Office16

Добрый день

Совсем запутался... Прошу помощи
Нужно выделить жирным шрифтом и применить формат .NumberFormat = "#,##0.00" к строке идущей второй после последней заполненной ячейкой столбца G.
Пытался из этого слепить, но [vba]

Код

Cells(Cells.Rows.Count, 7).End(xlUp).Offset(2, -6) = "=IFERROR(SUMIFS(C[12],C[1],""*""),"""")"

[/vba] и хотел в две строчки с присвоением свойств в конце, но не получается.
Так получается, но задействован не только столбец G (за полями могут быть данные): [vba]

Код

With ActiveSheet.UsedRange
Rows(.Rows(.Rows.Count).Row).Font.Bold = True
Rows(.Rows(.Rows.Count).Row).NumberFormat = "#,##0.00"
End With

[/vba]

Помогите, пожалуйста

К сообщению приложен файл: 5457.xlsx (13.7 Kb)

Сообщение отредактировал timo64uk - Понедельник, 11.11.2024, 12:39

Ответить

Nic70y

Дата: Понедельник, 11.11.2024, 12:59 | Сообщение № 2

Группа: Друзья

Ранг: Экселист

Сообщений: 9000

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

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

Excel 2010

[vba]

Код

a = Cells(Rows.Count, 7).End(xlUp).Row + 2
Rows(a).Font.Bold = True
Rows(a).NumberFormat = "#,##0.00"

[/vba]или
[vba]

Код

With Rows(Cells(Rows.Count, 7).End(xlUp).Row + 2)
.Font.Bold = True
.NumberFormat = "#,##0.00"
End With

[/vba]

ЮMoney 41001841029809

Сообщение отредактировал Nic70y - Понедельник, 11.11.2024, 13:05

Ответить

_Boroda_

Дата: Понедельник, 11.11.2024, 17:55 | Сообщение № 3

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

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

Сообщений: 16714

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

Замечаний: ±

2003; 2007; 2010; 2013 RUS

[vba]

Код

    With Cells(Rows.Count, 7).End(xlUp).Offset(2, -6).Resize(, 16)
        .Font.Bold = True
        .NumberFormat = "#,##0.00"
    End With

[/vba]

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995

Ответить

Выделить вторую строку после последней заполненной ячейки G (Макросы/Sub)

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