Microsoft PowerPoint の置換機能を使用すると、特定のテキストを検索し、一度に新しいテキストに変更することができます。これは、大きな PowerPoint ドキュメント内の複数の場所で同じエラーを修正する必要がある場合に非常に便利です。この記事では、Spire.Presentation for .NET を使用して PowerPoint でテキストを置換する方法を示します。 PowerPoint で特定のテキストの最初の出現箇所を置換する PowerPoint で特定のテキストのすべての出現箇所を置換する PowerPoint で正規表現を使用してテキストを置換する Spire.Presentation for .NET をインストールします まず、Spire.Presentation for .NET パッケージに含まれている DLL ファイルを .NET プロジェクトの参照として追加する必要があります。DLL ファイルは、このリンクからダウンロードするか、NuGet を介してインストールできます。 PM> Install-Package Spire.Presentation PowerPoint で特定のテキストの最初の出現箇所を置換する PowerPoint 内の特定のテキストの最初の出現箇所を置換するには、すべてのスライドをループし、ISlide.ReplaceFirstText() メソッドを呼び出します。詳細な手順は次のとおりです。 Presentation クラスのインスタンスを初期化します。 Presentation.LoadFromFile() メソッドを使用して PowerPoint ドキュメントを読み込みます。 PowerPoint ドキュメント内のすべてのスライドをループします。 ISlide.ReplaceFirstText() メソッドを使用して、最初に出現する「Spire.Presentation for .NET」を「E-iceblue 製品」に置き換えます。 Presentation.SaveToFile() メソッドを使用して結果文書を保存します。 C# VB.NET using Spire.Presentation; namespace ReplaceFirstTextOccurrenceInPPT { class Program { static void Main(string[] args) { //Presentationインスタンスを作成する Presentation ppt = new Presentation(); //PowerPointドキュメントをロードする ppt.LoadFromFile("Sample1.pptx"); //すべてのスライドをループする foreach (ISlide slide in ppt.Slides) { //最初に出現する「Spire.Presentation for .NET」を「E-iceblue製品」に置き換える slide.ReplaceFirstText("Spire.Presentation for .NET", "E-iceblue製品", false); break; } //結果文書を保存する ppt.SaveToFile("ReplaceFirstTextOccurrence.pptx", FileFormat.Pptx2013); } } } Imports Spire.Presentation Namespace ReplaceFirstTextOccurrenceInPPT Friend Class Program Private Shared Sub Main(ByVal args As String()) 'Presentationインスタンスを作成する Dim ppt As Presentation = New Presentation() 'PowerPointドキュメントをロードする ppt.LoadFromFile("Sample1.pptx") 'すべてのスライドをループする For Each slide As ISlide In ppt.Slides '最初に出現する「Spire.Presentation for .NET」を「E-iceblue製品」に置き換える slide.ReplaceFirstText("Spire.Presentation for .NET", "E-iceblue製品", False) Exit For Next '結果文書を保存する ppt.SaveToFile("ReplaceFirstTextOccurrence.pptx", FileFormat.Pptx2013) End Sub End Class End Namespace PowerPoint で特定のテキストのすべての出現箇所を置換する PowerPoint 内の特定のテキストのすべての出現箇所を置換するには、すべてのスライドをループし、ISlide.ReplaceAllText() メソッドを使用します。詳細な手順は次のとおりです。 Presentation クラスのインスタンスを初期化します。 Presentation.LoadFromFile() メソッドを使用して PowerPoint ドキュメントを読み込みます。 PowerPoint 内のすべてのスライドをループします。 ISlide.ReplaceAllText() メソッドを使用して、すべての「Spire.Presentation for.NET」を「E-icelue 製品」に置き換えます。 Presentation.SaveToFile() メソッドを使用して結果文書を保存します。 C# VB.NET using Spire.Presentation; namespace ReplaceAllTextOccurrencesInPPT { class Program { static void Main(string[] args) { //Presentationインスタンスを作成する Presentation ppt = new Presentation(); //PowerPointドキュメントをロードする ppt.LoadFromFile("Sample1.pptx"); //すべてのスライドをループする foreach (ISlide slide in ppt.Slides) { //すべての「Spire.Presentation for.NET」を「E-icelue製品」に置き換える slide.ReplaceAllText("Spire.Presentation for .NET", "E-iceblue製品", false); } //結果文書を保存する ppt.SaveToFile("ReplaceAllTextOccurrences.pptx", FileFormat.Pptx2013); } } } Imports Spire.Presentation Namespace ReplaceAllTextOccurrencesInPPT Friend Class Program Private Shared Sub Main(ByVal args As String()) 'Presentationインスタンスを作成する Dim ppt As Presentation = New Presentation() 'PowerPointドキュメントをロードする ppt.LoadFromFile("Sample1.pptx") 'すべてのスライドをループする For Each slide As ISlide In ppt.Slides 'すべての「Spire.Presentation for.NET」を「E-icelue製品」に置き換える slide.ReplaceAllText("Spire.Presentation for .NET", "E-iceblue製品", False) Next '結果文書を保存する ppt.SaveToFile("ReplaceAllTextOccurrences.pptx", FileFormat.Pptx2013) End Sub End Class End Namespace PowerPoint で正規表現を使用してテキストを置換する Spire.Presentation for .NET では、正規表現パターンに一致するテキストを置換するための IShape.ReplaceTextWithRegex() メソッドが提供されています。詳細な手順は次のとおりです。 Presentation クラスのインスタンスを初期化します。 Presentation.LoadFromFile() メソッドを使用して PowerPoint ドキュメントを読み込みます。 PowerPoint 内のすべてのスライドをループします。 各スライドのすべての図形をループします。 IShape.ReplaceTextWithRegex() メソッドを使用して、正規表現パターンに一致するテキストを置き換えます。 Presentation.SaveToFile() メソッドを使用して結果文書を保存します。 C# VB.NET using Spire.Presentation; using System.Text.RegularExpressions; namespace ReplaceTextUsingRegexInPPT { class Program { static void Main(string[] args) { //Presentationインスタンスを作成する Presentation ppt = new Presentation(); //PowerPointドキュメントをロードする ppt.LoadFromFile("Sample2.pptx"); //すべてのスライドをループする foreach (ISlide slide in ppt.Slides) { //各スライドのすべての図形をループする foreach (IShape shape in slide.Shapes) { //スライド上の # で始まるテキストを「Spire.Presentation for .NET」に置き換えます。 shape.ReplaceTextWithRegex(new Regex(@"#w+b"), " Spire.Presentation for .NET "); } } //結果文書を保存する ppt.SaveToFile("ReplaceTextUsingRegex.pptx", FileFormat.Pptx2013); } } } Imports Spire.Presentation Imports System.Text.RegularExpressions Namespace ReplaceTextUsingRegexInPPT Friend Class Program Private Shared Sub Main(ByVal args As String()) 'Presentationインスタンスを作成する Dim ppt As Presentation = New Presentation() 'PowerPointドキュメントをロードする ppt.LoadFromFile("Sample2.pptx") 'すべてのスライドをループする For Each slide As ISlide In ppt.Slides '各スライドのすべての図形をループする For Each shape As IShape In slide.Shapes 'スライド上の # で始まるテキストを「Spire.Presentation for .NET」に置き換える shape.ReplaceTextWithRegex(New Regex("#w+b"), " Spire.Presentation for .NET ") Next Next '結果文書を保存する ppt.SaveToFile("ReplaceTextUsingRegex.pptx", FileFormat.Pptx2013) End Sub End Class End Namespace 一時ライセンスを申請する 結果ドキュメントから評価メッセージを削除したい場合、または機能制限を取り除く場合は、についてこのメールアドレスはスパムボットから保護されています。閲覧するにはJavaScriptを有効にする必要があります。 にお問い合わせ、30 日間有効な一時ライセンスを取得してください。
