[VBA] Excel différencier cellules vide ou contenant 0

Excel différencier cellules vide ou contenant 0 [VBA] - VB/VBA/VBS - Programmation

Marsh Posté le 08-03-2006 à 11:50:51    

Bonjour,
 
je veux comparer des cellules 2 par 2. Une valeur brute sur un feuille et la même valeur validée ou non (effacée ou remplacée par une autre) sur une autre feuille.
 
le pb c'est que si la première = "0" et la deuxième "vide" cela est la même chose.
 
exemple :
cellule_brute = 102 , cellule_valide = vide => cellule_brute <> cellule_valide
cellule_brute = 0 , cellule_valide = vide => cellule_brute = cellule_valide !
 
y'a une astuce pour différencier une cellule vide d'une nulle ?

Reply

Marsh Posté le 08-03-2006 à 11:50:51   

Reply

Marsh Posté le 08-03-2006 à 12:39:53    

Bonjour,
 
Tu peux différencier tes cellules vides des cellules à 0 avec la fonction IsEmpty.
 
If IsEmpty(Range("A1" ) Then...
 
A+
Horatio
 

Reply

Marsh Posté le 08-03-2006 à 15:24:19    

merci horatio
 
Voilà comment je m'en suis tiré :
d'abord il faut que les valeurs soient de type variant (en single vide=0)

dans boucle :
If cell_brut <> cell_valide Or (IsEmpty(cell_brut) = False And IsEmpty(cell_valide) = True) Then
nbmauvais = nbmauvais + 1  ' ---> Mauvais
End If
 
If cell_brut <> cell_valide And IsEmpty(cell_valide) = False Then
nbremplace = nbremplace + 1 ' ---> Remplacé
End If


 
ça me permet de faire des stat sur des mesures :

  • absent = valeur non présente dans les valeurs brutes (je fais avec ".SpecialCells(xlCellTypeBlanks).Count" sur la plage des valeurs brutes)
  • validé = valeur présente dans les valeurs validées (".SpecialCells(xlCellTypeBlanks).Count" sur la plage des valeurs valides)
  • mauvais = valeur présente dans les valeurs brutes mais différente ou absente dans les valeur validées
  • remplacé = valeur présente dans les valeurs validées mais différente ou absente dans les valeurs brutes


Message édité par berlo le 08-03-2006 à 15:30:43
Reply

Sujets relatifs:

Leave a Replay

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