Les tables de données Excel (les tables de données à plusieurs dimensions)

1 - Les tables de données à une dimension :
Ci dessus la vidéo

2- les tables de données à deux dimensions

Les tables de données à plusieurs dimensions :

Vous ci dessus le code VBA que vous devez copier et coller dans un module sur votre page VBA afin d'avoir la fonction personnelle 'scenario':

Function scenario(cellule As String, num_extraction As Integer) As String
    Dim Position(100) As Integer
    Dim mot(100) As String
    
    nbrecar = Len(cellule)
    passage = 0
    tiret = 0
    For i = 1 To nbrecar
        passage = passage + 1
        Position(0) = 0
        If Mid(cellule, i, 1) = "_" Then
            tiret = tiret + 1
            Position(tiret) = i
        End If
    Next i
    Position(tiret + 1) = nbrecar + 1
    
    For j = 1 To tiret + 1
        If j = 1 Then
            mot(j) = Mid(cellule, 1, Position(j) - 1)
        Else
            mot(j) = Mid(cellule, Position(j - 1) + 1, Position(j) - (Position(j - 1) + 1))
        End If
    Next j
            
scenario = CDbl(mot(num_extraction))

End Function