powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как задать размер колонок в таблице, через VBA?
47 сообщений из 47, показаны все 2 страниц
Как задать размер колонок в таблице, через VBA?
    #32226464
ALeXVB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Как задать размер колонок в таблице, через VBA?
Я создаю таблицу через VBA, а после заполняю и печатаю. Единственная проблема, перед печатью, так как таблица всегда создается новая, приходится в ручную менять размеры колонок.

Как мне изменить размеры колонок при создании таблицы в VBA или при её заполнении через VBA?
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32226473
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
печатать надо не таблицу, а отчет, тогда и проблем не будет.
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32226511
ALeXVB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Проблема в том, что отчет печатать нельзя, так как количество колонок произвольное для каждого пользователя..
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32226581
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ну тогда
"Свойство ColumnWidth определяет ширину столбца в объекте в режиме таблицы." (с) хелп по Ас
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32226687
ALeXVB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо попробую, а Help у меня не пашет, вернее русско английский, на лапопам... так что в Help'e понятна только половина, в английском я к сожалению не силен...
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32226706
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
Могу прислать хелп на иврите...
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32226712
Alexanderik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
О Cаныч !! не мне предложено, но не откажусь !!
т.е Заранее спасибо !!
Слать сюды ! e-mail:alex4003@bezeqint.net
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32226731
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
:^) Это была шутка. У меня нет готового. Если скажешь, какой файл слать, то я поищу.
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32226842
вадя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
добрый Саныч. главное предложить ....
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32227026
ALeXVB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Млин, ничего не выходит дело в том что формы для открытия у меня нет, есть только таблица в которой необходимо изменить размеры колонок сделав их очень узкими. А команда ColumnWidth хоть и сказанно что определяет ширину только в режиме таблицы, однако в Help'e того же Access'a в качестве примера написанно следующее:
Forms![Customers].RowHeight = 450
Forms![Customers]![Address].ColumnWidth = -2

а Forms то у меня отсутствует, если я что то не так понял, поясните пожалуйста...

Может есть другие способы? например через DAO 3.6
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32227342
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
Наверно, можно и с CurrentDb.TableDefs.
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32228203
Ан
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Win 98, A97

'Сначала создаём свойство "ColumnWidth" с помощью этой Sub

Public Sub SetFieldProperty(fldField As Field, strPropertyName As String, _
intPropertyType As Integer, varPropertyValue As Variant)
' Задает значение свойства поля без генерирования кода невосстанавливаемой ошибки выполнения.

Const conErrPropertyNotFound = 3270
Dim prpProperty As Property
On Error Resume Next ' Не перехватывать ошибки.
fldField.Properties(strPropertyName) = varPropertyValue
If Err <> 0 Then ' Ошибка при задании значения.
If Err <> conErrPropertyNotFound Then
On Error GoTo 0
MsgBox "Не удается задать свойство '" & strPropertyName _
& "' для поля '" & fldField.name & "'", 48, "SetFieldProperty"
Else
On Error GoTo 0

Set prpProperty = fldField.CreateProperty(strPropertyName, _
intPropertyType, varPropertyValue)
fldField.Properties.Append prpProperty
End If
End If
End Sub

'-----------------------------------------------------------------
'Пример вызова

Set tdf = Db.TableDefs(strTmpFileName)

' Ширина колонки в твипах
' 1см = 567твипов.

' Установить ширину первой колонки
Set fld = tdf.Fields(0)
SetFieldProperty fld, "ColumnWidth", dbInteger, 2530
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32228250
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
columnwidth - это стандартное свойство таблицы.
правда доступ к нему несколько корявый:

Код: plaintext
CurrentDb.TableDefs( "TableName" ).Fields( "FieldName" ).Properties( "ColumnWidth" ) = <значение в твидах>


Наслаждайся :)
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32228272
Фотография vdimas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Э-э!

Попроще. У открытой таблицы есть свойство - Form.

Короче. Создаешь форму для печати (именно форму) И готовишь макет так, как если бы готовил отчет.

В ней - встроенную форму, у которой в рантайме Form_Load ставишь SourceObject =Table.Table1.

Далее, у этого подчиненного объекта есть свойство Form. Через него дотягиваешься до столбцов и ставишь ширину. Заодно можно и цвета поменять и еще все что хошь у таблицы поменять.
Тут же переводишь эту же форму в режим предварительного просмотра.
Все.

