翻譯|使用教程|編輯:胡濤|2022-05-24 11:44:49.690|閱讀 207 次
概述:將學習如何在 C# 和 VB.NET 中使用Spire.XLS for .NET庫以編程方式實現此功能。
# 界面/圖表報表/文檔/IDE等千款熱門軟控件火熱銷售中 >>
相關鏈接:
CSV(逗號分隔值)文件是包含用逗號分隔的數據的純文本文件。它廣泛用于將數據從一個應用程序導入或導出到另一個應用程序。在某些情況下,您可能需要在 CSV 和 Excel 之間進行轉換。在本文中,您將學習如何在 C# 和 VB.NET 中使用Spire.XLS for .NET庫以編程方式實現此功能。
我在 MS Excel 中創建了一個新的 Excel 文件,并在第一張表中添加了一些具有不同格式的數據,這是創建文件的屏幕截圖。
以下是將 Excel 轉換為 CSV 的步驟:
【C#】
using Spire.Xls; using System.Text; namespace ConvertAWorksheetToCsv { class Program { static void Main(string[] args) { //Create an instance of Workbook class Workbook workbook = new Workbook(); //Load an Excel file workbook.LoadFromFile("Sample.xlsx"); //Get the first worksheet Worksheet sheet = workbook.Worksheets[0]; //Save the worksheet as CSV sheet.SaveToFile("ExcelToCSV.csv", ",", Encoding.UTF8); } } }
【VB.NET】
Imports Spire.Xls Imports System.Text Namespace ConvertAWorksheetToCsv Friend Class Program Private Shared Sub Main(ByVal args As String()) 'Create an instance of Workbook class Dim workbook As Workbook = New Workbook() 'Load an Excel file workbook.LoadFromFile("Sample.xlsx") 'Get the first worksheet Dim sheet As Worksheet = workbook.Worksheets(0) 'Save the worksheet as CSV sheet.SaveToFile("ExcelToCSV.csv", ",", Encoding.UTF8) End Sub End Class End Namespace
以下是將 CSV 轉換為 Excel 的步驟:
【C#】
using Spire.Xls; namespace ConvertCsvToExcel { class Program { static void Main(string[] args) { //Create an instance of Workbook class Workbook workbook = new Workbook(); //Load a CSV file workbook.LoadFromFile(@"ExcelToCSV.csv", ",", 1, 1); //Get the first worksheet Worksheet sheet = workbook.Worksheets[0]; //Access the used range in the worksheet CellRange usedRange = sheet.AllocatedRange; //Ignore errors when saving numbers in the range as text usedRange.IgnoreErrorOptions = IgnoreErrorType.NumberAsText; //Autofit columns and rows usedRange.AutoFitColumns(); usedRange.AutoFitRows(); //Save the result file workbook.SaveToFile("CSVToExcel.xlsx", ExcelVersion.Version2013); } } }
【VB.NET】
Imports Spire.Xls Namespace ConvertCsvToExcel Friend Class Program Private Shared Sub Main(ByVal args As String()) 'Create an instance of Workbook class Dim workbook As Workbook = New Workbook() 'Load a CSV file workbook.LoadFromFile("ExcelToCSV.csv", ",", 1, 1) 'Get the first worksheet Dim sheet As Worksheet = workbook.Worksheets(0) 'Access the used range in the worksheet Dim usedRange As CellRange = sheet.AllocatedRange 'Ignore errors when saving numbers in the range as text usedRange.IgnoreErrorOptions = IgnoreErrorType.NumberAsText 'Autofit columns and rows usedRange.AutoFitColumns() usedRange.AutoFitRows() 'Save the result file workbook.SaveToFile("CSVToExcel.xlsx", ExcelVersion.Version2013) End Sub End Class End Namespace
歡迎下載|體驗更多E-iceblue產品
本站文章除注明轉載外,均為本站原創或翻譯。歡迎任何形式的轉載,但請務必注明出處、不得修改原文相關鏈接,如果存在內容上的異議請郵件反饋至chenjj@fc6vip.cn