Note: The other languages of the website are Google-translated. Back to English

如何將csv文件導入工作表?

對於我們來說,將工作表導入或保存為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 for Applications 窗口。

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文件 Excel的Kutools 對話框,請參見屏幕截圖:

doc匯入csv檔案8

4。 然後點擊 已提交 按鈕,然後單擊要在其中放置導入數據的單元格,請參見屏幕截圖:

doc匯入csv檔案9

5。 然後點擊 OK,特定的CSV文件已導入到工作表中。


使用Kutools for Excel將CSV文件導入工作表

如果你有 Excel的Kutools,其 在光標處插入文件 實用程序,您可以快速將CSV文件,文本文件,Excel文件或PRN文件導入當前工作表。

Excel的Kutools : 帶有300多個便捷的Excel加載項,可以在30天內免費試用. 

安裝後 Excel的Kutools,請執行以下操作:

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文件導入工作表

Excel的Kutools:具有300多個方便的Excel加載項,可以在30天內免費試用,沒有任何限制。 立即下載並免費試用!

最佳辦公效率工具

Kutools for Excel 解決了你的大部分問題,並將你的生產力提高了 80%

  • 重用: 快速插入 複雜的公式,圖表 以及您以前使用過的任何東西; 加密單元 帶密碼 創建郵件列表 並發送電子郵件...
  • 超級公式欄 (輕鬆編輯多行文本和公式); 閱讀版式 (輕鬆讀取和編輯大量單元格); 粘貼到過濾範圍...
  • 合併單元格/行/列 不會丟失數據; 拆分單元格內容; 合併重複的行/列...防止細胞重複; 比較範圍...
  • 選擇重複或唯一 行; 選擇空白行 (所有單元格都是空的); 超級查找和模糊查找 在許多工作簿中; 隨機選擇...
  • 確切的副本 多個單元格,無需更改公式參考; 自動創建參考 到多張紙; 插入項目符號,複選框等...
  • 提取文字,添加文本,按位置刪除, 刪除空間; 創建和打印分頁小計; 在單元格內容和註釋之間轉換...
  • 超級濾鏡 (將過濾方案保存並應用於其他工作表); 高級排序 按月/週/日,頻率及更多; 特殊過濾器 用粗體,斜體...
  • 結合工作簿和工作表; 根據關鍵列合併表; 將數據分割成多個工作表; 批量轉換xls,xlsx和PDF...
  • 超過 300 項強大的功能. 支持 Office / Excel 2007-2021 和 365。支持所有語言。 在您的企業或組織中輕鬆部署。 完整功能 30 天免費試用。 60 天退款保證。
kte選項卡201905

Office選項卡為Office帶來了選項卡式界面,使您的工作更加輕鬆

  • 在Word,Excel,PowerPoint中啟用選項卡式編輯和閱讀,發布者,Access,Visio和Project。
  • 在同一窗口的新選項卡中而不是在新窗口中打開並創建多個文檔。
  • 將您的工作效率提高 50%,每天為您減少數百次鼠標點擊!
officetab底部
按評論排序
留言 (1)
還沒有評分。 成為第一位評論!
網站主持人對此評論進行了最小化
在上面提到的宏代碼中,文件被提取到活動工作表中,並且不允許我選擇一個新工作表來粘貼工作表你能幫幫我嗎?
這裡還沒有評論
留下你的意見
以訪客身份發帖
×
評價此帖子:
0   字符
推薦地點

關注我們

版權所有©2009 - 萬維網。extendoffice.com。 | 版權所有。 供電 ExtendOffice。 |
Microsoft和Office徽標是Microsoft Corporation在美國和/或其他國家的商標或註冊商標。
受Sectigo SSL保護