C# 将Excel转为OFD、UOS

刺骨的言语ヽ痛彻心扉 2022-09-12 06:44 140阅读 0赞

本文以C\#及VB.NET代码为例展示如何将Excel工作簿转换为OFD和UOS格式。通过workbook.LoadFromFile(string fileName)方法加载Excel源文档后，然后调用方法workbook.SaveToFile(string fileName, FileFormat fileFormat)转换为目标文件格式即可。具体步骤和方法参考如下内容。

### 1. 通过nuget搜索下载安装库到VS程序，如图步骤 ###

![watermark_type_ZHJvaWRzYW5zZmFsbGJhY2s_shadow_50_text_Q1NETiBARWljZWJsdWU_size_10_color_FFFFFF_t_70_g_se_x_16][]

![watermark_type_ZHJvaWRzYW5zZmFsbGJhY2s_shadow_50_text_Q1NETiBARWljZWJsdWU_size_20_color_FFFFFF_t_70_g_se_x_16][]

![watermark_type_ZHJvaWRzYW5zZmFsbGJhY2s_shadow_50_text_Q1NETiBARWljZWJsdWU_size_17_color_FFFFFF_t_70_g_se_x_16][]

![watermark_type_ZHJvaWRzYW5zZmFsbGJhY2s_shadow_50_text_Q1NETiBARWljZWJsdWU_size_15_color_FFFFFF_t_70_g_se_x_16][]

安装成功结果：

![watermark_type_ZHJvaWRzYW5zZmFsbGJhY2s_shadow_50_text_Q1NETiBARWljZWJsdWU_size_20_color_FFFFFF_t_70_g_se_x_16 1][]

## 2. 代码示例 ##

###  2.1 Excel转OFD ###

**C\#**

using Spire.Xls;
    
    namespace ExcelToOFD
    {
        class Program
        {
            static void Main(string[] args)
            {
                Workbook workbook = new Workbook();
                workbook.LoadFromFile("test.xlsx");
                workbook.SaveToFile("ToOFD.ofd", FileFormat.OFD);
            }
        }
    }

**VB.NET**

Imports Spire.Xls
    
    Namespace ExcelToOFD
    	Class Program
    		Private Shared Sub Main(args As String())
    			Dim workbook As New Workbook()
    			workbook.LoadFromFile("test.xlsx")
    			workbook.SaveToFile("ToOFD.ofd", FileFormat.OFD)
    		End Sub
    	End Class
    End Namespace

### 2.2 Excel转UOS ###

**C\#**

using Spire.Xls;
    
    namespace ExcelToUOS
    {
        class Program
        {
            static void Main(string[] args)
            {
                Workbook workbook = new Workbook();
                workbook.LoadFromFile("test.xlsx");
                workbook.SaveToFile("ToUOS", FileFormat.UOS);
            }
        }
    }

**VB.NET**

Imports Spire.Xls
    
    Namespace ExcelToUOS
    	Class Program
    		Private Shared Sub Main(args As String())
    			Dim workbook As New Workbook()
    			workbook.LoadFromFile("test.xlsx")
    			workbook.SaveToFile("ToUOS", FileFormat.UOS)
    		End Sub
    	End Class
    End Namespace

—End—

[watermark_type_ZHJvaWRzYW5zZmFsbGJhY2s_shadow_50_text_Q1NETiBARWljZWJsdWU_size_10_color_FFFFFF_t_70_g_se_x_16]: /images/20220828/dc8d2e66665e4c96b7dd429807cdd226.png
[watermark_type_ZHJvaWRzYW5zZmFsbGJhY2s_shadow_50_text_Q1NETiBARWljZWJsdWU_size_20_color_FFFFFF_t_70_g_se_x_16]: /images/20220828/41293e0616d24601817759f947a75bb4.png
[watermark_type_ZHJvaWRzYW5zZmFsbGJhY2s_shadow_50_text_Q1NETiBARWljZWJsdWU_size_17_color_FFFFFF_t_70_g_se_x_16]: /images/20220828/5902b2ba28a14aad9011208886d6a4e2.png
[watermark_type_ZHJvaWRzYW5zZmFsbGJhY2s_shadow_50_text_Q1NETiBARWljZWJsdWU_size_15_color_FFFFFF_t_70_g_se_x_16]: /images/20220828/4658b2d76bac496ead5601db5873b2e6.png
[watermark_type_ZHJvaWRzYW5zZmFsbGJhY2s_shadow_50_text_Q1NETiBARWljZWJsdWU_size_20_color_FFFFFF_t_70_g_se_x_16 1]: /images/20220828/e179a5b0c36c48898524cfe31e4ebc54.png