Bonjour à toutes et tous,

Voici mon problème,

J'ai une macro que je veux déclencher si 3 conditions sont remplies, pas de souci, si les conditions sont des chiffres, mais en revanche l'une d'entre elles est remplie par des noms, donc des lettres, et là je ne trouve pas la solution.

Je vous joins le code que j'utilise :


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
16
17
18
19
20
21
22
23
24
25
26
27
28
Sub variables()
         If IsNumeric(Range("A3")) Then 'SI NUMERIQUE
         Dim Reglement As Integer, Intervenant As Integer, Nom As Integer
         Reglement = Range("A1")
         Intervenant = Range("A2")
         Nom = Range("C1")
 
 
 
         If Reglement >= 1 And Intervenant >= 1 And Nom >= "A" Then   'SI CORRECT
 
         Range("A3").Select
         Selection.Copy
         Range("P3").Select
         Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
             :=False, Transpose:=False
 
 
          Else 'SI INCORRECT
 
             MsgBox "Donnée(s) manquante(s) !"
 
             Range("P3").ClearContents
 
         End If
            End If
 
 End Sub
C'est sur cette ligne que je ne trouve pas la solution

If Reglement >= 1 And Intervenant >= 1 And Nom >= "A" Then 'SI N° CORRECT

Si j'enlève le "A" et que je le remplace par un chiffre dans la formule, le code fonctionne, mais ce n'est pas ce que je veux, puisque la cellule contient des
lettres.

Alors quelqu'un parmi vous peut m'apporter la solution, ce serait sympa.

Cordialement

Dubdub22