none
Utilisation de "Find" (Microsoft.Office.Interop.Excel) pour retrouver des valeurs d'un classeur Excel RRS feed

  • Question

  • Bonjour, j'utilise un code qui me permet en cliquant sur "Rechercher" d'ouvrir un classeur Excel et de chercher dans la Feuil1 colonne B, la valeur se trouvant à gauche du Button soit 16543 dans cet exemple.

    Est-il possible d'étendre le code afin qu'il recherche en même temps dans la colonne B les autres valeurs se trouvant dans mon Form (16589 et 16890)?

    Voici mon code de base :

     Public Sub SearchExcel()
            Dim currentFind As Excel.Range = Nothing
            Dim firstFind As Excel.Range = Nothing
            Dim xlApp As New Excel.Application
            Dim xlBook As Excel.Workbook
            Dim xlSheet As Excel.Worksheet
            xlBook = xlApp.Workbooks.Open("C:\Users\Rollo\Desktop\TestFind.xlsx")
            xlApp.Visible = True
            xlSheet = xlBook.Sheets("Feuil1")
            Dim NumPal As Excel.Range = xlSheet.Range("B1", "B18")
            currentFind = NumPal.Find(ValueFInd.Text,, Excel.XlFindLookIn.xlValues, Excel.XlLookAt.xlPart _
                                      , Excel.XlSearchOrder.xlByRows, Excel.XlSearchDirection.xlNext, False)
            Dim LigneEntiere As Excel.Range = currentFind.EntireRow()
            With LigneEntiere.Font
                .Color = Color.Red
                .Bold = True
            End With
        End Sub


    JF Collombet ® CreateSpecificCulture

    mardi 22 mars 2016 17:15

Réponses

  • Bonjour, jeffcollombet,

    Veuillez consulter les liens en bas :
    Excel add-in c# find
    Microsoft.Office.Interop.Excel assembly
    Je vous remercie par avance de votre retour.

    Cordialement,
    Teodora


    Votez! Appel à la contribution TechNet Community Support. LE CONTENU EST FOURNI "TEL QUEL" SANS GARANTIE D'AUCUNE SORTE, EXPLICITE OU IMPLICITE. S'il vous plaît n'oubliez pas de "Marquer comme réponse" les réponses qui ont résolu votre problème. C'est une voie commune pour reconnaître ceux qui vous ont aidé, et rend plus facile pour les autres visiteurs de trouver plus tard la résolution.

    mercredi 23 mars 2016 13:23
    Modérateur