Excel макрос
Здравствуйте, на Маке есть Excel, мне нужно чтобы из столбика А все строки перенеслись в Word каждая строка на новую страницу в Word в одном и том же документе, чтобы Я смог их передать на печать за раз на разные листы. Мне дали вот такой макрос
Но при запуске иногда Runtime 5 летит, либо он запускает word создает документ но +- с 30 строки начинает по две строчки на лист добавлять по непонятной причине
Sub CopyColumnToWord()
Dim WordApp As Object
Dim WordDoc As Object
Dim LastRow As Long
Dim ws As Worksheet
Dim Cell As Range
' Создаем новый экземпляр Word
Set WordApp = CreateObject("Word.Application")
' Создаем новый документ в Word
Set WordDoc = WordApp.Documents.Add
WordApp.Visible = True
' Указываем лист Excel, с которого будем копировать данные
Set ws = ThisWorkbook.Sheets("Лист1") ' Измените на имя вашего листа, если необходимо
' Определяем последнюю строку в столбце A
LastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
' Копируем данные из столбца A в Word
For Each Cell In ws.Range("A1:A" & LastRow)
WordDoc.Content.InsertAfter Cell.Value & vbCrLf
Next Cell
' Очищаем переменные
Set WordDoc = Nothing
Set WordApp = Nothing
Set Cell = Nothing
End Sub
Возможно дело в каких-то настройках, мне нужно решить эту задачу. Можете использовать этот макрос можете другой без разницы лишь бы работало.
-
2 дня500 UAH
888 18 2 1 2 дня500 UAH
Здравствуйте!
Заинтересовал Ваш проект. Свяжитесь со мной для обсуждения деталей и сроков выполнения данного проекта.
Есть подобный макрос который полностью отвечает ТЗ.
-
1 день567 UAH
5940 345 0 1 день567 UAH
Рассмотрю вопрос переноса данных из Excel в Word на Mac.
Для начала укажите, какие именно Excel и Word используются
-
1 день500 UAH
221 6 1 1 день500 UAH
Срок указан не с момента принятия условий, а с момента появления электроэнергии у меня как исполнителя (программист без электричества может только трындеть, поэтому текст ниже)
Ошибка связана с неверным вызовом функции (до объявления передаваемых параметров или ошибке открытия/создания документа но потом вызове функций без проверки на успешность). По хорошему это гарантийный вопрос на пару часов к человеку который писал код с описанием когда именно (при каких действиях или в какой ситуации) возникает данная ошибка.
-
1 день500 UAH
543 19 2 1 день500 UAH
Добрый день, готов перередактировать ваш макрос или создать совершенно новый. Неоднократно писал макросы для Excel файлов.
Буду ждать ответа.
-
Не будет на маке корректно работать, проблема с word.application, это не исправить, я думаю.
-
Вы рассматриваете вариант например с пдф вместо ворд?
-
Актуальные фриланс-проекты в категории Веб-программирование
Разработчик сайтов / Web-мастер со знанием SEO (Иврит и Английский)Мы ищем современного веб-разработчика / веб-мастера для работы над проектами нашей SaaS-платформы Kadmoo. Нам нужен специалист, который живет в «новом мире» веб-разработки, следит за трендами и умеет создавать быстрые, оптимизированные сайты с использованием передового стека и… SEO-аудит сайтов, Веб-программирование ∙ 3 часа 24 минуты назад ∙ 17 ставок |
Настройка Google Analytics 4
3000 UAH
Необходимо выполнить аудит и настройку отслеживания событий через Google Analytics 4 и Google Tag Manager для сайта на WordPress Основные задачи: Проверка и исправление текущих настроек GA4 и GTM. Устранение проблем с отслеживанием конверсионных форм. Настройка отслеживания… SEO-аудит сайтов, Веб-программирование ∙ 8 часов 28 минут назад ∙ 22 ставки |
Настройка GTM-аналитики для GetCourse с привязкой рекламных данных к заказуНеобходимо настроить GTM-аналитику для образовательной платформы на GetCourse. Задача: через Google Tag Manager собирать рекламные данные пользователя из URL и cookie и привязывать их к конкретному пользователю/заказу в GetCourse. Необходимо собирать и сохранять такие данные:… Веб-программирование ∙ 19 часов 21 минута назад ∙ 15 ставок |
Нужно достать POST / GET / PUT запросы с мобильного приложения TikTok срочноПо сути. Нужно достать POST / GET / PUT запросы с мобильного приложения TikTok Даже по суи можно до конца не реверсить ничего такого ибо подписи есть в интернете и т.д. Но было бы тоже супер Вся авторизация (Отправка данных/подтверждение по почте и ввод кода если… Веб-программирование, Десктопные приложения ∙ 1 день 6 часов назад ∙ 20 ставок |
Функция поиска товаров по изображениюНеобходимо разработать и интегрировать на сайт функциюпоиска товаров по изображению.Что нужно реализоватьКнопка«Поиск по фото»на сайте.Загрузка изображения пользователем: JPG.Поиск визуально похожих товаров в каталоге.Вывод результатов в виде стандартных карточек товаров: фото,… PHP, Веб-программирование ∙ 1 день 7 часов назад ∙ 43 ставки |
Миргород