Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/6: Рейтинг темы: голосов - 6, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 04.11.2016
Сообщений: 2

Из поля со списком Access в шаблон Excel

24.07.2018, 10:42. Показов 1386. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Добрый день, уважаемые гуру!
Есть форма «Сотрудники», на ней есть 4 вкладки с разными данными каждого сотрудника. На одной из вкладок есть поле со списком («Должность»).
Все данные, которые мне нужны, передаются в Excel (по нажатию кнопки из формы конкретного сотрудника), но не хватает знаний написать код для выгрузки данных «Должность» в Excel (выгружается код).
Помогите, пожалуйста, написать код.

Сейчас вот так:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Dim xlApp As Object
Dim kod As String
kod = Me.Должность
Set xlApp = CreateObject("Excel.Application")
xlApp.Workbooks.Open ("C:\ Карточка.xlsx")
With xlApp.Workbooks("Карточка.xlsx").Sheets(1)
.Range("C8").Value = kod
End With  
    xlApp.Visible = True
    Set xlApp = Nothing
End Sub
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
24.07.2018, 10:42
Ответы с готовыми решениями:

Значение по умолчанию для поля со списком в UserForm Excel
Друзья, помогите с таким вопросом: В Excel создана userform и на ней по со списком с двумя Column. Источник данных для него -...

Обращение к полю со списком в таблице Access из Excel
Здравствуйте форумчане! Необходима Ваша помощь в решении данного вопроса. Имеется база Access в ней находится форма с текстовыми полями и...

Экспорт поля МЕМО из Access запроса в Excel Шаблон без потери знаков (>255)
Доброго времени суток! Есть работающее Access приложение для создания протоколов совещаний. Текст протоколов часто большой, поэтому в...

2
Эксперт MS Access
26827 / 14507 / 3192
Регистрация: 28.04.2012
Сообщений: 15,782
24.07.2018, 11:00
Лучший ответ Сообщение было отмечено Sonya_51 как решение

Решение

Предположу, что текстовое значение должности находится не в баунд-колумн (присоединенный столбец), а в другом, например втором слева столбце. Это будет Column(1) поскольку нумерация с нуля. Тогда
Visual Basic
1
kod = Me.Должность.Column(1)
1
0 / 0 / 0
Регистрация: 04.11.2016
Сообщений: 2
24.07.2018, 14:25  [ТС]
mobile, пробовала, пишет ошибку: method or data member not found

Добавлено через 3 часа 19 минут
mobile, Спасибо Вам огромное! Ваш ответ в точку! Нашла ошибку в названии и всё получилось. Еще раз спасибо, гуру!!!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
24.07.2018, 14:25
Помогаю со студенческими работами здесь

Access 2013 + VBA не обновляются поля при программном изменении значения поля со списком
Доброго времени суток, уважаемые форумчане! Поскажите, пожалуйста, решаем ли следующий вопрос. Форум и интернет - перекапывал...

access поля со списком
начал изучать access и вот возникла проблема. имеется таблицы страны, республики, города. нужно сделать форму на которой будет 3 поля со...

Как создать неизменяемый текстовый шаблон для каждого значения поля со списком?
Привет! прошу:sorry: помочь мне с решением данного вопроса. Я в этом мягко говоря "не специалист"... хотелось бы чтоб при выборе...

БД в Access, фильтрация, поля со списком скважины
Добрый день. Возникло несколько проблем с бд, помогите пожалуйста. Первая - как сделать так, чтобы можно было бы отобразить все...

Ms Access подстановка значений при выборе из поля со списком
Добрый день! всем, помогите пожалуйста делаю примитивненькую БД по учету определенного вида работ -- есть основная таблица в...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
Знаешь почему 90% людей редко бывают счастливыми?
kumehtar 14.04.2026
Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД
Maks 14.04.2026
Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code
Loafer 13.04.2026
{ "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы
Maks 13.04.2026
Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru