Aide Excel : Parcourir un tableau

Résolu
Kyukuro1 Messages postés 6 Statut Membre -  
Kyukuro1 Messages postés 6 Statut Membre -
Bonjour,

Je bloque actuellement sur Excel et suis à la recherche d'aide concernant une formule pour parcourir mon tableau.

J'explique : J'ai une colonne A qui contient des URLs d'un site Internet. Je souhaite que dans la colonne B, la formule m'indique soit un 1, soit un 0, si elle trouve dans une cellule, un des caractères que j'ai listés dans la colonne C.

Si vous avez une idée autre ou des pistes ou une réponse, je suis preneur . Merci :)

3 réponses

  1. gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   4 744
     
    Bonjour,

    C'est tout à fait possible de le faire avec une formule comme celle-ci :
    =SI(SOMMEPROD(NB.SI($C$1:$C$30;STXT(A1;LIGNE(INDIRECT("1:"&NBCAR(A1)));1)));1;0)
    2
    1. via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   2 759
       
      Salut et bravo gbinforme !

      Je n'aurais jamais été jusque là, d'ailleurs j'ai un peu de mal à en comprendre le fonctionnement
      Peux tu expliciter un peu s'il te plait ?

      Bien cordialement
      Via
      0
    2. gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   4 744
       
      Salut via55,

      C'est vraiment basique de chez basique :
      - SI pour avoir 0 ou 1
      - SOMMEPROD pour passer en matricielle et cumuler le résultat
      - NB.SI($C$1:$C$30 avec la liste des caractères à tester
      - STXT(A1 pour isoler chaque caractère
      - LIGNE(INDIRECT("1:"&NBCAR(A1)) pour la taille du texte à parcourir

      Rien de complexe donc mis à part la syntaxe précise comme dans toute fonction

      Bonne nuit maintenant
      0
    3. Kyukuro1 Messages postés 6 Statut Membre
       
      Super merci beaucoup à toi (je n'avais pas vu ton message, pardon). D'un point de vue "temps de traitement" qu'est ce qui est le plus efficace ? Mettre en place ta formule ou alors la fonction que m'a proposé Via55 ? =)
      0
    4. gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   4 744
       
      Bonjour,

      qu'est ce qui est le plus efficace ?
      Cela est difficile à quantifier mais les fonctions natives d'excel sont codées en langage compilé et sont testées et validées sans erreur. Les fonctions écrites en VBA le sont en langage interprété qui est nécessairement moins efficient du fait de l'interprétation et sont sujettes au bug d'écriture car personne ne valide sauf l'auteur.
      En règle générale il est préférable d'utiliser les fonctions excel pour tout calcul alors que le VBA est très utile pour accomplir les taches répétitives, spécifiques et longues qui ne sont pas au catalogue bien fourni des fonctions et pour cause car elles sont liées à la spécificité de la tache à accomplir.
      0
    5. Kyukuro1 Messages postés 6 Statut Membre
       
      Merci beaucoup pour ces détails précis, je vais donc partir sur ta formule plutôt que la fonction personnalisée de Via. Je la garde toutefois précieusement.

      Merci à vous deux :)
      0
  2. via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   2 759
     
    Bonjour Kyukuro

    1) Tu auras toujours la réponse OUI car dan ta liste il y a le caractère / !

    2) Par formule pas possible mais par fonction personnalisée oui
    En supposant la liste des caractères spéciaux en C2:C30 fonction personnalisée à mettre dans un module de l'éditeur VBA (ALT+F11 pour ouvrir Editeur - Insertion - Module - copier coller la macro dans la page blanche - fermer Editeur)
    Function car_spec(plage As Range)
    texte = plage.Value
    For n = 1 To Len(texte)
    c = Mid(texte, n, 1)
    If Application.WorksheetFunction.CountIf(Range("C2:C30"), c) = 1 Then existe = 1
    Next
    If existe = 1 Then car_spec = "OUI" Else car_spec = "NON"
    End Function


    La fonction s'utilise alors comme toute fonction Excel avec la syntaxte : =car_spec(cellule à traiter)
    ainsi en B2 ce sera =car_spec(A2)

    Cdlmnt
    Via
    0
    1. Kyukuro1 Messages postés 6 Statut Membre
       
      Bonjour Via,
      Merci beaucoup pour ta réponse très rapide ! Je suis actuellement entrain d'essayer de la mettre en place. J'ai toutefois une question, est ce que la fonction personnalisée est liée au document en question ?

      Je souhaite pouvoir ensuite partager mon document et m'en servir comme modèle.

      Merci, je te tiens au courant de son efficacité ! :)

      Bonne soirée

      Kyukuro
      0
  3. via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   2 759
     
    Re,

    Le classeur doit être enregistré sous format prenant en charge les macros
    Si tu communiques une copie de ce classeur la macro s'appliquera

    Si c'est un classeur partagé cela devrait fonctionner aussi, à vérifier néanmoins

    Bonne soirée également

    0
    1. Kyukuro1 Messages postés 6 Statut Membre
       
      Je viens de mettre en place tout ça sur mon Excel, tout fonctionne parfaitement.

      Merci :)
      0