Nom cellules et tri

[JJ]

Bonjour,

j'ai 2 questions à poser sur le forum:

- combien de caractères peut contenir une ligne de macro? en effet avec des If ...Or ...Or ...etc.... Then , la ligne est très longue, peut-on passer à la ligne suivante pour continuer le test Or ... et continuer (mais alors il va manquer un Then?)

- Si j'ai un tri If A='France' Or A='Italie' Then...., puis-je mettre ces 2 noms de pays dans 2 cellules (par ex M1 et M2), les nommer 'pays' et écrire ensuite If A='pays' Then....?

Merci et Bon WE à tous

 

[soft]

On peut passer à la ligne avec un espace et le caractère '_'.

Maintenant, il y a certainement plus simple que des 'if .. or' multiples en utilisant les select case.
Par exemple :

Sub ChoixPays()
Dim Pays As String
'Valeur dans la cellule nommée par exemple
Pays = Range('Pays').Value
Select Case Pays
Case Is = 'France': MsgBox 'France'
Case Is = 'Italie': MsgBox 'Italie'
Case Is = 'France': MsgBox Allemagne
'......

Case Else: MsgBox 'Pays pas trouvé'

End Select
End Sub