Причем это касается не только твоего случая. Много чего можно предварительно понаделать на форме, прежде чем перевести в режим предварительного просмотра, попробуй - понравиться.

У меня половина отчетов сделано на основе именно специально разработанных форм. Правда есть один гемморой - если надо много уровней группировки, придется делать несколько вложенных форм.
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32228276
Фотография vdimas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
да, пока на форме идут манипуляции, свойство Visible=false. :)
Быстрей выполнятся все эти манипуляции + внешне никаких побочных эффектов.
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32228278
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Попроще. У открытой таблицы есть свойство - Form
ЧАВО???
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32228282
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Блин, вообще бред какой-то
Какой-такой режим предварительного просмотра у формы? Ты форму с отчетом не перепутал случаем? И таблицу с формой?
Бррр
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32228285
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 vdimas:
если это попроще , то я молчу.
и с каких это пор Form стало свойством таблицы ?-)
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32228288
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Лох как всегда впереди и на белом коне,
а я сзади и на старом осле
типа опоздал :)
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32228292
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Пост от 10:11 предлагаю считать следствием кратковременного залипания мозга.
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32228323
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 vdimas
Ну это не попроще никак:)
Строить отчёты на основе форм используя для печати предварительный просмотр конечно можно, но не правильно. В формулировках поаккуратнее - у таблицы нет свойства Form и быть не может по определению. Отчёты отчётами, а формы - формами, к сведению - отчёты так же просто форматировать как и формы.

2 Лох Позорный
Предварительный просмотр - как я понял, имелась в виду кнопка на стандартной панели инструментов. Либо так:
Код: plaintext
DoCmd.OpenForm  "Graphics" , acPreview

Свойство Form - свойство формы, у которой RecordSource таблица.
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32228336
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 hammer
А на хрена тогда предварительный просмотр ваапсче нужен?
На панели инструментов есть еще и кнопочка "Печать"
Спасибо что объяснил мне что такое св-во Form

Для тех кто в танке - процитирую
"Проблема в том, что отчет печатать нельзя, так как количество колонок произвольное для каждого пользователя"
Хотя это тоже в принципе решаемо (тупо контролы поскрывать)
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32228354
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я не объяснял - я просто пояснил, что имелось в виду:) Разные вещи, может просто так написал:)

Это, мля, к чему:
А на хрена тогда предварительный просмотр ваапсче нужен?
Если к этому Строить отчёты на основе форм используя для печати предварительный просмотр конечно можно, но не правильно , то повторяю - отчёты отчётами, формы - формами. Форматируются отчёты просто и есть примеры решения печати отчёта с переменным количеством столбцов.

А на панели инструментов ещё до хера разных кнопочек, спасибо что напомнил:)
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32228364
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 hummer
Так зачем именно предварительный просмотр? Сразу форму печатать (если надо), или через предварительный просмотр (опять-таки, если надо). Или что, без предварительного просмотра никак? Т.е. напрямую на принтер отправлять не умеем?

отчёты отчётами, формы - формами
Согласен. А таблицы - таблицами. Если хочет человек печатать таблицу - ну один раз предложили ему печатать отчет, он отказался (случаи разные бывают). Так зачем ему форму предлагать? Ниче не понимаю. Залипание мозга однозначно.

А на панели инструментов ещё до хера разных кнопочек, спасибо что напомнил:)
Например, "Создать отчет"
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32228379
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Например, "Создать отчет"
Гы:)

Умеем, умеем напрямую на принтер отправлять, не сумлевайся:) А предварительный просмотр нужен, когда для себя отчёт делаешь или его только разрабатываешь:) По крайней мере, я пользуюь им на этапе разработки. В данном случае не нужен конечно же.
Просто это вот к этому:
Какой-такой режим предварительного просмотра у формы?

Ну зачем форму предлагать я и сам плохо понял, раз человек от отчёта отказался.
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32229170
Фотография vdimas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 Hummer

кинь мне пустое мыло, я тебе пришлю в ответ готовый пример, а то твое мыло скрыто.

Есть у таблицы свойство Form! :) хоть это и звучит неправдаподобно для некоторых СПЕЦИАЛИСТОВ, но это уже не ко мне...
В редакторе свойств ты его не увидишь... :)

Зачем зря воздух гонять, я тебе готовый пример, ты сам же в форум и напишешь - есть там такое или нет, бред или небред (это для Лоха).

А предложения такого типа:
Код: plaintext
CurrentDb.TableDefs( "TableName" ).Fields( "FieldName" ).Properties( "ColumnWidth" ) = <значение в твидах>

