Rename FindMaxLongValue.vba to FindMaxLongValue.vb