Hi all,
Can anyone help with this problem! My VBA code works perfectly in Excel 2010 but whenever I try to run it in Excel 2013 or 16, Excel crashes and closes down. Does anybody have any idea why this is happening. Code that works in 2010 but not in 2013 or 16 is below.
Private Sub CommandButton24_Click()
Dim erow As Long
erow = Sheet1.Cells(Rows.count, 1).End(xlUp).Offset(1, 0).Row
Worksheets("Complaints Log").Cells(erow, 3).Value = R4
Worksheets("Complaints Log").Cells(erow, 4).Value = R6
Worksheets("Complaints Log").Cells(erow, 5).Value = R5
Worksheets("Complaints Log").Cells(erow, 6).Value = R7
Worksheets("Complaints Log").Cells(erow, 7).Value = R8
Worksheets("Complaints Log").Cells(erow, 8).Value = R9
Worksheets("Complaints Log").Cells(erow, 9).Value = R10
Worksheets("Complaints Log").Cells(erow, 35).Value = R11
Worksheets("Complaints Log").Cells(erow, 10).Value = R12
Worksheets("Complaints Log").Cells(erow, 11).Value = R13
Worksheets("Complaints Log").Cells(erow, 13).Value = R14
Worksheets("Complaints Log").Cells(erow, 14).Value = R15
Worksheets("Complaints Log").Cells(erow, 17).Value = R16
Worksheets("Complaints Log").Cells(erow, 18).Value = R17
Worksheets("Complaints Log").Cells(erow, 21).Value = R18
Worksheets("Complaints Log").Cells(erow, 12).Value = R20
Worksheets("Complaints Log").Cells(erow, 20).Value = R21
Worksheets("Complaints Log").Cells(erow, 22).Value = R22
Worksheets("Complaints Log").Cells(erow, 23).Value = R23
Worksheets("Complaints Log").Cells(erow, 24).Value = R24
Worksheets("Complaints Log").Cells(erow, 15).Value = R25
Worksheets("Complaints Log").Cells(erow, 38).Value = R28
Worksheets("Complaints Log").Cells(erow, 37).Value = R29
Worksheets("Complaints Log").Cells(erow, 39).Value = R30
Worksheets("Complaints Log").Cells(erow, 40).Value = R43
End Sub
Any help would be appreciated. This is so frustrating.
Thanks in advance!
Bookmarks