Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
3068 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Comparer une liste

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Comparer une liste

n°1933578
hoob91
Posté le 20-10-2009 à 10:35:56  profilanswer
 

Bonjour à tous,  
Cette macro compare le choix d'une listbox avec le contenu d'une colonne, mais le problème vient que dans cette colonne il y aussi du texte
et je n'arrive pas à comparer un nombre avec du texte :
Exemple : dans la userform, on choisit le nombre 123, et dans la colonne il existe des cellules avec du texte, la condition ne marche pas.
 
Je pense que c'est un problème au niveau des déclarations (a ?)
 
 
 
Dim maplage As Range
    Dim Tab_RECO As Variant
    Dim n As Long, i As Long, a As Long
               
    Range("A1" ).Select
    Selection.CurrentRegion.Select
    ActiveWorkbook.Names.Add Name:="Ttab1", RefersToR1C1:= _
        "=Feuil1!R1C1:R559C27"
                 
     Set maplage = Range("Ttab1" )
     n = maplage.Rows.Count    'n : nombre de lignes dans la base
     i = 1
     a = 2
   
      For i = 2 To n
       
          With maplage.Rows(a)
          test = Cells(a, 4)
              If Cells(a, 4) <> Num Then   'ligne, colonne
                Rows(a).Delete
                  a = a - 1
               End If
                  a = a + 1
           End With
       Next i
 
End sub
 
Merci de votre aide

mood
Publicité
Posté le 20-10-2009 à 10:35:56  profilanswer
 

n°1933597
olivthill
Posté le 20-10-2009 à 11:13:14  profilanswer
 

Voir les fonctions CStr(), CInt(), CDbl(), Val() qui permettent de convertir les données d'un type à l'autre.


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Comparer une liste

 

Sujets relatifs
Comparer deux nombres entiersGroup by selon une liste de valeur
[AS2] liste défilante avec boutonsle plus grand d'une liste (trois tables en jeu)
Suppression d'un maillon d'une liste chainéeUn tableau de liste chaînée
[ACCESS] Accèder à une liste déroulanteComparer deux listes VBS
comparer une liste de date sql avec la date today[ASP] comparer une valur à une liste de valeurs
Plus de sujets relatifs à : Comparer une liste


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR