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

أ / محمد صالح

أوفيسنا
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    4486

  • تاريخ الانضمام

  • Days Won

    198

 نوع المحتوي 

كل منشورات العضو أ / محمد صالح

  1. أ / محمد صالح
    لم أنتبه لطر مكتوب في المنشور الأول وهو يعني البرنامج في البداية معمول على أوفيس 2003 فكيف يعطي خطأ عند تشغيله في 2003 الطبيعي يعطي خطأ عندما يتم التصميم على 2007 ويتم التشغيل على 2003 رجاء توضيح المشكلة بمنتهى التفصيل طالما أنه لم تصل طريقة أستاذنا سليم للمطلوب أو إرفاق الملف
  2. أ / محمد صالح
    طالما أنه يتم التصدير فوق السابق يبدو أنك لم تقم بتغيير سطر اسم الملف للسطر المذكور في المشاركة السابقة بهذا الخصوص حيث أن الاسم يختلف كل ثانية ولا أعتقد أنك تقوم بالتصدير مرتين في الثانية!!
  3. أ / محمد صالح
    ياريت تصور نص الرسالة قبل الدخول لشاشة الفيجوال بيزك مثل هذه
  4. أ / محمد صالح
    ممكن رسالة الخطأ التي تظهر قبل الدخول لشاشة الكود تساعدنا مثل هذه
  5. أ / محمد صالح
    يفضل ارفاق الملف او مثال منه للعمل عليه
  6. أ / محمد صالح
    بالتوفيق إن شاء الله لهذا الغرض بالذات يحتوي الكود على اسم ملف الصورة في متغير fname وأفضل حل برمجي يقوم به المحترفون لهذا الغرض هو تسمية الملف باسم الشيت ثم تاريخ ووقت التصدير بالساعة والدقيقة والثانية فيجب تغيير سطر اسم الملف fname = ActiveSheet.Name & "." & Format(Now, "yyyymmdd.hhnnss") جرب وأجبرني بالنتيجة
  7. أ / محمد صالح
    لم اقم بتحميل الملف إلا الآن وعمل بصورة جيدة ولا يوجد أي خطأ لأن الكود متوافق مع 2003 وما بعدها
  8. أ / محمد صالح
    لا يوجد أي مشكلة عندي بعد حفظ الملف بتنسيق ٩٧ - ٢٠٠٣
  9. أ / محمد صالح
    يمكنك وضع هذا الكود في حدث عند التغيير في الشيت المطلوب Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then lr = Range("g" & Rows().Count).End(xlUp).Row For n = 3 To lr If Range("g" & n).Value = [a1] Then Range("g" & n).Select Exit Sub End If Next End If End Sub
  10. أ / محمد صالح
    شكرا لمروركم الكريم أحبابي في الله كل عام وانتم بخير وسعادة وراحة بال رمضان مبارك
  11. أ / محمد صالح
    يمكنك تسجيل ماكرو لتسيق الخلية المطلوبة بالتنسيق المطلوب وفي كل مرة يتم اللصق تقوم باستدعاء الماكرو
  12. أ / محمد صالح
    المطلوب غير واضح كيف يتم الربط؟ كيف يتم النسخ؟
  13. أ / محمد صالح
    ينقص شرطة خلفية قبل اسم الملف objChart.Export ("C:\Users\4\Desktop\saes\" & saes & ".jpg")
  14. أ / محمد صالح
    يوجد في نهاية المسار اسم الملف والامتداد & Fname & ".Jpg"
  15. أ / محمد صالح
    أكيد ممكن فقط يلزمك تعديل السطر الخاص بمسار التصدير الذي به Thisworkbook.path وتعني مسار المصنف الحالي غيرها لأي مسار ثابت تريده
  16. أ / محمد صالح
    والأروع منه كلماتك الرقيقة كل عام وانتم بخير وسعادة ورضا
  17. أ / محمد صالح
    كان مجرد اقتراح ولكن بعد التجربة لم يفلح وتم التوصل لهذا الكود تفضل export range to jpg.rar
  18. أ / محمد صالح
    أعتقد أن الأمر الخاص بالقوائم موجود لدعم النسخ السابقة ٢٠٠٣ وما قبلها والأفضل والأقصر هو الأمر الأول وجزاك الله كل خير أستاذ عبد الفتاح على كل ما تقدمه من معلومات نافعة كل عام والجميع بخير وسعادة ورضا
  19. أ / محمد صالح
    شكرا لمروركم الكريم أحبابي في الله كل عام وانتم بخير وسعادة ورضا
  20. أ / محمد صالح
    تفضل اخي الكريم https://www.visualstudio.com/vs/visual-studio-express/
  21. أ / محمد صالح
    وإياكم أستاذ عماد وفقنا الله جميعا للخير
  22. أ / محمد صالح
    ممكن تسجل ماكرو لنسخ نطاق ولصقه كصورة ثم حفظ الصورة باسم وحفظها في المسار الذي تريد ثم تعديل الكود
  23. أ / محمد صالح
    إضافة هذه النصوص لن تغير من المعادلة فستحتاج عمود آخر للنسبة وكذلك مضمون النصوص واضح في الأعمدة والمعادلات ربما يمكن استعمالها في عمود خاص بالملاحظات
  24. أ / محمد صالح
    لا أعتقد أنه يوجد كود يتحكم في هذا الأمر
  25. أ / محمد صالح
    File > Options > Trust Center > Trust Center Settings > Privacy Options > Remove personal information from file properties on save > OK.
×
×
  • اضف...

Important Information

  I accept