Comment trouver et remplacer des données dans Excel avec C# et VB.NET

using Spire.Xls; 
using System.Drawing; 

namespace ReplaceDataInWorksheet 
{ 
    internal class Program 
    { 
        static void Main(string[] args) 
        { 
            // Initialiser une instance de la classe Workbook 
            Workbook workbook = new Workbook(); 
            // Charger un fichier Excel 
            workbook.LoadFromFile(@"Sample.xlsx"); 

            // Obtenir la première feuille de calcul 
            Worksheet worksheet = workbook.Worksheets[0]; 

            // Rechercher les cellules contenant la valeur de chaîne spécifique "Total" dans la feuille de calcul 
            CellRange[] cells = worksheet.FindAllString("Total", true, true); 

            // Parcourir les cellules trouvées 
            foreach (CellRange cell in cells) 
            { 
                // Remplacer la valeur de la cellule par une autre valeur 
                cell.Text = "Somme"; 
                // Définir une couleur de fond pour la cellule 
                cell.Style.Color = Color.Yellow; 
            } 

            // Enregistrer le fichier résultant dans un emplacement spécifique 
            workbook.SaveToFile("ReplaceDataInWorksheet.xlsx", ExcelVersion.Version2016); 
            workbook.Dispose(); 
        } 
    } 
} 

Imports Spire.Xls 
Imports System.Drawing 

Namespace ReplaceDataInWorksheet 
    Friend Class Program 
        Private Shared Sub Main(ByVal args As String()) 
            ' Initialiser une instance de la classe Workbook 
            Dim workbook As Workbook = New Workbook() 
            ' Charger un fichier Excel 
            workbook.LoadFromFile("Sample.xlsx") 

            ' Obtenir la première feuille de calcul 
            Dim worksheet As Worksheet = workbook.Worksheets(0) 

            ' Rechercher les cellules contenant la valeur de chaîne spécifique "Total" dans la feuille de calcul 
            Dim cells As CellRange() = worksheet.FindAllString("Total", True, True) 

            ' Parcourir les cellules trouvées 
            For Each cell As CellRange In cells 
                ' Remplacer la valeur de la cellule par une autre valeur 
                cell.Text = "Somme" 
                ' Définir une couleur de fond pour la cellule 
                cell.Style.Color = Color.Yellow 
            Next 

            ' Enregistrer le fichier résultant dans un emplacement spécifique 
            workbook.SaveToFile("ReplaceDataInWorksheet.xlsx", ExcelVersion.Version2016) 
            workbook.Dispose() 
        End Sub 
    End Class 
End Namespace 

using Spire.Xls;
using System.Drawing;

namespace ReplaceDataInCellRange
{
    internal class Program
    {
        static void Main(string[] args)
        {
            // Initialiser une instance de la classe Workbook
            Workbook workbook = new Workbook();
            // Charger un fichier Excel
            workbook.LoadFromFile(@"Sample.xlsx");

            // Obtenir la première feuille de calcul
            Worksheet worksheet = workbook.Worksheets[0];

            // Obtenir une plage de cellules spécifique
            CellRange range = worksheet.Range["A1:C9"];            

            // Rechercher les cellules avec la valeur spécifique "Total" dans la plage de cellules
            CellRange[] cells = range.FindAllString("Total", true, true);

            // Parcourir les cellules trouvées
            foreach (CellRange cell in cells)
            {
                // Remplacer la valeur de la cellule par une autre valeur
                cell.Text = "Sum";
                // Définir une couleur de fond pour la cellule
                cell.Style.Color = Color.Yellow;
            }

            // Enregistrer le fichier résultant dans un emplacement spécifique
            workbook.SaveToFile("ReplaceDataInCellRange.xlsx", ExcelVersion.Version2016);
            workbook.Dispose();
        }
    }
} 

Imports Spire.Xls
Imports System.Drawing

Namespace ReplaceDataInCellRange
    Friend Class Program
        Private Shared Sub Main(ByVal args As String())
            ' Initialiser une instance de la classe Workbook
            Dim workbook As Workbook = New Workbook()
            ' Charger un fichier Excel
            workbook.LoadFromFile("Sample.xlsx")

            ' Obtenir la première feuille de calcul
            Dim worksheet As Worksheet = workbook.Worksheets(0)

            ' Obtenir une plage de cellules spécifique
            Dim range As CellRange = worksheet.Range("A1:C9")

            ' Rechercher les cellules avec la valeur spécifique "Total" dans la plage de cellules
            Dim cells As CellRange() = range.FindAllString("Total", True, True)

            ' Parcourir les cellules trouvées
            For Each cell As CellRange In cells
                ' Remplacer la valeur de la cellule par une autre valeur
                cell.Text = "Sum"
                ' Définir une couleur de fond pour la cellule
                cell.Style.Color = Color.Yellow
            Next

            ' Enregistrer le fichier résultant dans un emplacement spécifique
            workbook.SaveToFile("ReplaceDataInCellRange.xlsx", ExcelVersion.Version2016)
            workbook.Dispose()
        End Sub
    End Class
End Namespace