Function to Display in another Collum

[martyloo]

Hi all my code so far is the following:

Sub Ace_Click1()
Dim NC As Integer
NC = WorksheetFunction.Max(2, Cells(19, Columns.Count).End(xlToLeft).Column + 1)
Cells(19, NC).Value = 11
NC = WorksheetFunction.Max(2, Cells(21, Columns.Count).End(xlToLeft).Column + 1)
Cells(21, NC).Value = 1
End Sub

When the Ace button is clicked the value 11 displays in cell B19 and the Value 1 displays in cell B21

All of the above code is fine except I want the values to display in cell E19 and E21 first rather than B19 / and B21 but I have no idea how to do it!?

Any help would be fantastic


IGNORE THIS ITS SORTED!!!

 

[machopicho]

Sub Ace_Click1()
Dim NC As Integer
NC = WorksheetFunction.Max(2, Cells(19, Columns.Count).End(xlToLeft).Column + 1)
Cells(19, NC+2).Value = 11
NC = WorksheetFunction.Max(2, Cells(21, Columns.Count).End(xlToLeft).Column + 1)
Cells(21, NC+2).Value = 1
End Sub