Прескочи на основното съдържание

Как да запазя селекция като отделен файл в Excel?

Автор: Кели Последна промяна: 2013-09-16

Когато имаме работа с дълъг работен лист, може да искаме да запазим само избран диапазон вместо цяла работна книга като нов файл на Excel, като например изпращане на различни селекции от работен лист на различни лица. Ще представим методи за запазване на селекции в работен лист като отделни Excel файлове.

Запазете селекциите като отделни Excel файлове с копиране и поставяне

Запазете селекциите като отделни Excel файлове с VB Macro

Запазете селекциите като отделни файлове на Excel с Kutools за Excel


стрелка син десен балон Запазете селекциите като отделни файлове с копиране и поставяне

Най-често срещаният метод е да копирате селекцията, която искате да запишете като отделен файл в Excel, да създадете нова работна книга и да поставите копираната селекция върху нея, след което да я запишете.

Възможно е обаче да загубите някои стилове на форматиране в селекцията по време на копиране и поставяне, като височина на ред и т.н.


стрелка син десен балон Запазете селекциите като отделни файлове с VB Macro

Използването на Macro е лесен начин за запазване на селекциите като отделни файлове без копиране и поставяне в нова работна книга.

1. Задръжте натиснат ALT + F11 за да отворите Microsoft Visual Basic за приложения прозорец.

2. Щракнете Поставете > Moudleи поставете следния код в прозореца на модула.

VBA: експортиране на обхват към Excel файл

Sub ExportRangetoExcel()
'Update 20130916
Dim wb As Workbook
Dim saveFile As String
Dim WorkRng As Range
Dim address As String
Dim defult As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.address, Type:=8)
Application.ScreenUpdating = False
Application.DisplayAlerts = False
defult = Application.SheetsInNewWorkbook
Application.SheetsInNewWorkbook = 1
Set wb = Application.Workbooks.Add
Application.SheetsInNewWorkbook = defult
WorkRng.Copy
wb.Worksheets(1).Paste
address = Replace(WorkRng.address, ":", "-")
address = Replace(address, "$", "")
address = Replace(address, ".", "")
saveFile = Application.GetSaveAsFilename(InitialFileName:=address, fileFilter:="Excel Workbooks (*.xlsx),*.xlsx")
wb.SaveAs Filename:=saveFile
wb.Close
Application.CutCopyMode = False
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

3. След това натиснете F5 за да изпълните операцията и ще се появи поле за подкана, за да ви напомни, че изберете диапазон, който искате да запазите като отделен файл на Excel. Вижте екранна снимка:

doc-save-selection-1

4, След това кликнете OKи посочете папка за намиране на този нов файл и след това въведете име за вашия файл в Save As диалогов прозорец, вижте екранна снимка:

doc-save-selection-2

5, И после щракнете върху Save избраният диапазон е записан като нова работна книга на Excel.

Използването на Macro може да е малко трудно за начинаещи на Microsoft Excel и ние ще представим друг лесен и удобен начин, предоставен с Kutools за Excel.


стрелка син десен балон Запазете селекциите като отделни файлове с Kutools за Excel

Kutools за Excel's Експортиране на диапазон във файл инструментът може да ни помогне удобно да запазим селекциите като отделни файлове бързо.

Kutools за Excel включва повече от 300 удобни инструмента на Excel. Безплатно изпробване без ограничение за 30 дни. Махни го сега.

Ако сте инсталирали Kutools за Excel, моля, направете следното:

1. Щракнете Enterprise > Внос / Износ > Експортиране на диапазон във файл, вижте екранна снимка:

doc-save-selection-4

2. В Експортиране на диапазон във файл кликнете върху doc-data-to-csv-6за да изберете диапазона, който искате да запазите като отделен файл, и след това отметнете Работна книга на Excel опция в формат на файла раздел, най-накрая можете да проверите опциите на работната книга, както ви е необходимо.

doc-save-selection-5

