[VBA] Transformer un tableau en une colonne
Bonjour, bonsoir
Etant relativement débutant en VBA, je me trouve face à une impasse.
J'ai un tableau de valeurs numériques, sans en-tête, et je souhaiterais via VBA le transformer (si possible dans une autre feuille) en une seule colonne.
Pour compliquer la chose, les valeurs à utiliser (et donc à passer sous forme de colonne) seront sélectionnées parmis les valeurs du tableau.
Le nombre et la position dans le tableau des valeurs à ranger en colonne sera donc variable.
L'odre des valeurs une fois en colonne n'est pas important, tant que celles sélectionnées y sont toutes.
Ci-joint un fichier qui permettra peut être de mieux comprendre mon problème.
Je vous remercie par avance.
Bonjour,
une solution via une macro.
Sub tocol()
Set a1 = Application.InputBox("veuillez sélectionner les cellules à copier", Type:=8)
Set a2 = Application.InputBox("veuillez sélectionner la première cellule de la colonne qui doit recevoir la copie", Type:=8)
For Each r In a1
If a2.Offset(i, 0) = "" Then
a2.Offset(i, 0) = r
Else
MsgBox "cellule cible non vide"
Exit Sub
End If
i = i + 1
Next
End SubParfait, exactement ce dont j'avais besoin.
Merci beaucoup.