Here's my code
For k = 1 To Project_Columns
Sheets(Project_Titles(k)).Activate
Cells(1, 1).Activate
For i = 1 To POC_Rows
If POC_data(i, k) = 1 Then
For j = 1 To 6
Cells(24 + i, 15 + j) = "='POC Information'!R[" & i + 15 & "]C[" & j - 15 & "]"
Next j
End If
Next i
the problem I get is that the R1,C1 are determined based upon the active cell. How do I input this in absolute coordinates so that the cell value doesn't continually skip a cell.
When I run this code I get cell (25,16)="POC Information!R47"
but cell (25,17)="POC Information!T49" instead of "POC Information!S49" like I'd prefer.
For k = 1 To Project_Columns
Sheets(Project_Titles(k)).Activate
Cells(1, 1).Activate
For i = 1 To POC_Rows
If POC_data(i, k) = 1 Then
For j = 1 To 6
Cells(24 + i, 15 + j) = "='POC Information'!R[" & i + 15 & "]C[" & j - 15 & "]"
Next j
End If
Next i
the problem I get is that the R1,C1 are determined based upon the active cell. How do I input this in absolute coordinates so that the cell value doesn't continually skip a cell.
When I run this code I get cell (25,16)="POC Information!R47"
but cell (25,17)="POC Information!T49" instead of "POC Information!S49" like I'd prefer.