3. Щракнете OK, тогава ще изскочи a Изберете име и местоположение за експортирания диапазон диалогов прозорец, въведете име за този нов файл и изберете папка, в която ще го запишете. След това щракнете върху Save бутон.

бележки:

1. В Експортиране на диапазон във файл инструмент на Kutools за Excel може да запази цялото форматиране в селекциите.

2. Kutools за Excel Експортиране на диапазон във файл дава възможност за лесно експортиране на диапазон от дати във файл, или работна книга на Excel, CSV, прост HTML или изцяло форматиран HTML.

3. Ако проверите Отворете файла след експортиране опция в диалоговия прозорец, новият файл ще се стартира автоматично след успешното му експортиране.

За да научите повече за тази функция, моля щракнете Експортиране на диапазон във файл.


стрелка син десен балонСвързани статии

Най-добрите инструменти за продуктивност в офиса

🤖 Kutools AI помощник: Революционизирайте анализа на данни въз основа на: Интелигентно изпълнение   |  Генериране на код  |  Създаване на персонализирани формули  |  Анализирайте данни и генерирайте диаграми  |  Извикване на функциите на Kutools...
Популярни функции: Намерете, маркирайте или идентифицирайте дубликати   |  Изтриване на празни редове   |  Комбинирайте колони или клетки без загуба на данни   |   Кръг без формула ...
Супер търсене: VLookup с множество критерии    VLookup с множество стойности  |   VLookup в няколко листа   |   Размито търсене ....
Разширен падащ списък: Бързо създаване на падащ списък   |  Зависим падащ списък   |  Падащ списък с множество избори ....
Мениджър на колони: Добавете конкретен брой колони  |  Преместване на колони  |  Превключване на състоянието на видимост на скритите колони  |  Сравнете диапазони и колони ...
Препоръчани функции: Мрежов фокус   |  Изглед на дизайна   |   Голям формула бар    Мениджър на работни книги и листове   |  Библиотека с ресурси (Автоматичен текст)   |  Избор на дата   |  Комбинирайте работни листове   |  Шифроване/декриптиране на клетки    Изпращайте имейли по списък   |  Супер филтър   |   Специален филтър (филтър получер/курсив/зачертано...) ...
Топ 15 комплекта инструменти12 Текст Инструменти (добавяне на текст, Премахване на символи, ...)   |   50 + Графика Видове (диаграма на Гант, ...)   |   40+ Практичен формули (Изчислете възрастта въз основа на рождения ден, ...)   |   19 вмъкване Инструменти (Въведете QR код, Вмъкване на картина от пътя, ...)   |   12 Конверсия Инструменти (Числа към думи, Валутен обмен, ...)   |   7 Обединяване и разделяне Инструменти (Разширено комбиниране на редове, Разделени клетки, ...)   |   ... и още

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
Comments (6)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi,


Liked the VBA option. Is there a way to retain formulas in new file? The data in new file is automatically pasted s 'values' and does not have the formulas.
This comment was minimized by the moderator on the site
Do you know how I can do this on a default custom template? I have a lot of data in one book/sheet that I have to save only a selection to a new file. Option 2 works great. But, I need to have some information on the top for each new file I make (Copying and pasting is very tedious so I am looking for a quicker and more effective option). So would it be possible to first use the file with lots of data and select certain cells to save ON the default custom template I made, specifically underneath the header of the default template (the template is integrated into Excel to automatically open when I open Excel). Please help, thanks!!
This comment was minimized by the moderator on the site
i have tried different things to make it copy+paste value, i dont know where i go wrong. How do i change the VBA: export range to Excel file to just copy paste value? TIA
This comment was minimized by the moderator on the site
This VB macro is great! However, I was wondering if there was a way to keep the source formatting when the selected range gets saved to a new workbook. Thanks!
This comment was minimized by the moderator on the site
Hi, I am use the above VB macro, and works great. The only thing is that the range i select has a results from a formula and when i open the text file i get #REF. Could you please help out. cheer
This comment was minimized by the moderator on the site
Double click on #REF cell and will get it right
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations