Заменить пустую строку на текст в поле выше

@Серж_87 · Регистрация: 09.08.2012

Author24 — интернет-сервис помощи студентам

Вечер добрый
Подскажите, пожалуйста, как заменить пустое поле ("") на текст, введенный в поле выше начиная сверху вниз ? Скрин для понимания выкладываю. Так же во вложении файл .xlsx

Представляю как то так:

SQL

1 2	UPDATE Таблица SET Таблица.[Название магазина] = "Сюда название из поля выше" WHERE (((Таблица.[Название магазина])=""));

Но как средствами SQL взять поле и занести его ?? Ведь нельзя одновременно использовать select и update

mobile · 18.03.2015, 00:49

Запросом такое сложно сделать. А в ВБА в принципе можно

Visual Basic

Sub editMag()
    Dim db As DAO.Database, rst As DAO.Recordset
    Dim mag
    Set db = CurrentDb
    Set rst = db.OpenRecordset("select * from Таблица")
    Do Until rst.EOF
        If Not IsNull(rst("Название_магазина")) Then
            mag = rst("Название_магазина")
        Else
            rst.Edit
            rst("Название_магазина") = mag
            rst.Update
        End If
        rst.MoveNext
    Loop
End Sub

@Серж_87 · 18.03.2015, 00:56 **[ТС]**

mobile, спасибо

@Серж_87 1302 / 508 / 63 Регистрация: 09.08.2012 Сообщений: 2,056
	18.03.2015, 00:56 [ТС]	3
	mobile, спасибо 0

Заменить пустую строку на текст в поле выше

Решение