跳到主要内容

如何将csv文件导入工作表?

作者:晓阳 最后修改时间:2020-05-28

对于我们来说,将工作表导入或保存为CSV文件可能很容易,但是,您是否尝试过将CSV文件导入工作表? 在本文中,我将讨论一些有趣的方法来帮助您处理此任务。

使用文本导入向导将CSV文件导入工作表

使用VBA代码将CSV文件导入工作表

使用 Kutools for Excel 将 CSV 文件导入到工作表


使用文本导入向导将CSV文件导入工作表

通常,在Excel中,您可以应用文本导入向导功能将CSV文件导入到工作表中,请执行以下操作:

1。 激活要导入CSV文件的工作表,然后单击 时间 > 从文字,请参见屏幕截图:

doc汇入csv档案1

2。 在 导入文字文件 窗口中,请指定要导入的CSV文件,请参见屏幕截图:

doc汇入csv档案2

3。 然后点击 导入模板 按钮,在 文字汇入精灵, 选择 分隔 选项,请参见屏幕截图:

doc汇入csv档案3

4。 然后点击 下一页 > 按钮,在向导的步骤2中,选中 逗号 在下面 定界符 选项,请参见屏幕截图:

doc汇入csv档案4

5。 然后继续点击 下一页> 按钮,在向导的第3步中,选择 文本 列数据格式部分下的选项,您会看到第一列将突出显示。 然后按住 转移 突出显示所有列的键。 看截图:

doc汇入csv档案5

6。 然后点击 完成 按钮,在弹出 导入数据 对话框中,选择要放置数据的位置,请参见屏幕截图:

doc汇入csv档案6

7。 点击 OK 按钮,则CSV文件已立即导入到工作表中。

doc汇入csv档案7


使用VBA代码将CSV文件导入工作表

如果您对上述方法感到厌烦,那么下面的VBA代码也可以解决此问题。

1。 按住 ALT + F11 键,然后打开 Microsoft Visual Basic应用程序 窗口。

2。 点击 插页 > 模块,然后将以下代码粘贴到 模块 窗口。

VBA代码:将CSV文件导入工作表:

Sub ImportCSVFile()
'Updateby Extendoffice
    Dim xFileName As Variant
    Dim Rg As Range
    Dim xAddress As String
    xFileName = Application.GetOpenFilename("CSV File (*.csv), *.csv", , "Kutools for Excel", , False)
    If xFileName = False Then Exit Sub
    On Error Resume Next
    Set Rg = Application.InputBox("please select a cell to output the data", "Kutools for Excel", Application.ActiveCell.Address, , , , , 8)
    On Error GoTo 0
    If Rg Is Nothing Then Exit Sub
    xAddress = Rg.Address
    With ActiveSheet.QueryTables.Add("TEXT;" & xFileName, Range(xAddress))
        .FieldNames = True
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .RefreshStyle = xlInsertDeleteCells
        .SavePassword = False
        .SaveData = True
        .RefreshPeriod = 0
        .TextFilePromptOnRefresh = False
        .TextFilePlatform = 936
        .TextFileStartRow = 1
        .TextFileParseType = xlDelimited
        .TextFileTextQualifier = xlTextQualifierDoubleQuote
        .TextFileConsecutiveDelimiter = False
        .TextFileTabDelimiter = True
        .TextFileSemicolonDelimiter = False
        .TextFileCommaDelimiter = True
        .TextFileSpaceDelimiter = False
        .TextFileTrailingMinusNumbers = True
        .Refresh BackgroundQuery:=False
    End With
    End Sub

3。 然后按 F5 键以运行此代码,然后在弹出的窗口中选择要导入的CSV文件 Kutools for Excel 对话框,请参见屏幕截图:

doc汇入csv档案8

4。 然后点击 可选 按钮,然后单击要在其中放置导入数据的单元格,请参见屏幕截图:

doc汇入csv档案9

5。 然后点击 OK,特定的CSV文件已导入到工作表中。


使用 Kutools for Excel 将 CSV 文件导入到工作表

如果你有 Kutools for Excel,其 在光标处插入文件 实用程序,您可以快速将CSV文件,文本文件,Excel文件或PRN文件导入当前工作表。

Kutools for Excel : 带有300多个便捷的Excel加载项,可以在30天内免费试用. 

安装后 Kutools for Excel,请执行以下操作:

1. 激活要在其中导入CSV文件数据的工作表。

2。 然后点击 Kutools 加 > 进出口 > 在光标处插入文件,请参见屏幕截图:

3.在光标处插入文件 对话框,请执行以下选项:

(1.)点击 doc汇入csv档案12按钮选择要在其中输出数据的单元格;

(2.)然后单击 浏览 按钮打开在单元格光标位置窗口中选择要插入的文件;

(3.)在弹出的窗口中,选择 CSV文件 从右下角的下拉列表中,然后选择要导入的CSV文件。

doc汇入csv档案11
1
doc汇入csv档案13

4. 指定CSV文件后,点击 可选 按钮返回前一个对话框,然后单击 OK 导入CSV文件。 并将CSV文件插入到您需要的特定位置。

单击以了解有关此“在光标处插入文件”功能的更多信息…

立即下载和免费试用Excel的Kutools!


演示:使用 Kutools for Excel 将 CSV 文件导入工作表

Kutools for Excel:具有300多个方便的Excel加载项,可以在30天内免费试用,没有任何限制。 立即下载并免费试用!

最佳办公生产力工具

🤖 Kutools 人工智能助手:基于以下内容彻底改变数据分析: 智能执行   |  生成代码  |  创建自定义公式  |  分析数据并生成图表  |  调用 Kutools 函数...
热门特色: 查找、突出显示或识别重复项   |  删除空白行   |  合并列或单元格而不丢失数据   |   不使用公式进行四舍五入 ...
超级查询: 多条件VLookup    多值VLookup  |   跨多个工作表的 VLookup   |   模糊查询 ....
高级下拉列表: 快速创建下拉列表   |  依赖下拉列表   |  多选下拉列表 ....
列管理器: 添加特定数量的列  |  移动列  |  切换隐藏列的可见性状态  |  比较范围和列 ...
特色功能: 网格焦点   |  设计图   |   大方程式酒吧    工作簿和工作表管理器   |  资源库 (自动文本)   |  日期选择器   |  合并工作表   |  加密/解密单元格    按列表发送电子邮件   |  超级筛选   |   特殊过滤器 (过滤粗体/斜体/删除线...)...
前 15 个工具集12 文本 工具 (添加文本, 删除字符,...)   |   50+ 图表 类型 (甘特图,...)   |   40+ 实用 公式 (根据生日计算年龄,...)   |   19 插入 工具 (插入二维码, 从路径插入图片,...)   |   12 转化 工具 (小写金额转大写, 货币兑换,...)   |   7 合并与拆分 工具 (高级组合行, 分裂细胞,...)   |   ... 和更多

使用 Kutools for Excel 增强您的 Excel 技能,体验前所未有的效率。 Kutools for Excel 提供了 300 多种高级功能来提高生产力并节省时间。  单击此处获取您最需要的功能...

描述


Office Tab 为 Office 带来选项卡式界面,让您的工作更加轻松

  • 在Word,Excel,PowerPoint中启用选项卡式编辑和阅读,发布者,Access,Visio和Project。
  • 在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。
  • 每天将您的工作效率提高50%,并减少数百次鼠标单击!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
In the macro code mentioned above the file gets extracted in active sheet and does not allow me to choose a new sheet to paste the sheet Can u please help me.
There are no comments posted here yet
Leave your comments
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations