Как програмно менять подписи полей таблицы

08.08.2010, 13:58. **Показов** 2222. **Ответов** 2

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

Импортом создается таблица, которая потом экспорится в ексель. Для этого хорошо бы не имена полей иметь, а еще и подписи к ним. Если подпись поставить вручную в редакторе таблицы, то програмно потом менять ее можно. А как сделать, чтоб не имея подписи создать ее?

@And_110 · 08.08.2010, 16:10

Пока нет описания поля, у поля нет свойства Description. Его нужно создать, одновременно задается Value:

Visual Basic

Private Sub CreateDescription()
Dim prop As Property
 
Set prop = CurrentDb.TableDefs('t1').Fields('f1').CreateProperty('Description', dbText, 'This is the field f1 Description')
 
CurrentDb.TableDefs('t1').Fields('f1').Properties.Append prop
 
MsgBox CurrentDb.TableDefs('t1').Fields('f1').Properties('Description')
 
End Sub

08.08.2010, 16:26

Пасибо тибе, человечище !!!!!

))))))))) Наилучшим образом прокатило !!!

PeGaS_psg
		1
	Как програмно менять подписи полей таблицы 08.08.2010, 13:58. Показов 2222. Ответов 2 Метки нет (Все метки) Импортом создается таблица, которая потом экспорится в ексель. Для этого хорошо бы не имена полей иметь, а еще и подписи к ним. Если подпись поставить вручную в редакторе таблицы, то програмно потом менять ее можно. А как сделать, чтоб не имея подписи создать ее?

PeGaS_psg
	08.08.2010, 16:26	3
	Пасибо тибе, человечище !!!!! ))))))))) Наилучшим образом прокатило !!!