Bonjour, après avoir lu le billet d’humeur de l’excellent Pierre Fauconnier :
VBA-Excel: Notation raccourcie d'une plage, une fausse bonne idée! - Blogs - Forum du club des développeurs et IT Pro (developpez.net)

J’ai compris l’erreur que je commettais depuis longtemps.
Je tiens à préciser que je ne fais pas partie des initiés mais plutôt des ploucs et que j’utilisais cette syntaxe parce que visuellement cela me permettait de repérer mes shapes et plages plus facilement.

J’ai commencé l’épurage de mes scripts mais il me reste un point sur lequel j’achoppe : les ListBox.

Je sèche sur ça :

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
Sub PropLBX()
 
    Dim i  As Byte
    Dim NoLgn As Byte
    Dim NbLgn As Byte
    Dim ValLgn As String
 
    NoLgn = [ListBox].ListIndex 'N° de ligne active
    NbLgn = [ListBox].ListCount 'Nombre de lignes
 
    For i = 1 To [ListBox].ListCount 'Selectionne chaque valeur une a une
 
        [ListBox].ListIndex = i 'Selectionne une ligne
        ValLgn = [ListBox].List([ListBox].ListIndex) ' Valeur de la ligne active
 
    Next
 
End Sub
Si quelqu’un peu me donner une direction pour corriger, je lui en serais plus que reconnaissant.

ListBox.xlsm