не есть самые оптимальные, потому как эти проперти персистентные, т.е. в базу пишуться, т.е. лишние телодвижения и задержки.

2 Лох

Так зачем именно предварительный просмотр? Сразу форму печатать (если надо), или через предварительный просмотр (опять-таки, если надо). Или что, без предварительного просмотра никак? Т.е. напрямую на принтер отправлять не умеем?

Ну не смеши ты людей ради бога. :)
А использовать форму вместо отчета полезно именно на динамических вещах. Можно, ясен пень создать один универсальный отчет, у которого полно полей с запасом. Но мой подход более визуальный.

Лох, я ведь и тебе могу исходник скинуть - мне не жалко - мыло давай. А то у нас обмен любезностями какой-то беспредметный, на уровне охов и восклицаний.
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32229188
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В редакторе свойств ты его не увидишь... :)
Синтаксис в студию
Пример работы со св-вом Form у открытой таблицы.
На что это похоже? CurrentDb.TableDefs("asdf").Form? Так что-ли?
Думаю всем будет интересно.

Ну не смеши ты людей ради бога. :)
Это не ответ на вопрос - почему ты так уперся именно в предварительный просмотр. Создается впечатление, что без него (сразу на принтер) у тебя что-то не работает. Если впечатление неправильно - так и скажи, мол предварительный просмотр не нужен.
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32229212
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В догонку

насчет персистентных св-в
В принципе да, но это - изменения макета. Остается на клиенте (в случае прилинкованных таблиц). А работа с локальными пропертями времени не стоит нисколько.
В базу пишуться - ну так ведь это и хорошо. В следующий раз не надо будет менять.

А использовать форму вместо отчета полезно именно на динамических вещах
Только если пользователю ручками надо менять ширину. Тогда в форме это сделать можно, а в отчете нет.
Програмно же управлять шириной контрола - нуууу... немного удобнее для таблицы/формы (задал ширину столбца и все) чем в отчете (изменил ширину - двигай все остальные контролы). Но это мелочи.
Но все равно форма тут не нужна. Таблицы - хватает.
Если бы уже была форма - алгоритм работы для изменения ширины столбцов точно такой же (ColumnWidth и всех делов-то). Но специально для этого формы плодить - увольте
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32229448
Фотография progist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А я почти все отчеты делаю из ленточных форм (не считая стандартных бланков)
Польз-тель может настроить его как ему надо, ширину колонок изменить, и, самое главное - сортировку и фильтр задать по своему усмотрению. Таких возможностей ни один отчет не предоставит (в смысле Report)
Заодно и другая проблема ассеса решается - недержание ширины полей при печати.
Табличные формы (вот откуда свойство таблицы Form) тоже удобно использовать для печати (правда ширину программно не ставил)
Посмотреть - пожалуйста на моем сайте.
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32229480
Фотография vdimas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
У меня в одном учетном проекте было около 150 отчетов по всяким итогам, рейтингам и пр.пр.пр (это помимо приличного количества обычных отчетов, типа: накладная, прайсы, налоговая и еще несколько десятков). Причем, все такие отчеты по требованию заказчика должны были быть в двух вариантах - в печатном и в экранном (экранный отчет - это не предварительный просмотр :), это просто те же данные что и в отчете, но только в удобном именно для просматривания на экране виде).
Т.е. идя напрямую, мне пришлось бы ваять 300 шаблонов, а эт гемморой, особенно если вдруг надо общий стиль поменять всех отчетов по требованию заказчика.

Так вот я и использовал идею динамических подчиненных форм/таблиц/вью/процедур.

Создаешь пустой подчиненный объект. Потом в рантайме этому объекту присваиваешь SourceObject =StoredProcedure.MyReport1 или View.MyReport2 и т.д.

Тут progist обмолвился: Табличные формы (вот откуда свойство таблицы Form) тоже удобно использовать для печати
Уже теплее. :) Весь прикол в том, что подчиненная талица, view, stored proc или просто подчиненная форма ведут себя одинаково! :)
И оттуда там и свойство Form у ЛЮБОГО подчиненного объекта - все как у подчиненной формы! Хотя саму подчиненную форму ваять не потребовалось - просто указываешь какой вью или proc. (И ваще, че я очевидное доказываю да еще и оскобления выслушиваю? Лень что ли просто самим взять да посмотреть? :) )

