Bonjour,

Je cherche à créer une flèche reliant mon point de départ et mon point d'arrivée dans la partie graphique (feuille "plan" de mon classeur) et qui sont précisé dans ma feuille "données".

j'ai commencé avec le code suivant :
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
Sub routes()
 
    Dim sh As Shape
    Dim route As String
    Dim nb As Double
    Dim i As Integer
    Dim cel As Range
 
    Application.ScreenUpdating = False
    Sheets("données").Select
    nb = Sheets("données").UsedRange.Rows.Count
    For Each cel In Range("C2:C" & nb)
        If Not IsEmpty(cel) Then
            route = cel.Value
            Sheets("plan").Select
 
       ' Alors créer une flèche reliant les deux points
 
        End If
    Next cel
 
End Sub
voir mon fichier joint ce sera très clair

merci beaucoup !
Routes apparition fleche.rarRoutes apparition fleche.rar