|
|
Другие темы раздела | |
VBA Разбить рисунок на точки с координатами
https://www.cyberforum.ru/ vba/ thread1529011.html Добрый день. Очень хочу воплотить в жизнь свою фантазию, но столкнулся с трудностями. :help: Этап 1 Суть программы в том, что бы она брала изображение и разбивала его множество точек с координатами. Причем чем темнее область изображения тем больше в ней точек. В принципе обработать изображение можно и в Photoshop, вопрос как тогда получить список координат точек? Этап 2 Нужно что бы... |
Присвоение расчетных данных в массив VBA Посмотрела предложенные топики - не уверена, что подходит. Помогите плиз, массив с расчетными данными не вставляется на лист. Дебаггер меня уже презирает и даже не ругается, поэтому никак не понять, чем он не доволен и почему массив не вставляется на лист. Код очень подробно комментирован, приложена картинка (дракон-схема) - может, ошибка в логике кода? |
VBA Сравнение колонок в таблице WORD, форматирование уникального текста
https://www.cyberforum.ru/ vba/ thread1528925.html Добрый день. Помогите, пожалуйста, с макросом для следующей задачи: Есть таблица WORD с двумя колонками. Изначально в столбцах одинаковый текст, потом вторая колонка изменяется. Пожелания к форматированию текста: - Если добавляется или удаляется текст во вторую колонку, - он выделяется жирным в этой колонке; и курсивом в первой колонке; - Если в правой колонке добавляется новый пункт – то в... |
VBA Требуется написать условия к макросу Всем добрый день. нужен человек который за не большое вознаграждение напишет не большое условия к имеющемуся макросу...пишите в личку. Прошу не закрывать тему т.к. очень нужна помощь, сам не справлюсь . спасибо https://www.cyberforum.ru/ vba/ thread1528924.html |
VBA Заполнение xlValidateList Добрый день. Для организации проверки данных использую пару процедур: Sub AddType(ByVal RangeCT As Range) Dim TypeList() As Variant TypeList = Array("ааа", "ббб", "ввв", "...", "ххх") AddValidationType RangeCT, Join(TypeList, ",") End Sub Sub AddValidationType(ThisRange As Range, ByVal List) |
VBA Организация сбора данных с дэшборда в общую БД Господа, добрый день. Подскажите, что можно поделать: Суть в том, что есть табличка, рассылается по городам. В каждом городе N человек ее заполняют, затем один человек по территории ее сводит, направляет мне, я свожу уже по стране. Табличка в формате дэшборда. Тоесть человек выбирает свое ФИО + территорию. По этим данным подтягиваются клиенты и строки для заполнения, которые как раз необходимо... https://www.cyberforum.ru/ vba/ thread1528890.html |
VBA Взаимосвязанные расчеты Добрый день. Есть две взаимосвязанные функции: y=f(x,a,b,c) и x=f(y,a,b,c). (по коду Ira() и ArI()) Значения x,y,a,b,c находятся в ячейках, допустим, с B2 по F2 (в дальнейшем аналогично и в строках ниже) Хочу сделать так, чтобы при введении пользователем значения в B2 (читай x) пересчитывалось значение в C2 (y), через функцию y=f(x,a,b,c), а при введении значения в C2 менялось значение в B2... https://www.cyberforum.ru/ vba/ thread1528878.html |
Выделить первую строку в таблице, в которой есть значения VBA Как выделить первую строку в таблице, в которой есть значения? (то есть выделить названия колонок в таблице) по идее должно быть вот так: Set r1 = Range("A1", Cells(1, Columns.Count).End(xlUp)) но такой код выделяет всю первую строку до конца документа. |
VBA Адрес ячейки
https://www.cyberforum.ru/ vba/ thread1528441.html Помогите вывести в переменные адрес выделенной ячейки (Букву и номер) Написал так, но что ни чего не получилось Sub 123() = ActiveCell.Address End Sub |
VBA Экспорт из Excel в Word колонтитулы
https://www.cyberforum.ru/ vba/ thread1528381.html Добрый день уважаемые Гуру VBA. Подскажите пожалуйста, как заменить текст в колонтитулах Word из Excel Использую след. код: Sub export_in_word_test() Dim b As Variant Dim g As Byte Path = "C:\Users\iuad12x3\Desktop\Development\ExcelInWord\ExcelInWord_2\Develop\test.doc" Set app = CreateObject("Word.Application") app.Visible = True |
VBA Написать макрос для двойного обмена квартир Макрос должен находить заданные запрос в таблице и выводить совпадения.,но у меня не получилось.Еще надо написать макрос для двойного обмена квартир если есть идеи напишите пожалуйста буду очень благодарна. Sub Podbor() r1 = Range("J12") k1 = Range("K12") r2 = Range("L12") p = 14 For i = 1 To БД_обмен.Count---здесь постоянно выходит ошибка что делать не знаю r3 = БД_обмен(i, 2) |
VBA Как организовать доступ к файлу? Все реализованы на базе Excel. Имеется справочник Договора, база данных с Взаиморасчетами и файл-отчет, который на основании информации из первых двух файлов строит отчет. Причем справочник Договора требуется для формирование ListBox и далее по выбранному коду получает информацию в базе данных. Требуется пользователям отдать файл-отчет, но как организовать доступ к остальным файлам, чтобы... https://www.cyberforum.ru/ vba/ thread1528192.html |
416 / 263 / 83
Регистрация: 27.10.2012
Сообщений: 861
|
|
12.09.2015, 16:54 | 0 |
Объединение нескольких файлов в одну таблицу (макрос не работает) - VBA - Ответ 806575612.09.2015, 16:54. Показов 3466. Ответов 1
Метки (Все метки)
Ответ
Файлы не смотрел, а в макросе замените 10 на нужное вам кол-во колонок.
Вернуться к обсуждению: Объединение нескольких файлов в одну таблицу (макрос не работает) VBA
0
|
12.09.2015, 16:54 | |
Готовые ответы и решения:
1
EF CodeFirst Объединение нескольких классов в одну таблицу Записать данных из нескольких файлов Excel в одну таблицу Объединение нескольких матриц в одну Объединение нескольких таблиц в одну |
12.09.2015, 16:54 | |
12.09.2015, 16:54 | |
Помогаю со студенческими работами здесь
0
Объединение нескольких таблиц в одну Объединение нескольких строк в одну Объединение нескольких колонок в одну Объединение нескольких строк в одну |