Exclure de cellules dans une plage [Résolu] - Excel

A voir également:Comment exclure dans une formule excel une celluleExclure une cellule dans une plage de données colonne - Meilleures réponses Comment exclure des cellules vides d'une liste? ✓ - Forum - Excel Compter les cellules d'une plage horaire ✓ - Forum - Bureautique Comparer 1 chaine de caractere d'une cellule par rapport plage ✓ - Forum - Excel Compter 2 occurrences dans une même cellule sur une plage ✓ - Forum - Excel Comparer une cellule a une plage de cellules ✓ - Forum - Excel

Bonjour,

J'ai créé un formulaire avec une listbox qui contient une plage de cellule. Cependant je souhaiterai que certaines cellules de la plage ne soient pas affichées dans le formulaire (ex : une cellule contenant un total ou des nombres). Cela est-il possible ?

Merci

Forum

A voir également:Comment exclure dans une formule excel une celluleExclure une cellule dans une plage de données colonne - Meilleures réponses Comment exclure des cellules vides d'une liste? ✓ - Forum - Excel Compter les cellules d'une plage horaire ✓ - Forum - Bureautique Comparer 1 chaine de caractere d'une cellule par rapport plage ✓ - Forum - Excel Compter 2 occurrences dans une même cellule sur une plage ✓ - Forum - Excel Comparer une cellule a une plage de cellules ✓ - Forum - Excel

Web: www.shapebootstrap.net

4 réponses

Marsh

NOVEMBER 9, 2013 AT 9:15 PM

Bonjour,

  For Each C In Plage
If Not IsNumeric(C.Value) Then
Me.ListBox1.AddItem C.Value
End If
Next C


Cordialement.

Daniel

Reply
réponses:
  • auteur

    Bonjour,

    Merci pour l'info. Désolé mais j'ai fait une erreur ! Dans ma plage il y a que du texte mais il existe des parties genre "total" que je ne veux pas inclure dans mon formulaire. Est-ce possible ?

Marsh

NOVEMBER 9, 2013 AT 9:15 PM

For Each c In plage
If c Like "*total*" = False Then
Me.ListBox1.AddItem c.Value
End If
Next c

Reply

Marsh

NOVEMBER 9, 2013 AT 9:15 PM

Cela ne fonctionne malheureusement pas. Voici un exemple qui est illustré dans les images.

La disposition des données et du formulaire est la même que sur mon fichier réel.



Reply

Marsh

NOVEMBER 9, 2013 AT 9:15 PM

Regarde :

Reply
réponses:
  • auteur

  • auteur

    PS. Les majuscules et les minuscules comptent. Si tu veux les ignorer, mets :

    Set plage = [A1:A10]
    For Each c In plage
    If UCase(c.Value) Like "*TOTAL*" = False Then
    Me.ListBox1.AddItem c.Value
    End If
    Next c


    Daniel

  • auteur

    Oups :

    If UCase(c.Value) Like UCase("*TOTAL*") = False Then


    Danniel

  • auteur

    Ça marche super merci ! Par contre j'ai également une autre cellule contenant "Ligne Vierge" que je ne veux pas inclure dans le formulaire. Est-ce possible de l'inclure dans le code en plus du "TOTAL" ?

  • auteur

    En supposant que ta cellule ne contienne rien :

    Set plage = [A1:A10]
    For Each c In plage
    If UCase(c.Value) Like UCase("*TOTAL*") = False And c.Value <> "" Then
    Me.ListBox1.AddItem c.Value
    End If
    Next c


    Sinon :

    Set plage = [A1:A10]
    For Each c In plage
    If UCase(c.Value) Like UCase("*TOTAL*") = False And _
    c.Value <> "Ligne Vierge" Then
    Me.ListBox1.AddItem c.Value
    End If
    Next c


    Daniel

  • auteur

    PS. "Set plage = [Nom onglet! A1:A10] ? "

    Oui, sauf si le nom comporte des espaces. Il faut alors, comme dans Excel, le mettre entre apostrophes :

    Set plage = ['Nom onglet'! A1:A10] ? 

  • auteur

    Ça marche niquel merci Daniel !

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed