Dim Var1 as string
For i = 1 To Worksheets("By Store").Cells.Count
If Worksheets("By Store").Cells(i, column).Value = cboRefine
Then
For z = 1 To 13
Var1 = Cells(i,z).value
Sheets("Results").Activate
Worksheets("Results").Cells(i, z).Value = Var1
Sheets("By Store").Activate
Next
End If
Next

HTH

Die_Another_Day

Brandon Johnson wrote:
Kind of wondering if this is possible. Im new to the excel programming
a little. It throws me an error on the line where i try to look onto
another sheet. any ideas


For i = 1 To Worksheets("By Store").Cells.Count
If Worksheets("By Store").Cells(i, column).Value = cboRefine
Then
For z = 1 To 13
Worksheets("Results").Cells(i, z).Value = Worksheets("By
Store").Cells(i, z).Value
Next
End If
Next