Writing To A Range Using VBA array

Question

I have a script that pulls the first cell value of a table from a database and adds it 10 times. I want to write that list to excel.

Here's what I have so far:

sub x()
    Dim myArray As Variant
    Dim i As Variant

    myArray = Sheets("License Plate Number").Range("LP")
    myVariable = (Trim(Right(mp_start, 12)))

    For i = 0 To (ord_qty / 120) - 1

        Myarr = "MP" & myVariable + i
        myArray = Myarr

        'MsgBox Myarr
        Debug.Print Myarr

    Next i

end sub

How can I write to a range using VBA?

If variables had sensible names, it would be much easier to understand the issue. — GSerg
– GSerg, Commented Dec 24, 2017 at 21:55

braX · Accepted Answer · 2017-06-22 18:19:04Z

2

It's very simple. You just do it like this.

Range("A1:J1")=Myarr

answered Jun 22, 2017 at 18:19

braX

11.9k5 gold badges24 silver badges38 bronze badges

Sign up to request clarification or add additional context in comments.

2 Comments

Connolly Destin Over a year ago

I did it just repeat the last number over

GSerg Over a year ago

@TerranceMatthew That is because your myArray is not an array. It only contains the last value because you overwrite the entire contents of the variable on each loop iteration.

Collectives™ on Stack Overflow

Writing To A Range Using VBA array

1 Answer 1

2 Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

2 Comments

Your Answer

Sign up or log in

Post as a guest

Related