If not Then vba

Résolu/Fermé

huliet - Modifié par pijaku le 24/07/2014 à 11:45
huliet - 28 juil. 2014 à 09:59

Bonjour,

Voici mon code,

 Sub essai()

Dim c As Range

For Each c In Worksheets("Feuil1").Range("analyses")
    If Not (c.Value Like "2007" Or c.Value Like "2010") Then
        c.Interior.ColorIndex = 36
      
        Else
         
    End If
    
     Next
   
    
End Sub

mon problème est que certaine cellules contiennent 2007 et se colore en 36, car ces cellules contiennent d'autres années mais est quel est le signe à utiliser pour que ce ne soit pas strictement 2007 et 2010?

Merci de votre aide

A voir également:

Vba if not
If not vba - Meilleures réponses
Vba excel if not - Meilleures réponses
L'indice n'appartient pas à la sélection vba - Forum VB / VBA
Incompatibilité de type vba ✓ - Forum Programmation
The realtek network controller was not found. if deep sleep mode is enabled please plug the cable ✓ - Forum Pilotes (drivers)
If exist ✓ - Forum Autoit / batch
Vba ouvrir un fichier excel avec chemin ✓ - Forum VB / VBA

3 réponses

Réponse 1 / 3

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 752
24 juil. 2014 à 11:47

Bonjour,

Le problème est que, lorsque tu as 2007, tu n'as pas 2010. Donc la condition : Si la valeur n'est pas 2007 OU pas 2010, est remplie.
Essaye avec And :

If Not (c.Value Like "2007" And c.Value Like "2010") Then

Discussions similaires

Vba: erreur 91, variable non défini ou variable de bloc with

Copier plage cellules d'un classeur vers un autre classeur

Créer une mise en forme conditionnelle sur VBA

VBA Excel: Sélection par VBA de + de 2 critères d'un filtre auto

Macro Excel, execution interrompue

afficher la date du jour VBA