|
|
| Другие темы раздела | |
|
VBA Невозможно внести изменения в DAO.Recordset
https://www.cyberforum.ru/ vba/ thread1254123.html Добрый день, уважаемые форумчане! Создаю recordset по запросу sql: Dim db As DAO.Database Dim rs As DAO.Recordset SQL = "select t1.*, t1.f5 - t2.f5 as f from t1 left join t2 on t1.id=t2.id" Set rs = db.OpenRecordset(SQL) Запрос приведен упрощенный. На самом состоит из нескольких joinов и объединяет собой 5 таблиц. Если надо, могу в комментариях написать его подробно. Далее мне нужно... |
VBA Написать код на вычисление суммы Алгоритм: Суммирование_1 цел:K,N; вещ:S; { Запросить N; S:=S+K; } Сообщить S; } |
|
VBA Доработать программу для экспорта файлов .csv в .xls
https://www.cyberforum.ru/ vba/ thread1254017.html Есть шедевр говнокода на делфи, исходники которого мне увы недоступны, который генерирует (немного криво) отчетность в .csv. Мне нужно их чуть-чуть украсить и поправить косяки генератора, сохранив результат в xls (не xlsx, а именно xls). Я это сделал, и взяв труды одного местного товарища за основу, допилил обработку пачек .csv И ВСЕ они сохраняются ужасно криво, половина столбцов едет, вместо... |
VBA Выделить часть из многоуровневых маркированных списков MS Word Здравствуйте, уважаемые форумчане. Помогите выделить, форматнуть многоуровневые маркированные списки. Задача, в том чтобы выделить кусок списка, а я затем ручками буду присваивать уровень стилем. Пример во вложенном файле. Также буду рад любым предложениям, как их лучше обрабатывать после копипаста из других доков. https://www.cyberforum.ru/ vba/ thread1253982.html |
|
Исправить ошибку "Object required" при использовании метода selectSingleNode VBA Ребят такая проблема, при присвоении переменной Cost значения из xml фаилаб выдает ошибку : Требуется объект : PSi.selectSingleNode(...)'. Кто может подсказать как пофиксить эту проблему? (Строку с ошибкой пометил красным!) |
VBA Доработать код с возможностью деления информации на столбцы, объяснить, как сделать надстройку Уважаемые форумчане. Помогите доработать код нужно чтобы при вставки отфильтрованного значение делились на два столбца. И помогите сделать надстройку из этого кода. Sub Макрос() ' ' Макрос8 Макрос ' ' Range("A1:A14").Select Range("A1:A14").AdvancedFilter Action:=xlFilterInPlace, Unique:=True https://www.cyberforum.ru/ vba/ thread1253840.html |
|
VBA Исправить ошибку "Subscript out of range" при обращении к рабочей книге
https://www.cyberforum.ru/ vba/ thread1253803.html Всем привет. помогите пожалуйста с ошибкой Private Sub CommandButton1_Click() Workbooks.Open Filename:="D:\Kadr3\kadr3.xlsm" Workbooks("D:\Kadr3\kadr3.xlsm").Worksheets("Rabotniki").Range("A3:V3000").Copy Workbooks("MMQ.xlsm").Activate |
VBA Построить график зависимости (точечный график) Здравствуйте, нужно построить график зависимости в VBA :) Грубо говоря график по точкам Помогите пожалуйста... R - вводиться с клавиатуры |
| VBA Осуществить чтение текста из файла с разбивкой на слова Задача в разбиении текста на слова. В качестве разделителя пробел. Сначала хотел в этом цикле сделать дописывание строк в символьный массив arr, но arr = arr & Split(var) не работает. Do While Not EOF(1) Line Input #1, var arr = Split(var) Loop Потом решил сделать замену перехода к новой строке на пробел, но никаких изменений не наблюдаю. Как её произвести? Do While Not EOF(1) ... https://www.cyberforum.ru/ vba/ thread1253712.html |
VBA Как избежать смены текущей папки при работе с файлами?
https://www.cyberforum.ru/ vba/ thread1253641.html А вот у меня проблема поинтереснее. Первое открытие файла происходит нормально, а после закрытия и повторной попытки открыть - не находится. В пути указывается только имя файла, то есть искаться должен в текущем каталоге. Может ли программа в ходе выполнения по своей воле менять папку? Кто может чего посоветовать? Добавлено через 10 минут Всё-таки происходит смена папки. Как запретить? |
|
VBA Почему запускается функция при присвоении значения свойству FormulaLocal? Такая ситуация: в одной книге куча макросов и есть ещё функция. И мне нужно присвоить значение или формулу ячейке. Из всех способов, что я знаю, это FormulaR1C1, FormulaLocal, Value. Примерно это выглядит вот так: ActiveCell.Select With Selection .HorizontalAlignment = xlRight End With |
VBA Написать функцию с диапазоном фамилий в качестве аргумента, которая возвращает этот диапазон без повторений Написать функцию КОМАНДЫ, аргументом которой является диапазон, содержащий фамилии студентов. Перед вызовом функции пользователь выделяет свободный диапазон рабочего листа, состоящий из двух столбцов и нескольких строк, функция вводится как формула массива (CTRL+SHIFT+ENTER) и возвращает два столбца фамилий студентов без повторений, фамилии студентов выбираются из диапазона, который задан в... https://www.cyberforum.ru/ vba/ thread1253362.html |
|
4135 / 2239 / 940
Регистрация: 01.12.2010
Сообщений: 4,624
|
|||||||||||
| 18.09.2014, 22:52 | 0 | ||||||||||
Из файла xls/xlsx взять выбранную пользователем строку и создать документ docx - VBA - Ответ 662200518.09.2014, 22:52. Показов 2079. Ответов 16
Метки (Все метки)
Ответ
xenohunter, На самом деле, можно использовать Shapes.AddPicture и сразу указывать позицию рисунка. Нужно только вспомнить, что у Shape родитель - это документ, в примере, это doc, а не Selection
Вернуться к обсуждению: Из файла xls/xlsx взять выбранную пользователем строку и создать документ docx VBA
1
|
|||||||||||
| 18.09.2014, 22:52 | |
|
Готовые ответы и решения:
16
Создание файла *.xls (*.xlsx) по заданному пользователем адресу Работа с файлами в формате .doc, .docx, .xls, .xlsx Скрипт поиска слов в любых файлах, в т.ч. docx, doc, xlsx, xls Бесплатные либы для создания, редактирования PDF, DOCX, XLSX, XLS, DOC и конвертации их между собой |
| 18.09.2014, 22:52 | |
| 18.09.2014, 22:52 | |
|
Помогаю со студенческими работами здесь
0
В одной учетной записи не открываются файлы *.doc *.xls (При этом все хорошо с *.docx *.xlsx) Как извлечь из XLS-файла заданную строку и записать её в текстовый документ? DataGridView: Как получить выбранную пользователем строку Удалить строку, выбранную пользователем в объекте DataGridView |
Наверх