oknzl;3365018 said:You managed to pass the transform12to13 macro.
In the transferplayer macro try to replace this line:
If Sheets("playeradd").Range("A2") <> "" Then
With this:
If Not Sheets("playeradd").Range("A2").Value = "" Then
If this dosent work try this:
Dim Check1 As Variant
Check1 = Sheets("playeradd").Range("A2").Value
If Not Check1 = "" Then
As I mentioned before I can’t check if this will work. In Excel 2010 all of the above works.
You will also have to fix 3 sorting codes that will follow after this.
Still the same! mismatch error type 13 (yellow) If Not Check1 = "" Then