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 :

VBA Excel - Listbox - Removeitem


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Inscrit en
    Février 2007
    Messages
    118
    Détails du profil
    Informations forums :
    Inscription : Février 2007
    Messages : 118
    Par défaut VBA Excel - Listbox - Removeitem
    Bonjour à tous,
    J'ai une listbox (alimentée par unesheet excel) dans laquelle je veux faire un removeitem d'une ligne bien définie.
    Mais j'ai le message d'erreur suivant : permission denied
    Même problème pour faire un additem
    Quelqu'un pourrait-il m'aider SVP ?...
    Merci beaucoup

  2. #2
    Invité
    Invité(e)
    Par défaut
    Bonjour

    Avec le code ce serait mieux

    Starec

  3. #3
    Membre confirmé
    Inscrit en
    Février 2007
    Messages
    118
    Détails du profil
    Informations forums :
    Inscription : Février 2007
    Messages : 118
    Par défaut
    Bonjour,
    Et déjà merci pour l'aide...

    Voici le code :

    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
    Public Sub CommandButton8_Click() ' visualiser le métré
     
    ListBox2.ColumnCount = 9
    ListBox2.ColumnWidths = "0.5 cm;0.5 cm;0.5 cm;0.8 cm;1 cm;16 cm;1 cm;0.8 cm;0.8 cm"
    i = 2
    Do While Worksheets("metre").Cells(i, 7) <> ""
    i = i + 1
    Loop
    nbreligne = i - 1
    txtm = "metre!b4:j" & nbreligne
    ListBox2.RowSource = txtm
    'If ListBox2.ListIndex = -1 Then
    '            ListBox2.ListIndex = 1
    'End If
    ListBox2.AddItem "N° de code", 0
    Dans ce cas-ci, c'est le Additem qui ne fonctionne pas....

    Bon courage et déjà merci...

  4. #4
    Invité
    Invité(e)
    Par défaut
    Re

    C'est ta syntaxe qui ne va pas

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    ListBox2.AddItem "N° de code", 0
    Que veux-tu rajouter à ta liste ? Si c'est "N° de Code", que vient faire le ,0 ?

    Starec

  5. #5
    Membre confirmé
    Inscrit en
    Février 2007
    Messages
    118
    Détails du profil
    Informations forums :
    Inscription : Février 2007
    Messages : 118
    Par défaut
    Comme je n'arrive pas à supprimer une ligne dans ma listbox, je ne l'alimente pas complètement et rajoute une ligne tout en haut, c'est-à-dire à la ligne 0.
    Mais que ce soit la 0, la 1, la 10, etc..., le message d'erreur est toujours le même : runtime error '70' - permission denied.

  6. #6
    Membre confirmé
    Inscrit en
    Février 2007
    Messages
    118
    Détails du profil
    Informations forums :
    Inscription : Février 2007
    Messages : 118
    Par défaut
    est-ce que vous trouvez le problème ?

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. VBA Excel : Transfert listbox vers Excel
    Par Secco dans le forum Macros et VBA Excel
    Réponses: 17
    Dernier message: 27/04/2008, 23h33
  2. [VBA Excel] - création d'une listbox des jours ouvrés
    Par ancel17 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 10/04/2008, 16h42
  3. [VBA Excel] Listbox, nom des colonnes et couleur des lignes
    Par Tutures dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 19/03/2008, 16h24
  4. [VBA Excel] Listbox
    Par Nyck0las dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 08/02/2008, 16h20
  5. [VBA-Excel] Propiété RowSource d'une ListBox
    Par padre03 dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 28/09/2006, 18h05

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