Function mySizeDisk(integerSize)

If integerSize >= 1000000000 Then
        mySizeDisk = round(integerSize / 1000000000, 2)
        mySizeDisk = mySizeDisk & " GB"
ElseIf ((1000000000 > integerSize) And (integerSize >= 1000000)) Then
        mySizeDisk = round(integerSize / 1000000, 2)
        mySizeDisk = mySizeDisk & " MB"
ElseIf ((1000000 > integerSize) And (integerSize >= 1000)) Then
        mySizeDisk = round(integerSize / 1000, 2)
        mySizeDisk = mySizeDisk & " KB"
Else
        mySizeDisk = integerSize & " Bytes"
End If

End Function