IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Voir le flux RSS

tamtam64

  1. Extraire un vecteur d'une matrice

    par , 14/07/2015 à 11h23
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
        'Fonction qui récupere un vecteur
    Function ExtraireVecteur(ByVal Matrice As Variant, Ligne As Long, OneColonne As Boolean) As Variant
        'defintion variables
        Dim i As Long, j As Long
        Dim VaR As Variant
            'extraction
        If OneColonne = False Then
            ReDim VaR(UBound(Matrice, 2))
        End If
        For i = 1 To UBound(Matrice, 1)
            If i = Ligne Then
                If OneColonne = False Then
    ...
    Tags: matrice, vecteur
    Catégories
    Sans catégorie