Array clarification, fairly simple

[boldcode]

I am using the following piece of code below to populate values into A1, A2 and A3, but for some reason the first value of array gets repeated in cell A2 and A3.

Here is the code:

With wksNewP
       .Range("A1").Resize(3).Value = Array("Report Name:", "Times Used:", "Dates Used:")
    End With

What I end up with is this:

A1 = Report Name:
A2 = Report Name:
A3 = Report Name:

but what I want is this:

A1 = Report Name:
A2 = Times Used:
A3 = Dates Used:

 

[JoeMo]

Array is a horizontal array. Like this:

With wksNewP
    .Range("A1").Resize(3).Value = _
        WorksheetFunction.Transpose(Array("Report Name:", _
        "Times Used:", "Dates Used:"))
End With

 

[Snakehips]

boldcode,

Try this...

With wksNewP
For r = 0 To 2
       .Range("A1").Offset(r, 0).Value = Array("Report Name:", "Times Used:", "Dates Used:")(r)    
Next r
End With

Hope that helps.

 

[boldcode]

JoeMo,

Thanks for the explanation, your modified code works great!