Hey Guys, I was wondering if you might be able to help me. I have been all over the web pulling my hair out on this one. It seems I can't find an informative answer on this. They all just seem to list code that does the job, but doesn't explain how it works. Goal: Grab data from sheet 1 that is listed horizontally and paste that information in sheet 2 vertically. FROM: (SHEET 1)
Any help would be great as the web has turned out to be very vague in explaining Arrays and using Loops with them. later Ty
Option Explicit Sub FormatScores() Dim TeamCount as Integer Dim TeamScore as Integer Dim VarTeamScore(6,6) As Variant For TeamCount 0 to 6 VarTeamScore(TeamCount) = Range(cells(1, TeamCount).value VarTeamScore(ScoreCount) = Range(cells(1, ScoreCount).Value TeamCount = TeamCount + 1 ScoreCount = ScoreCount + 1 Next End Sub
This question generated 17 answers. To proceed to the answers, click here.
This thread is current as of September 03, 2014.