powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / переименование полей
3 сообщений из 3, страница 1 из 1
переименование полей
    #32797358
Если в базе много полей как их переименвать последовательно
ну например
p1
p2
p3
p4
p5
p6
p7
p8
p9
p10

длэ экспорта в dbf формат
Просто в таблице 100 полей
тупо сидеть и переименовывать неохота
...
Рейтинг: 0 / 0
переименование полей
    #32797365
Rivkin Dmitry
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
1. Правила форума
2. А для чего переименовывать и во что?
3. Пока сидишь и ждешь ответа - уже бы переименовал бы :)
3а. А процедурку переименования написать слабо!?
...
Рейтинг: 0 / 0
переименование полей
    #32797372
те поля таблицы перименовать последовательно.
Я и подумал и написал код.Работает))

Sub asd()
Dim db As DAO.Database: Set db = CurrentDb
Dim td As DAO.TableDef: Set td = db.TableDefs("Objects")
Dim fd As DAO.Field
i = 1
For Each fd In td.Fields
i = i + 1
fd.Name = "p" & Trim(i)

Next

End Sub
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / переименование полей
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]