在Excel中查找和replace文本中指定的字体名称

我正在使用Microsoft Excel 12.0对象库。 我的目标是find具有指定字体名称的文本，并用新文本replace。

Microsoft.Office.Interop.Excel.Application xlApp = new Microsoft.Office.Interop.Excel.Application(); xlApp.FindFormat.Font.Name = "Arial"; workSheet.Cells.Replace('a', 'b', Type.Missing, Type.Missing, Type.Missing, Type.Missing, xlApp.FindFormat, Type.Missing); 

但它不起作用。

那么如何查找指定字体名称的string并用新stringreplace？

谢谢！

Answer 1

我不是说stream利与C＃这里是vb.net代码：

 Imports Microsoft.Office.Interop.Excel Public Class Class1 Sub TEST() Dim xlapp As New Microsoft.Office.Interop.Excel.Application xlapp.FindFormat.Font.Name = "Arial" Dim wb As Microsoft.Office.Interop.Excel.Workbook wb = xlapp.Workbooks.Open("C:\test.xlsx") wb.Worksheets("Sheet1").Cells.Replace(What:="*", Replacement:="eee", LookAt:=XlLookAt.xlWhole, _ SearchOrder:=XlSearchOrder.xlByRows, MatchCase:=False, SearchFormat:=True, ReplaceFormat:=False) End Sub End Class 

我跑了一个转换器吐出C＃：

 using Microsoft.VisualBasic; using System; using System.Collections; using System.Collections.Generic; using System.Data; using System.Diagnostics; using Microsoft.Office.Interop.Excel; public class Class1 { public void TEST() { Microsoft.Office.Interop.Excel.Application xlapp = new Microsoft.Office.Interop.Excel.Application(); xlapp.FindFormat.Font.Name = "Arial"; Microsoft.Office.Interop.Excel.Workbook wb = default(Microsoft.Office.Interop.Excel.Workbook); wb = xlapp.Workbooks.Open("C:\\test.xlsx"); wb.Worksheets("Sheet1").Cells.Replace(What: "*", Replacement: "eee", LookAt: XlLookAt.xlWhole, SearchOrder: XlSearchOrder.xlByRows, MatchCase: false, SearchFormat: true, ReplaceFormat: false); } }