Удаление данных после ввода

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

Удаление данных после ввода (Формулы/Formulas)

Gold_Barsik

Дата: Пятница, 21.06.2019, 21:23 | Сообщение № 1

Группа: Проверенные

Ранг: Обитатель

Сообщений: 459

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

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

2003

Есть три Ячейки для заполнения данных.
Когда их вводим, данные сохраняются на втором листе.
Вопрос. Как очистить ячейки Нажатием на Enter? Т.е. удалить данные после ввода?

Ответить

Nic70y

Дата: Суббота, 22.06.2019, 08:17 | Сообщение № 2

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

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

Сообщений: 9137

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

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

Excel 2010

[vba]

Код

Range("L5,N5,P5").ClearContents

[/vba]
[vba]

Код

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("l5, n5, p5")) Is Nothing Then
        u = Sheets("показания").Cells(Rows.Count, "a").End(xlUp).Row + 1
        If Range("l5") <> "" And Range("n5") <> "" And Range("p5") Then
            Sheets("показания").Range("a" & u) = Range("n5") + Range("l5")
            Sheets("показания").Range("b" & u) = Range("p5")
            Range("L5,N5,P5").ClearContents
        End If
    End If
End Sub

[/vba]

ЮMoney 41001841029809

Ответить

Gold_Barsik

Дата: Суббота, 22.06.2019, 10:32 | Сообщение № 3

Группа: Проверенные

Ранг: Обитатель

Сообщений: 459

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

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

2003

Nic70y, yes

Спасибо!

Ответить

Gold_Barsik

Дата: Понедельник, 15.07.2019, 13:29 | Сообщение № 4

Группа: Проверенные

Ранг: Обитатель

Сообщений: 459

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

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

2003

Nic70y, а если в ячейку P5 нужно ввести значение-текст "LO" и "HI"? Т.к. глюкометр измеряет в диапазоне 0,6-33,3 ммоль/л. Ниже 0,6 он указывает LO, а выше 33,3 указывает HI.
Можно это подправить в макросе?
[moder]Это другой вопрос. Читайте Правила форума. Тема закрыта[/moder]

Сообщение отредактировал _Boroda_ - Понедельник, 15.07.2019, 13:35

Ответить

Удаление данных после ввода (Формулы/Formulas)

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