PDA

View Full Version : [SOLVED] HELP!! GETTING MULTIPLE VARIANTS INTO ONE RANGE!!!!



ytjjjtyj
07-10-2019, 07:11 AM
Hello, so I have 6 variants each with 100 rows but different amount of columns.
I want to combine all my variants into one single range- adding the variants vertically down,one after the other, leaving a space between each variant as it comes into my range. I do not want to add it in the range side by side.

I tried this but it didn't work. Please let me know if you can help me.

Dim vntAllvariants As Variant


vntAllvariants = Application.index( _
Union(vntData1, vntData2,vntData3,vntData4,vntData5,vntData6), _
Evaluate("row(1:" & vntData1.Rows.Count & ")"), _
1, _
Array(1, 2,3,4,5,6))




Range("A4:EE1000").value = dat4




** example: vnt1 =
1,2,3,4
5,6,7,8

vnt2=
2,3,4,5
4,6,7,8

range("A4:EE1000") =
1,2,3,4
5,6,7,8

2,3,4,5
4,6,7,8

Artik
07-11-2019, 02:33 AM
ytjjjtyj please, attach a data file (they may be fictitious). Show how your ranges are stacked and what you want to achieve.

..::Edit
The solution to the problem is probably in this thread: http://www.vbaexpress.com/forum/showthread.php?65468
::..

Artik