Конечно потом "ручками" ставить проперти и ширину каждого поля - это садомазохизм, когда у тебя 150+150 отчетов. Поэтому у меня есть пара таблиц с метадатами, куда я прописываю с помощью весьма простой служебной формы, что и как должно выглядеть. Все это множество отчетов разбивается на несколько групп по подобиям. Для каждой группы была сделана своя главная форма или главный отчет (всего у меня было 12+12, что гораздо интереснее, чем 150+150), и в метаданных все прописано - какой отчет (ВИРТУАЛЬНЫЙ ОТЧЕТ) в какой форме отображается, заголовок, столбцы и пр.пр.пр. После этого сваять новый подобный отчет для меня было равно по времени проектированию соотв. запроса или процедурки, и добавления пункта в меню или кнопки на форме. (А пожелания заказчиков сыпались как из рога изобилия, особенно когда он просек, что на новый отчет у меня уходит около 2-10 мин.)

По поводу использования форм в качестве шаблонов для отчета (и по поводу восклицаний на этот счет). Так вот, когда открываешь отчет на просмотр или ДАЖЕ на печать (2 ЛОХ), то ничего в СТРУКТУРЕ объекта поменять уже невозможно. :(
Поэтому я и использовал в некоторых случаях вместо шаблонов отчета формы, там где "дешевле" было все сделать динамически (это когда есть масса похожих по структуре отчетов).

Весь прикол в том, что от подчиненной таблицы, вьюшки, процедуры можно перехватывать все такие же события как от формы. Я, например, по просьбе заказчика выделял текущую строку целиком в режиме экранного отчета (всего одна строка кода на основной форме, которой ваще пофиг, что ИМЕННО за объект лежит в качестве подчиненного).

На всей этой ерунде сэкономил около 300 объектов проекта и не меньше месяца нуднейшей однообразной работы.

В принципе, Access позволяет вообще обходиться без полей на отчете. Просто в соответствующих событиях при печати или предварительном просмотре можно ВЕСЬ отчет нарисовать "ручками", как душе будет угодно :)
Баловался я этим хохмы ради, но реально использовал только частичное "дорисовывание" в некоторых отчетах - там где рисуемый элемент должен был по размеру располагаться на нескольких секциях данных сразу, в этом случае только "ручное" рисование и помогает.
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32229482
Фотография vdimas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 ЛОХ

да, забыл
Синтаксис в студию

me.RepDetail.SourceObject="View.View1" ' или "StoredProcedure.StoredProcedure1"
with me.RepDetail.Form
...
end with
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32229484
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 progist
Польз-тель может настроить его как ему надо, ширину колонок изменить, и, самое главное - сортировку и фильтр задать по своему усмотрению. Таких возможностей ни один отчет не предоставит (в смысле Report)
Согласен. Зато такие возможности предоставит любая таблица в режиме таблицы



2 вдимас
Блин, ну или дурак, или оно не лечится

Тебе задали простой вопрос
"Попроще. У открытой таблицы есть свойство - Form
ЧАВО???"

Чего за хуйню ты в ответ понаписал?
"В редакторе свойств ты его не увидишь"
Иди ты на хуй в свой севастополь

Вопрос был (для тупых процитирую)
"Как задать размер колонок в таблице, через VBA?"
Кому какое дело как ты сделал свои сто пятьдесят отчетов?
Пытаюсь быть объективным - хорошие мысли в твоем решении есть (типа похвала). Пытаюсь быть субъективным - на фиг здесь (в этом топике) никому не нужны.

И ваще, че я очевидное доказываю да еще и оскобления выслушиваю?
И ваще, не говори очевидной хуйни - не будешь выслушивать оскорблений.

Искренне прошу у всех прощения за весь мат и срач. Не сдержался.
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32229502
Фотография vdimas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 ЛОХ
Блин, случай упорного взаимного непонимания (сквозь все топики).

ЛОХ: Вопрос был (для тупых процитирую)
"Как задать размер колонок в таблице, через VBA?"

Самый первый мой ответ:

Попроще. У открытой таблицы есть свойство - Form.

Короче. Создаешь форму для печати (именно форму) И готовишь макет так, как если бы готовил отчет.

В ней - встроенную форму, у которой в рантайме Form_Load ставишь SourceObject ="Table.Table1"

Далее, у этого подчиненного объекта есть свойство Form. Через него дотягиваешься до столбцов и ставишь ширину. Заодно можно и цвета поменять и еще все что хошь у таблицы поменять.
Тут же переводишь эту же форму в режим предварительного просмотра.
Все.

