Affichage de la plage de cellules sélectionnée dans Textbox1

Je suis confronté à un problème lors de l'affichage d'une plage de cellules sélectionnée à partir d'Excel dans un textbox d'un UserForm, dire C1:E14. Le code ci-dessous est de me donner un Runtime error '13' Type Mismatch:

Private Sub CommandButton1_Click()
Dim ActSheet As Worksheet
Dim SelRange As Range
Set ActSheet = ActiveSheet
Set SelRange = Selection
Range("TABLE").Select
Application.Goto "TABLE"
UserForm1.TextBox1.Text = Range("C1:E14").Value
'UserForm1.TextBox1.Text = Range("C1:E14").Select
End Sub

Si j'utilise .Value qu'il donne l'erreur mentionnée ci-dessus, mais si j'utilise .Select "True" c'est l'impression de l'objet UserForm zone de texte.

  • C'est une gamme de 42 cellules individuelles ... que voulez-vous dans la zone de texte? chacun d'eux? délimité/affiche comment?
  • Une question similaire, et la discussion du passé: stackoverflow.com/questions/5590963/...
  • Pour résumer, vous ne pouvez pas utiliser le Value (ou Text) les biens d'un Range objet qui contient plus d'une cellule, à moins que, vous pouvez l'affecter à une variable de type Variant (parce que c'est un tableau).
  • Pourquoi avez-vous besoin de faire cela? Juste de la curiosité.
InformationsquelleAutor user1782817 | 2012-10-29