اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الردود الموصى بها

قام بنشر

في المرفق كود ساعدني به الاستاذ مختار جزاه الله كل خير

أرجو مساعتي في تعديل الجزء المتعلق باختيار ملف الوورد فبدلا من اختياه من نافذة حوار أن يأخذ اسم الملف ومساره من الشيت 2 الخلية لتكن A1

والشكر لكم  للاستاذ مختار مرة أخرى

وبارك الله

قائمة بالاسعار مختار.rar

قام بنشر

أخي الكريم محي

قم بوضع تعليق على هذه الأسطر التي تقوم بفتح مربع حواري لاختيار الملف منها

'    Set FD = Application.FileDialog(msoFileDialogOpen)
'    FD.Show
'    If FD.SelectedItems.Count <> 0 Then
'        FName = FD.SelectedItems(1)
'        Else
'        Exit Sub
'    End If

وضع هذا السطر .. قبلها أو بعدها (مش هتفرق)

FName = Sheet2.Range("A1").Value

 

ممكن ترفق ملف الورد المستخدم في مثالك للإطلاع عليه والاستفادة منه

تقبل تحياتي

قام بنشر

الحمد لله أن تم المطلوب على خير ..

وإن كان ع الحشيش ، فأنا عندي للأسف مفيش .. ممكن نستعين بأحد الأصدقاء من كفور بلشاي (مش عارف هو ظهر فجأة واختفى تاني ليه)

 

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information