怎么将一个EXCEL表格中指定区域中的内容导出生成新的EXCEL文件?

2024-11-07 10:25:19
推荐回答(5个)
回答1:

1、通过简单的复制操作即可完成此功能,首先打开一个excel表格,需要将表格中B列单元格内的数值生成新的excel表格。

2、新建一个空白excel文件。

3、选中原本的excel表格的B列单元格,使用“Ctrl+C”进行复制操作。

4、然后切换到新建的excel表格中,点击鼠标右键,在弹出的选项中点击“粘贴数值”。

5、即可将复制的单元中的内容只粘贴数值在新表格中,而不带公式与格式。

回答2:

1 选中原表格的指定区域,按Ctrl + C
2 按Ctrl + N 新建一个EXCEL文件
3 选中A1右键,选择粘贴,如果原区域有公式,建议右键,选择粘贴为值,这样避免数据因为原区域的改变而改变。
4 保存新有EXCEL文件
如果是批量的,那最好用VBA实现,这个要有数据文件和说明要实现的效果

回答3:

Sub 复制表到新表()
'
' 复制表到新表 Macro
'

'
Dim parentPath As String
parentPath = ThisWorkbook.path
Dim thisFileName As String
thisFileName = ThisWorkbook.ActiveSheet.Name

Sheets("报价单模板").Copy

' save as Workbooks("报价单模板报表" & range("H46"))
'选择性粘贴
Range("A1:H46").Select
Application.CutCopyMode = False
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

'删除右边多余列
Columns("I:Q").Delete Shift:=xlToLeft

'删除下方多余行

Rows("46:52").Delete Shift:=xlUp

Range("A1").Select

Dim newFileName As String
newFileName = thisFileName & "报表"
ActiveWorkbook.SaveAs fileName:=parentPath & "\" & newFileName & ".xls", FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
End Sub

回答4:

按F5,定位,引用位置选择你要修改的位置就可以了,比如引用位置为C40,就会直接定位到C40,但是单元格不会解除隐藏

回答5:

只能复制选择区域到新的文件,但是格式会变,所以只能这样了