Приветствую!
1) У меня есть форма одной таблицы, созданная мастером форм. На ней есть кнопка, которая прибавляет целое число, введенное ранее в созданное поле, к выделенной позиции столбца. Все работает хорошо, но я не могу сообразить, как мне этой кнопкой ВЫДЕЛИТЬ ВСЕ позиции нужного СТОЛБЦА, чтобы число прибавлялось не к одной выделенной позиции, а ко всему столбцу. Потому что сначала нужно выделить нужную строку и к ней будет прибавление. А я хочу, чтобы выделять самому не нужно было.
Код кнопки на данный момент:
Private Sub Кнопка39_Click()
[Педагогический стаж].Value = [Педагогический стаж].Value + [Поле41].Value
End Sub
2) Есть кнопка, создающая новую таблицу. В ней записано имя. Когда пытаешься повторно создать таблицу, то выдается ошибка, что является верным. Но я хочу, чтобы каждый раз, когда нажималась кнопка, создавалась таблица с именем И С ИДЕНТИФИКАТОРОМ. Например, "Новая1", "Новая2" и т.д.
Код кнопки на данный момент:
Private Sub Кнопка48_Click()
Dim db As DAO.Database, tdf As TableDef, fld1 As Field
Set db = CurrentDb
Set tdf = db.CreateTableDef("Новая1")
Set fld1 = tdf.CreateField("Код", dbText, 150)
tdf.Fields.Append fld1
db.TableDefs.Append tdf
End Sub