Макрос работает неправильно

[AllenJ]

Добрый день. Мой макрос работает неправильно. Первая часть работает правильно - находит таблицу и вставляет в ячейку рандомное число.
По второй части макрос должен брать это получившееся число и добовлять + 0,5, но, почему-то число получается огромным и совсем неправильным. В чем ошибка?

Selection.Find.ClearFormatting
    With Selection.Find
        .Text = "Таблица 1"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    Selection.Find.Execute
    i = 2
    j = 2
    MyValue = RandInt(740, 760)
    Selection.Tables.Item(1).Cell(i, j).Range.Text = MyValue


Selection.Find.ClearFormatting
    With Selection.Find
        .Text = "Таблица 2"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    Selection.Find.Execute
    i = 2
    j = 2
    Selection.Tables.Item(1).Cell(i, j).Range.Text = MyValue + 0.5

Спасибо за помощь!