La commutation de Gamme à la gamme et à l'Arrière dans une Fonction VBA

Il y a beaucoup de questions, et beaucoup de réponses traitant de Gamme/Tableau de conversion en VBA. Je n'ai pas été en mesure de trouver une réponse qui fonctionne, donc je voudrais vraiment aprécier un peu d'aide.

Ci-dessous est ce que je suis en train de faire:

    Function RangeToArrayToRange(inputRange As Range) As Range
        Dim inputArray As Variant
        inputArray = inputRange
        'operations on inputArray'
        '...'
        Dim outputRange As Range
        outputRange = inputArray
        Set RangeToArrayToRange = outputRange
    End Function

Merci d'avance pour votre aide!

Après avoir répondu, et puis re-lecture de votre question, je suis maintenant dans le flou sur votre besoin. Peut-être que vous pourriez essayer de l'expliquer par des mots (pas de code, puisque cela semble être l'endroit où se trouve votre problème réside). Vous ne pouvez pas convertir un tableau de variant d'une Plage, si c'est ce que vous essayez de le faire...
Je ne suis pas sûr de ce que vous demandez, mais n'oubliez pas d'utiliser le "Set" avec chaque gamme, par exemple, Set outputRange = inputArray.
S'il vous plaît ajouter plus de détails sur ce que vous voulez faire, et ce avec quoi vous travaillez (c'est à dire en une seule rangée, colonne unique, multi ligne/colonne, etc)

OriginalL'auteur nightTrevors | 2012-06-27

  1. 5

    Si outputRange est le coin supérieur gauche de la cellule de la plage à être remplis:

    outputRange.Resize(Ubound(inputArray,1), _
                   Ubound(inputArray,2)).Value = inputArray

    MODIFIER: je pense que c'est ce que vous voulez faire

    Function RangeToArray(inputRange As Range) As Variant
   Dim inputArray As Variant
   inputArray = inputRange.Value

   'operations on inputArray
   '...'

   RangeToArray = inputArray
End Function

    Vous pouvez l'utiliser sur une feuille de calcul d'une fonction définie par l'utilisateur (UDF)

    1. Sélectionner une plage qui est de la même dimension que le "inputRange" (même nombre de lignes/colonnes)
    2. Entrez "=RangeToArray([yourinputrange])" dans la barre de formule et appuyez sur Ctrl+Maj+entrée pour Entrer la formule sous la forme d'un "tableau de la formule"

    Cela suppose que vous n'êtes pas modifier les dimensions (en haut/en bas de limites) de inputArray dans votre fonction.

    Merci pour votre réponse rapide, Tim. J'ai mis en place votre suggestion, mais j'ai toujours un #VALEUR! erreur. (EDIT: je suis nouveau sur StackOverflow donc je ne pouvais pas obtenir le code joliment ajouté ici)
    Voir mon commentaire à votre question: il permettrait d'améliorer votre question si vous avez ajouté une description de ce que vous essayez d'atteindre avec votre code. Que vous obtenez erreur #VALEUR me fait penser que vous essayez d'utiliser votre fonction comme une fonction sur une feuille de calcul. Si c'est le cas, vous avez juste besoin de retourner inputArray (comme une Variante) et entrez la formule en tant que formule matricielle dans une gamme de la même dimension que la gamme d'entrée.
    Merci Tim! Je vais être sûr d'être plus précis la prochaine fois.

    OriginalL'auteur Tim Williams