Ты прицепился к первой фразе, не прочитав последующие, где были все ответы (Естессно, первое предложение, мягко говоря, неккоректно, если не читать последующие). На вопрос подробнее, я предложил выслать на мыло исходники примера, потому как принцип уже объяснил, а дальнейшая детализация - только исходники.

Далее:

ЛОХ: ну один раз предложили ему печатать отчет, он отказался (случаи разные бывают). Так зачем ему форму предлагать? Ниче не понимаю

Когда открываешь отчет с подчиненной таблицей, то уже нет возможности "играть" колонками этой подчиненной таблицы, поэтому предложил форму (и причину эту уже указывал).

Далее:

ЛОХ: (ColumnWidth и всех делов-то). Но специально для этого формы плодить - увольте

А если он захочет потом перевести базу на ADP?
Прикол в том, что такая форма может быть только одна, и можно создавать по new ее экземпляры под какое угодно количество тейблов. Т.е. она (эта единственная форма) служит именно для целей "Как задать размер колонок в таблице, через VBA?", типа способ такой, типа хелпер.

Код: plaintext
1.
2.
3.
4.
5.
6.
dim rpt as new Form_Helper
rpt.RepDetail.SourceObject= "Table.Table1" 
with rpt.RepDetail.Form
... ' устанавливаем ширину'
end with
... 'отображаем в предварительном просмотре или печатаем'

Я ж те грю - я здесь чел новый, как ИМЕННО надо отвечать - не знаю, поэтому отвечаю в том духе, в котором спрашивают. Спросил бы автор топика сказал "напишите мне код" - написал бы код, спросил в духе "а как?", я ответил в духе "А вот примерно так!".

А че ты к последнему моему посту прицепился - ваще загадка. Народ стал делиться как и что он делает по этой теме, ну и я поделился. Кому-то это может оказаться полезным, многие мои знакомые используют похожие приемы.

И ваще, у меня к личности ЛОХ разгорается нездоровый интерес, надыть пересечься как-нить или водки попить или морды побить, в целях устранения взаимонепонимания. :)
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32229562
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ух ееее
два дня рождения за один вечер пагубно повлияли на мою неокрепшую детскую психику
Еще раз сорь перед всеми и особенно перед vdimas. Был неправ, вел себя недостойно чести советского офицера. Три раза КУ.

Насчет твоего способа уже написал - способ хороший. Особенно на трезвую голову.
В терминологии поаккуратнее, ну об этом уже говорили.

Я, в общем, тоже не фанат давать пользователям данные в виде таблиц/запросов (без форм и отчетов), так что чего я тут развонялся - сам не понял.

Усе. Ушел мутировать.
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32229575
Фотография progist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не хочется, что бы народ здесь нервничал и ругался, можно просто и профессионально - обозвать оппонента ЛАМЕРОМ.
Всех с утра уважаю, так как пока не жарко иду на море купаться (я же в отпуске, и море рядом не какое-нибудь, Саныч знает).
Так вот согласен с vdimas, т.к. сам использую технологию создания динамических отчетов для экрана и печати на основе ленточных форм и таблиц.
Например есть у меня отчет Оборот товаров. Для основы сделаны 2 формы
1 ленточная и 1 табличная
Сразу я даже затрудняюсь сосчитать, какое количество отчетов можно полуучить на основе этих форм. Причем меняется и количество колонок, и группировка и полдписи и источники данных, и отчеты можно открывать поверх уже открытого, т.е. создаются экземпляры форм. Можно ставить отчеты рядом и сравнивать и т.д. и т.п. Все очеты можно сортировать и фильтровать на месте после формирования, (я не большой знаток Crystal Reports, могу ошибится, но приложения, с отчетами на нем, просто отдыхают рядом с такими возможностями Ассеса).
Вот отчет: http://www.inakta.ru/im/sb/sb_15.htm - в виде иерархического Grid-а
(2 вложения) - тоже построен по этой технологии.
Так что не надо горячиться, голов на земле много, да и пиво мы все любим
С этим и ухожу на море :)
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32229591
ALeXVB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
sasha_1
Код: plaintext
CurrentDb.TableDefs( "TableName" ).Fields( "FieldName" ).Properties( "ColumnWidth" ) = <значение в твидах>

Никак не катит, в семействе Properties 19 элементов среди которых нет ColumnWidth
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32229601
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Никак не катит, в семействе Properties 19 элементов среди которых нет ColumnWidth

