Joined
Last Seen
0 Reputation Points
Unknown Quality Score
No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.
0 Endorsements
Ranked #72.7K
|
[CODE]Public Sub DisplayData(strArray() As String) Dim intPerson As Integer For intPerson = 1 To mintNumPeople Cells(2, 1).Value = strArray(1) Cells(2, 2).Value = strArray(3) Cells(2, 3).Value = strArray(2) Cells(2, 4).Value = strArray(5) Cells(2, 5).Value = strArray(4) Cells(2, 6).Value = strArray(6) Next intPerson Cells(intPerson + 1, 1).Value = strArray(intPerson * mintDataPerPerson)[/CODE] I'm …
|