اختفاء ملف الاكسل عن عمل كود لاظهار اليوزرفورم

[toytotan]

عندما وضعت الكود الخاص باظهار اليوزر فورم اختفى ملف الاكسل برجاء المساعدة

البواخر.xlsm

[Ali Mohamed Ali]

اهلا بك فى منتدانا الكريم -شرفتنا-تفضل لك ما طلبت تم عمل ايقونة على الفورم للدخول منها الى شيت الإكسيل بإستخدام هذا الكود

Private Sub CommandButton2_Click()
Application.Visible = True
Sheet1.Activate
Me.Hide
UserForm1.Hide
End Sub

 

1البواخر.xlsm

[toytotan]

استاذ على شكرا كثيرا على زوق حضرتك

ولكن عند فتح الملف لاتوجد فيه اى بيانات وتم اختفاء ملف الاكسل واريد استرجاع الداتا الموجودة فى الملف

وشكرا جزيلا 

[Ali Mohamed Ali]

أخى الكريم المشكلة لديك فكل شيء يعمل معى بكفاءة وادخل بالفعل الى شيت الإكسيل

 

[toytotan]

شكرا استاذ على عندك حق المشكلة عندى انا

اكرر شكرى