Как скопировать таблицу из письма в excel
Нужна помощь, VBA для копирования таблицы из почты Outlook с определенной темой, чтобы преуспеть в определенном месте
Проблема: код работает нормально, ошибок нет. Почта открывается, а также открывается файл excel. Но таблица не копируется. Пожалуйста, помогите в этом.
Dim xMailItem как вариант
Dim olNs как Outlook.NameSpace
Dim olFldr как Outlook.MAPIFolder
Dim olItms As Outlook.Items
Dim xTable как Word.Table
Dim xDoc как Word.document
Dim wordApp как объект
Dim xExcel как объект
Dim xWb как рабочая книга
Dim xWs как рабочий лист
Дим я пока
Dim v как целое число
Dim xRow как целое число
Dim StrFile$
On Error Resume Next
Установите olApp = Новый Outlook.Application
Установите olNs = olApp.GetNamespace("MAPI")
Установить olFldr = olNs.GetDefaultFolder(olFolderInbox)
Установите olItms = olFldr.Items
Установите wordApp = CreateObject("Word.Application")
Установите xExcel = CreateObject("Excel.Приложение")
Для каждого xMailItem в olItms
Если Int(xMailItem.ReceivedTime) >= Дата Тогда
Если InStr(xMailItem.Subject, "Состояние резервного копирования сегодня") > 0 Тогда
'xMailItem.Display
Установить xDoc = xMailItem.GetInspector.WordEditor
Для v = 1 В xDoc.Tables.Count
Установить xTable = xDoc.Tables(v)
xTable.Range.Copy
StrFile = "C:\Users\priyanka.jeganathan\OneDrive - Accenture\Accenture\Learning\Daily DashBoard Basesheet.xlsx"
Установите xWb = xExcel.Workbooks.Open(StrFile)
Установите xWs = xWb.Worksheets("IRIS Daily")
xWs.Активировать
xWs.Вставить
xRow = xRow + xTable.Rows.Count + 1
xWs.Range("A" & CStr(xRow)).Выбрать
Далее
я = я + 1
End If
End If
Следующий xMailItem
xWs.Дисплей
xWs.Range("A1:A6").Ширина Колонки = 43
xWs.Rows("1:6").RowHeight = 16.5
Установите olFldr = Ничего
Установить olNs = Ничего
Установить olApp = Ничего
End Sub
Функции: В формуле J1 - это ячейка электронной почты, которую вы используете, вы можете изменить ее по своему усмотрению.
Затем перетащите дескриптор автозаполнения на ячейки, которые вам нужны, чтобы применить эту формулу.
1. Скопируйте и вставьте адреса электронной почты из Excel в документ Word как Сохранять только текст. Смотрите скриншот:
2. Выберите электронные письма и нажмите Главная > Замените для отображения Найти и заменить диалог. Смотрите скриншот:
3. в Найти и заменить диалог, введите ^p в Найти то, что текстовое поле и ; в Заменить текстовое окно. Смотрите скриншот:
После бесплатная установка Kutools for Excel, сделайте следующее:
1. Выберите электронные письма и нажмите Кутулс > Текст > Добавить текст. Смотрите скриншот:
2. в Добавить текст окно, введите точку с запятой ; в Текстовое окно, и проверьте После последнего символа. Смотрите скриншот:
В этой статье говорится об экспорте всех писем из почтовой папки Outlook в новую книгу Excel. И есть два решения:
- Экспорт всех писем из почтовой папки в Outlook в Excel / CSV с функцией копирования
- Экспорт всех писем из почтовой папки в Outlook в Excel / CSV с функцией импорта / экспорта
- Экспорт каждого электронного письма из почтовой папки Outlook в отдельный файл Excel / CSV.
- Экспортируйте все электронные письма из почтовой папки в Outlook в Excel с помощью замечательного инструмента.
Экспорт всех писем из почтовой папки в Outlook в Excel / CSV с функцией копирования
Этот метод поможет вам скопировать все электронные письма из почтовой папки в Outlook, а затем напрямую вставить в книгу Excel. Пожалуйста, сделайте следующее:
2, Выключить Область чтения кликнув Смотреть > Область чтения > Выкл. Смотрите скриншот:
3. Нажмите Смотреть > Добавить столбцы , чтобы открыть диалоговое окно Показать столбцы. Смотрите скриншот ниже:
5. Теперь выберите все электронные письма в открытой папке и скопируйте их, нажав Ctrl + C ключи одновременно.
Внимание: Есть два способа выбрать все электронные письма в открытой почтовой папке в Outlook: A. Выберите первое электронное письмо в списке рассылки, а затем нажмите Ctrl + Shift + Конец ключи одновременно; B. Выберите любой адрес электронной почты в списке рассылки и нажмите кнопку Ctrl + A одновременно.
6. Создайте новую книгу, а затем вставьте электронные письма в Excel, выбрав ячейку A1 и нажав Ctrl + V ключи одновременно.
7. Сохраните книгу.
Внимание: Если вы хотите сохранить все электронные письма в виде файла CSV, нажмите Файл > Сохранить как в книге, чтобы сохранить ее как файл CSV.
3 шага для экспорта всех писем из почтовой папки Outlook в Excel
В общем, вы можете применить функцию импорта / экспорта для экспорта писем из почтовой папки Outlook в книгу Excel с помощью 12 шагов. Однако, если вы установили Kutools для Outlook, достаточно всего 3 кликов с Быстрый отчет Функция! Нажмите, чтобы получить 60-дневную бесплатную пробную версию без ограничений!
Экспорт всех писем из почтовой папки в Outlook в Excel / CSV с функцией импорта / экспорта
Этот метод представит Microsoft Outlook Мастер импорта и экспорта для экспорта всех писем из почтовой папки в книгу Excel.
1. Нажмите Файл > Открыть и экспортировать (или Откройте)> Импорт/Экспорт (или Импортировать).
2. В открывшемся мастере импорта и экспорта нажмите, чтобы выделить Экспорт в файл и нажмите Далее кнопку.
3. В открывшемся диалоговом окне «Экспорт в файл» нажмите, чтобы выделить Значения, разделенные запятыми и нажмите Далее кнопку.
4. В новом диалоговом окне «Экспорт в файл» щелкните, чтобы выделить почтовую папку, из которой вы будете экспортировать электронные письма, и щелкните значок Далее кнопку.
5. В третьем Экспорт в файл диалоговое окно, щелкните Приложения кнопку.
6. В всплывающем Приложения диалоговом окне, укажите папку назначения, в которую вы сохраните экспортированный файл CSV, назовите ее в поле Имя файла и нажмите OK кнопка. Смотрите скриншот выше:
7, Затем нажмите Далее в диалоговом окне Экспорт в файл.
9. В диалоговом окне «Сопоставление настраиваемых полей» добавьте или переместите поля в к как вам нужно, а затем щелкните OK кнопка. Смотрите скриншот выше:
Пока все электронные письма в указанной почтовой папке уже экспортированы в виде файла CSV. Чтобы сохранить файл в формате Excel, выполните следующие действия:
11. Перейдите в папку назначения, щелкните экспортированный файл CSV правой кнопкой мыши и выберите Открыть с помощью > Excel из контекстного меню. Смотрите скриншот:
12. Теперь экспортированный файл CSV открывается в Excel. Сохраните книгу Excel.
До сих пор мы уже экспортировали все электронные письма из указанной почтовой папки в Outlook в новую книгу Excel.
Экспорт каждого электронного письма из почтовой папки Outlook в отдельный файл Excel / CSV.
Если у вас установлен Kutools for Outlook, вы можете применить его Сохранить как файл функция, позволяющая легко экспортировать каждое электронное письмо из почтовой папки Outlook в отдельный файл Excel или CSV-ФАЙЛ всего за несколько кликов. Пожалуйста, сделайте следующее:
Kutools для Outlook: Добавьте более 100 удобных инструментов для Outlook, вы можете попробовать их бесплатно без ограничений в течение 60 дней. Читать далее Бесплатная пробная версия
1. Откройте указанную почтовую папку в Outlook, нажмите Ctrl + A клавиши, чтобы выбрать все электронные письма в нем, и нажмите Кутулс > Массовое сохранение.
Теперь вы увидите, что каждое электронное письмо в указанной почтовой папке экспортируется как отдельная книга (или файл CSV) массово. Смотрите скриншот:
Экспортируйте все электронные письма из почтовой папки в Outlook в Excel с помощью замечательного инструмента.
Если у вас есть Kutools для Outlook установлен, вы можете применить его Быстрый отчет функция быстрого экспорта всех писем из папки Outlook в Excel всего за 3 шага.
Kutools для Outlook: Добавьте более 100 удобных инструментов для Outlook, которые можно попробовать бесплатно без ограничений в течение 60 дней. Читать далее Бесплатная пробная версия
1. Щелкните, чтобы выбрать указанную почтовую папку в области навигации, и щелкните Кутулс Плюс > Быстрый отчет.
2. В диалоговом окне «Сохранить отчет» нажмите кнопку, выберите папку назначения, в которую вы сохраните файл Excel, назовите выходной файл в Имя файла поле и нажмите кнопку Сохранить.
3. Теперь появляется диалоговое окно с запросом разрешения на открытие выходного файла. Нажмите Да двигаться вперед.
Пока все электронные письма в указанной почтовой папке были экспортированы во вновь открывающуюся книгу.
Статьи по теме:
Экспорт адресов электронной почты отправителей из почтовой папки в Outlook
Предположим, вы хотите экспортировать адреса электронной почты всех отправителей из почтовой папки в Outlook for Statistics. Как это сделать быстро? Эта статья может помочь вам в работе!
Экспорт писем по диапазону дат в файл Excel или файл PST в Outlook
Допустим, вам нужно экспортировать электронные письма, полученные в период с 2016/4/15 по 2016/5/10 в Outlook, в отдельный файл PST или книгу Excel, есть идеи? В этой статье представлены два обходных пути для экспорта писем Outlook в книгу Excel или файл PST по диапазону дат.
Экспорт результатов поиска из Outlook в файл PST / Excel
Например, вам нужно узнать электронные письма от внешних отправителей в Outlook, а затем экспортировать все найденные электронные письма в виде файла Excel или файла PST. Есть хорошие идеи? С помощью функции расширенного поиска в Outlook легко искать внешние электронные письма, но как экспортировать?
Для большинства пользователей Excel процесс копирования таблиц не представляет большой сложности. Но, далеко не все знают некоторые нюансы, которые позволяют сделать эту процедуру максимально эффективной для различного типа данных и разноплановых целей. Давайте подробно рассмотрим некоторые особенности копирования данных в программе Эксель.
Копирование в Экселе
Копирование таблицы в Excel представляет собой создание её дубликата. В самой процедуре практически нет отличий в зависимости от того, куда вы собираетесь вставить данные: в другую область того же листа, на новый лист или в другую книгу (файл). Главное отличие между способами копирования заключается в том, как вы хотите скопировать информацию: вместе с формулами или только с отображаемыми данными.
Способ 1: копирование по умолчанию
Простое копирование по умолчанию в Эксель предусматривает создание копии таблицы вместе со всеми размещенными в ней формулами и форматированием.
- Выделяем область, которую хотим скопировать. Кликаем по выделенной области правой кнопкой мыши. Появляется контекстное меню. Выбираем в нём пункт «Копировать».
После этого, будет выполнена вставка данных с сохранением форматирования и формул.
Способ 2: копирование значений
Второй способ предусматривает копирование исключительно значений таблицы, которые отображаются на экране, а не формул.
- Копируем данные одним из способов, которые описывались выше.
- Кликаем правой кнопкой мыши в том месте, куда нужно вставить данные. В контекстном меню в параметрах вставки выбираем пункт «Значения».
После этого таблица будет добавлена на лист без сохранения форматирования и формул. То есть, фактически будут скопированы только отображаемые на экране данные.
Если вы хотите скопировать значения, но при этом сохранить исходное форматирование, то нужно во время вставки перейти в пункт меню «Специальная вставка». Там в блоке «Вставить значения» нужно выбрать пункт «Значения и исходное форматирование».
После этого, таблица будет представлена в первоначальном своем виде, но только вместо формул ячейки будут заполнять постоянные значения.
Если вы хотите произвести данную операцию только с сохранением форматирования чисел, а не всей таблицы, то в специальной вставке нужно выбрать пункт «Значения и форматы чисел».
Способ 3: создание копии с сохранением ширины столбцов
Но, к сожалению, даже использование исходного форматирования не позволяет сделать копию таблицы с первоначальной шириной столбцов. То есть, довольно часто бывают случаи, когда после вставки данные не помещаются в ячейки. Но в Экселе существует возможность с помощью определенных действий сохранить исходную ширину столбцов.
- Копируем таблицу любым из обычных способов.
- В месте, где нужно вставить данные, вызываем контекстное меню. Последовательно переходим по пунктам «Специальная вставка» и «Сохранить ширину столбцов оригинала».
Можно поступить и другим способом. Из контекстного меню дважды переходим в пункт с одинаковым наименованием «Специальная вставка…».
Какой бы вы путь не выбрали из перечисленных выше двух вариантов, в любом случае, скопированная таблица будет иметь ту же ширину столбцов, что и исходник.
Способ 4: вставка в виде изображения
Бывают случаи, когда таблицу нужно вставить не в обычном формате, а в виде изображения. Эта задача также решается при помощи специальной вставки.
- Выполняем копирование нужного диапазона.
- Выбираем место для вставки и вызываем контекстное меню. Переходим в пункт «Специальная вставка». В блоке «Другие параметры вставки» выбираем пункт «Рисунок».
После этого, данные будут вставлены на лист в виде изображения. Естественно, редактировать такую таблицу уже будет нельзя.
Способ 5: копирование листа
Если вы хотите скопировать полностью всю таблицу на другой лист, но при этом сохранить её абсолютно идентичной исходнику, то в этом случае, лучше всего, выполнить копирование листа целиком. В этом случае важно определить, что вы действительно желаете перенести все, что находится на исходном листе, в ином случае данный способ не подойдет.
-
Чтобы вручную не выделять все ячейки листа, а это заняло бы большое количество времени, кликаем по прямоугольнику, расположенному между горизонтальной и вертикальной панелью координат. После этого весь лист будет выделен. Чтобы скопировать содержимое, набираем на клавиатуре комбинацию Ctrl+C.
Как видим, после выполнения данных действий нам удалось скопировать лист вместе с таблицей и остальным его содержимым. При этом получилось сохранить не только исходное форматирование, но и размер ячеек.
Табличный редактор Эксель располагает обширным инструментарием для копирования таблиц именно в том виде, какой требуется пользователю. К сожалению, далеко не все знают о нюансах работы со специальной вставкой и другими инструментами копирования, которые позволяют значительно расширить возможности по переносу данных, а также автоматизировать действия пользователя.
Мы рады, что смогли помочь Вам в решении проблемы.
Отблагодарите автора, поделитесь статьей в социальных сетях.
Опишите, что у вас не получилось. Наши специалисты постараются ответить максимально быстро.
Чаще приходится переносить таблицу из программы Microsoft Excel в приложение Word, чем наоборот, но все-таки случаи обратного переноса тоже не столь редки. Например, иногда требуется перенести таблицу в Excel, сделанную в Ворде, для того чтобы, воспользовавшись функционалом табличного редактора, рассчитать данные. Давайте выясним, какие способы переноса таблиц в данном направлении существуют.
Обычное копирование
Самый простой способ переноса таблицы выполняется методом обычного копирования. Для этого, выделяем таблицу в программе Word, кликаем правой кнопкой мыши по странице, и в появившемся контекстном меню выбираем пункт «Копировать». Можно, вместо этого, нажать на кнопку «Копировать», которая размещена вверху на ленте. Ещё один вариант предполагает, после выделения таблицы, нажатие на клавиатуре клавиш Ctrl+C.
Таким образом, мы скопировали таблицу. Теперь нам нужно вставить её на лист Excel. Запускаем программу Microsoft Excel. Кликаем по ячейке в том месте листа, где хотим разместить таблицу. Нужно заметить, что эта ячейка станет крайней левой верхней ячейкой вставляемой таблицы. Именно из этого нужно исходить, планируя размещения таблицы.
Кликаем правой кнопкой мыши по листу, и в контекстном меню в параметрах вставки выбираем значение «Сохранить исходное форматирование». Также, можно вставить таблицу, нажав на кнопку «Вставить», расположенную на левом краю ленты. Или же, существует вариант набрать на клавиатуре комбинацию клавиш Ctrl+V.
После этого, таблица будет вставлена на лист Microsoft Excel. Ячейки листа могут не совпадать с ячейками вставленной таблицы. Поэтому, чтобы таблица выглядела презентабельно, их следует растянуть.
Импорт таблицы
Также, существует более сложный способ переноса таблицы из Word в Excel, путем импорта данных.
Открываем таблицу в программе Word. Выделяем её. Далее, переходим во вкладку «Макет», и в группе инструментов «Данные» на ленте жмем на кнопку «Преобразовать в текст».
Открывается окно параметров преобразования. В параметре «Разделитель» переключатель должен быть выставлен на позицию «Знак табуляции». Если это не так, переводим переключатель в данную позицию, и жмем на кнопку «OK».
Переходим во вкладку «Файл». Выбираем пункт «Сохранить как…».
В открывшемся окне сохранения документа, указываем желаемое место расположения файла, который собираемся сохранить, а также присваиваем ему название, если название по умолчанию не удовлетворяет. Хотя, учитывая, что сохраненный файл будет являться лишь промежуточным для переноса таблицы из Word в Excel, особого смысла менять наименование нет. Главное, что нужно сделать – это в поле «Тип файла» установить параметр «Обычный текст». Жмем на кнопку «Сохранить».
Открывается окно преобразования файла. Тут делать никаких изменений не нужно, а только следует запомнить кодировку, в которой вы сохраняете текст. Жмем на кнопку «OK».
После этого, запускаем программу Microsoft Excel. Переходим во вкладку «Данные». В блоке настроек «Получить внешние данные» на ленте жмем на кнопку «Из текста».
Открывается окно импорта текстового файла. Ищем тот файл, который сохранили ранее в Ворде, выделяем его, и жмем на кнопку «Импорт».
После этого, открывается окно Мастера текстов. В настройках формата данных указываем параметр «С разделителями». Устанавливаем кодировку, согласно той, в которой вы сохраняли текстовый документ в Ворде. В большинстве случаев это будет «1251: Кириллица (Windows)». Жмем на кнопку «Далее».
В следующем окне в настройке «Символом-разделителем является» устанавливаем переключатель в позицию «Знак табуляции», если он не установлен по умолчанию. Жмем на кнопку «Далее».
В последнем окне Мастера текста можно отформатировать данные в столбцах, с учетом их содержимого. Выделяем конкретный столбец в Образце разбора данных, а в настройках формата данных столбца выбираем один из четырёх вариантов:
- общий;
- текстовый;
- дата;
- пропустить столбец.
Подобную операцию делаем для каждого столбца в отдельности. По окончанию форматирования, жмем на кнопку «Готово».
После этого, открывается окно импорта данных. В поле вручную указываем адрес ячейки, которая будет являться крайней верхней левой ячейкой вставленной таблицы. Если вы затрудняетесь это сделать вручную, то жмем на кнопку справа от поля.
В открывшемся окне, просто выделяем нужную ячейку. Затем, кликаем по кнопке справа от введенных в поле данных.
Возвратившись в окно импорта данных, жмем на кнопку «OK».
Как видим, таблица вставлена.
Далее, при желании, можно установить для неё видимые границы, а также отформатировать стандартными способами Microsoft Excel.
Выше были представлены два способа переноса таблицы из Word в Excel. Первый способ намного проще второго, и на всю процедуру уходит гораздо меньше времени. В то же время, второй способ гарантирует отсутствие лишних символов, или смещения ячеек, что вполне возможно при переносе первым способом. Так что, определяться с вариантом переноса, нужно отталкиваясь от сложности таблицы, и её предназначения.
Мы рады, что смогли помочь Вам в решении проблемы.
Отблагодарите автора, поделитесь статьей в социальных сетях.
Опишите, что у вас не получилось. Наши специалисты постараются ответить максимально быстро.
Читайте также: