IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Pb tableau en string


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éprouvé Avatar de Kazevil
    Homme Profil pro
    Inscrit en
    Août 2006
    Messages
    105
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France

    Informations professionnelles :
    Secteur : Conseil

    Informations forums :
    Inscription : Août 2006
    Messages : 105
    Par défaut Pb tableau en string
    Bonjour,

    je suis entrain de faire une macro avec laquelle je veux ecrire un nom de pays dans une colonne en fonction d'un ID qui est dans la colonne precedente.

    Je stocke donc l'ID dans une variable avant d'aller chercher le nom correspondant dans la feuille qui va bien.
    Mon probleme c'est quand j'essai de stocker ce nom dans un tableau de type string, j'otiens comme erreur "Compile Error Expected : As"
    VOila un extrait de mon code avec la partie concernee

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
     
    Dim name(10000) As String 'tableau contenant les noms de pays
     
    ...
     
    For k = 3 To lastcountry
     
            Range("B" & k).Select
     
            If Not CID(j) <> Selection.Value Then
     
                Range("C" & k).Select
                name(j) = Selection.Value <== lieu du pb
     
                k = lastcountry
     
            End If
        Next k
    j'ai essaye differentes methode mais j'obtiens toujours la meme erreur. Voila les autres combinaisons que j'ai essaye

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
     
                Range("C" & k).Select
                tmp = Selection.Value
                name(j) = tmp
     
    mais aussi
     
                name(j) = Range("C" & k)
     
    et
     
                name(j) = Sheets(1).Cells("C" & k)
    Si quelqu'un a une idee ou la bonne facon de faire je suis bien sur preneur.

    Merci bcp

    Kaz

  2. #2
    Membre Expert Avatar de wilfried_42
    Homme Profil pro
    Auto-entrepreneur
    Inscrit en
    Novembre 2006
    Messages
    1 427
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 63
    Localisation : France, Vendée (Pays de la Loire)

    Informations professionnelles :
    Activité : Auto-entrepreneur
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Novembre 2006
    Messages : 1 427
    Par défaut
    bonjour

    je ne comprend pas grand chose m'enfin on va essayer

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    For k = 3 To lastcountry
           if Range("B" & k) = CID(j) then 
                    name(j) = range("C" & k)
                    exit for
            end if
    next k
    not <> equivaut à =
    il n'est pas utile de selectionner une cellule pour l'utiliser et ca ralentit le code

    ta variable j ???????????? en lisant ta routine, je n'ai pas trouvé la reférence

    Montre ou est l'erreur n'est pas suffisant, le code de l'erreur et le libellé donne des indices

    @ te lire

  3. #3
    Membre averti
    Inscrit en
    Novembre 2007
    Messages
    20
    Détails du profil
    Informations forums :
    Inscription : Novembre 2007
    Messages : 20
    Par défaut tableau en string
    salut,
    A la place de essaie :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    range("C1").offset(0,k).value
    en faisant demarrer k à 2 au lieu de 3

  4. #4
    Membre émérite

    Profil pro
    Inscrit en
    Octobre 2006
    Messages
    652
    Détails du profil
    Informations personnelles :
    Localisation : France, Ardèche (Rhône Alpes)

    Informations forums :
    Inscription : Octobre 2006
    Messages : 652
    Par défaut
    Bonjour,

    "name" est un nom réservé par VBA...

  5. #5
    Membre éclairé
    Profil pro
    Inscrit en
    Août 2007
    Messages
    95
    Détails du profil
    Informations personnelles :
    Âge : 41
    Localisation : France

    Informations forums :
    Inscription : Août 2007
    Messages : 95
    Par défaut
    Hello,

    et en plus du reste, tu peux changer "k=lastcountry" par "exit for", c'est beaucoup plus propre.

  6. #6
    Expert confirmé
    Avatar de Qwazerty
    Homme Profil pro
    La très haute tension :D
    Inscrit en
    Avril 2002
    Messages
    4 122
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 45
    Localisation : France

    Informations professionnelles :
    Activité : La très haute tension :D
    Secteur : Service public

    Informations forums :
    Inscription : Avril 2002
    Messages : 4 122
    Par défaut
    SAlut
    Pour ma part a la place de
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    name(j) = Selection.Value
    Je mettrais plutot
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    name(j) = Selection.Formula
    Et comme dis plus haut name est peut etre pas le nom de variable le plus approprié
    A++
    Qwaz

    MagicQwaz := Harry Potter la baguette en moins
    Le monde dans lequel on vit
    Ma page perso DVP
    Dernier et Seul Tutoriel : VBA & Internet Explorer
    Dernière contribution : Lien Tableau Structuré et UserForm
    L'utilisation de l’éditeur de message

Discussions similaires

  1. Tester si une String fait partie d'un tableau de String
    Par laloi dans le forum Collection et Stream
    Réponses: 2
    Dernier message: 23/04/2005, 16h47
  2. [J2SE] tableau de string
    Par Jules82 dans le forum Collection et Stream
    Réponses: 3
    Dernier message: 17/03/2005, 14h35
  3. Ranger un tableau de String dans ma HashMap
    Par jeyce dans le forum Collection et Stream
    Réponses: 3
    Dernier message: 26/08/2004, 22h41
  4. [Collections] Conversion de Vector en tableau de String
    Par java_math dans le forum Collection et Stream
    Réponses: 5
    Dernier message: 06/06/2004, 12h55
  5. [Collections] Tableau de String
    Par gexti dans le forum Collection et Stream
    Réponses: 11
    Dernier message: 02/06/2004, 15h42

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo