اخي الكريم لحين ارفاقك ملف
جرب الكود التالي ...
يمكنك من اضافة رقم 2 يسار الرقم الموجود في الخلية a1
وبالطبع يمكنك تغيير الرقم المضاف بتغيير الرقم 2 الي اي رقم تريده
Sub sama()
[a1].Value = 2 & [a1].Value
End Sub
والكود التالي لتنفيذ العكس واضافة الرقم 2 مثلا يمين الرقم الموجود في الخلية a1
Sub sama1()
[a1].Value = [a1].Value & 2
End Sub
ويمكن بالطبع تنفيذ ذلك علي العمود بالكامل ان كان هذا هو المطلوب
او مزيد من التوضيح اخي الكريم
تقبل خالص تحياتي