А ты его туда добавь
посмотри на пост выше (от вчера, 09:26)
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32229630
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Мда, до мата уже в открытую опутились:)

2 vdimas
Ладно, меня можно считать не специалистом, про свои проекты я говорить не буду, о том, как реализовывал тоже, но вот это:

Есть у таблицы свойство Form! :) хоть это и звучит неправдаподобно для некоторых СПЕЦИАЛИСТОВ, но это уже не ко мне...
В редакторе свойств ты его не увидишь... :)


Ага, далее из текста вытекает, что свойство Form есть у StoredProcedure, у View:) Вот такие вот чудеса на виражах:)
Это свойство принадлежит именно ПУСТОМУ ПОДЧИНЁННОМУ ОБЪЕКТУ, то есть контейнеру, которому ты присваиваешь SourseObject, то есть источник, но это свойство никак не источника. Вот, собственно и всё, что хотел сказать.

За исходники спасибо, с этим способом знаком и его реализация мне известна. Разумеется, с формой работать проще, чем с отчётом, особеннно с форматированием и наведением красот.
Просто сейчас пользуюсь отчётами, для работы с отчётом используется Excel или Word, компания, в которой я сейчас работаю, не выдвигает таких требований к интерфейсу, поэтому таким способом и не пользуемся. Отчёты в экранном виде тоже присутствуют, в табличной форме как результат работы хранимых процедур.
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32229653
ALeXVB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ребята, огромное спасибо вам за помощь

vdimas
Если не трудно скинь мне исходники aveselkov@nm.ru
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32229761
Фотография vdimas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Дабы навести последний блеск в выяснении отношений:

hummer

Ага, далее из текста вытекает, что свойство Form есть у StoredProcedure, у View:) Вот такие вот чудеса на виражах:)
Это свойство принадлежит именно ПУСТОМУ ПОДЧИНЁННОМУ ОБЪЕКТУ, то есть контейнеру, которому ты присваиваешь SourseObject, то есть источник, но это свойство никак не источника. Вот, собственно и всё, что хотел сказать.

Ну, мое стремление к лаконичности в первом посте сослужило мне плохую службу :)

Если уж быть совсем точным, то свойство Form есть свойство того объекта, который сам Access автоматически создает для отображения вернувшихся по запросу данных. По своей структуре этот автоматически сгенерированный объект полностью идентичен обычной форме в режиме таблицы.

Теперь корректно? :)
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32229768
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Теперь корректно

Лаконичность, сестра лени - наш враг. Долой.
Краткость, сестра таланта - наш друг. Даешь.
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32229787
ALeXVB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
progist
Я полазил на http://www.inakta.ru/im/sb/sb_15.htm
и заметил интересный контрол в справочние клиентов, окно просмотр/исправление. Там слева меню (Название, Адрес и т.д.) неподскажешь где ты такое меню взял? Где его можно достать?
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32229952
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 vdimas
Да ладно, это я так - с утра не выспавшись был:) Ну я и написал про контейнер (уж не знаю, как он корректно в аксессе называется:))

Оффтоп
Был бы не в Севастополе, с удовольствием бы тоже хлебнул водовки:)
Хороший город, отдыхал я там в прошлом году:)
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32230326
Фотография progist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2ALeXVB
Как - то на досуге (как сейчас, в отпуске) взял да и нарисовал сам ради интереса
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32230359
ALeXVB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
progist
Жутко хорошо сделанно, неможешь скинуть примерчик данного контрола... aveselkov@nm.ru
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32230374
Фотография progist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
суть ее проста - Labels, Lines, OnMouseMove, и TabControl, вот возни много,
скачай прогу, посмотри как работает и нарисуешь сам. Меняется цвет линий - вот и кажется, что вдавлено-выпукло
Виктор Сенин знает компанию ( кажется QuantumExpress) - так они бесплатно дают SideBarControl - это настоящий контрол, как в OutlookExpress, в аксес легко должен встраиваться, у них даже пример на аксесе есть. ССылки с собой нет, но найдеш легко
...
Рейтинг: 0 / 0
Как задать размер колонок в таблице, через VBA?
    #32230841
ALeXVB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
progist
Я поискал в нете, ничего не могу найти, поищи пожалуйста ссылочку...
...
Рейтинг: 0 / 0
47 сообщений из 47, показаны все 2 страниц
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как задать размер колонок в таблице, через VBA?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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