Виртуальная (экранная) клавиатура в Excel средствами VBA

Формулировка задачи:

Всем доброго времени суток. Потихоньку разбираюсь с VBA. Нужна помощь. Создал форму виртуальной клавиатуры. Есть рабочий документ Excel, в котором использую в основном клавишами, представленными на форме. но при вводе значений предыдущее значение удаляется. Подскажите пожалуйста, можно ли сделать так, чтобы ячейка оставалась активной для ввода следующих значений. Например с этой же клавиатуры ввести "12/3". 1.xls

Решение задачи: «Виртуальная (экранная) клавиатура в Excel средствами VBA»

textual
                            Листинг программы 
                        

                            Private Sub CommandButton1_Click()
ActiveCell.Value = ActiveCell.Value & 1
End Sub
                        