المساعده في تنسيق خلية برقمين عشريين

[أحمد صاحب]

السلام عليكم ورحمه الله وبركاته

ارجو تكرماً مساعدتي في تنسيق خليه برقمين عشريين مع فواصل  كارقام خرائط قوقل

مثال

خريطة قوقل تظهر الموقع بعدد 16 رقم بالتنسيق التالي:

13.123456, 12.123456

ارغب بالمساعده في ايجاد طريقتين لتنسيق الخليه

 باستخدام VBA  UserForm TextBox

حاولت كثيرا وبحثت ولم اجد اجابة

جربت هالطريقة وفشلت

.Cells(RowIndex + 1, 3) = Format(Frm.GoogleMap.Value, "00.000000 00.000000")

وغيرها من الطرق ولم تنجح

او بتنسيق الخلية عن طريق التنسيق من نفس  sheet 

الغريب لم اجد في مواقع النت من تحدث عنها .!!!

اتمنى ان اجد الاجابه وشاكر مقدماً مساعدتي

تحياتي

[أبو حنــــين]

السلام عليكم

اذا كانت كل القيم بنفس الصيغة يمكن استعمال الطريقة التالية

TextBox1 = Left(TextBox1, 2) & "." & Mid(TextBox1, 2, 6) & "," & Mid(TextBox1, 6, 2) & "." & Right(TextBox1, 6)

 

تم تعديل مايو 11, 2016 بواسطه أبو محمد الأمين

[أحمد صاحب]

اخي الكريم ابو محمد

الحمدلله طريقتك ناجحه 

والله لا تفي الكلمات من شكر لك على المساعده 

اشكرك من قلبي وجزاك الله خير الجزء