Selection.Find et variables indicées

Résolu
mikel831 Messages postés 237 Date d'inscription   Statut Membre Dernière intervention   -  
mikel831 Messages postés 237 Date d'inscription   Statut Membre Dernière intervention   -

Bonjour à tous!
Dans le bout de code test suivant :
Dim Spec as Range
Dim TypeC(7) as String
For j = 1 To 6
        MsgBox TypeC(j)
        Stop
        Spec = Selection.Find(TypeC(j))
        MsgBox Spec
        Stop
 Next j

la ligne Selection.Find bugue ...
Je me demande si elle accepte une variable indicée comme TypeC(j) ???
Si oui, je ne vois pas mon erreur ???


Windows / Chrome 123.0.0.0

3 réponses

  1. yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 588
     

    bonjour,

    N'hésite pas, quand tu as une erreur, à partager le texte du message d'erreur.  Ce texte est précieux, pour toi comme pour nous.

    Connais-tu l'instruction "set"?  Tu l'as pourtant déjà utilisée plusieurs fois.  N'hésite pas à analyser le code que tu utilises, afin d'en comprendre chaque subtilité.

    Quand tu écris "Spec = Selection.Find(TypeC(j))", c'est équivalent à écrire "Spec.value = Selection.Find(TypeC(j))".

    Si tu veux que la variable Spec pointe vers un autre objet, tu dois écrire "Set Spec = Selection.Find(TypeC(j))".

    1
    1. mikel831 Messages postés 237 Date d'inscription   Statut Membre Dernière intervention   19
       

      yg_be, merci pour tes précisions concernant les différences d'écritures:
      "Spec = ...." et "Set Spec=...". J'ai bien compris et j'ai donc modifié mon code sachant que Selection.Find renvoie un Range : ça fonctionne nickel !
      Merci à tous les autres pour vos réponses.
      Cordialement, Mikel
       

      0
  2. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     

    Bonjour,

    Vous n'avez mis aucune valeur dans votre tableau TypeC

    0
    1. mikel831 Messages postés 237 Date d'inscription   Statut Membre Dernière intervention   19
       

      Si, j'ai au préalable initialisé TypeC(1)="aaaa", TypeC(2)="bbbb", etc...

      0
      1. yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention   1 588 > mikel831 Messages postés 237 Date d'inscription   Statut Membre Dernière intervention  
         

        @mikel831 StatutMembre N'hésite pas à montrer un code qui correspond au souci rencontré, plutôt qu'un autre code.  Tu crées souvent de la confusion en partageant un autre code.

        0
  3. yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 588
     

    Tu te demandes si le souci n'est pas causé par l'utilisation d'une variable indicée.

    Dans ce cas, tu aurais pu tester ceci: Spec = Selection.Find("").  Cela t'aurait permis de vérifier ton hypothèse.

    0