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

التوزيع العشوائي


إذهب إلى أفضل إجابة Solved by أ / محمد صالح,

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

  • أفضل إجابة

يمكنك تحويل المعادلة الي كود 

مثلا لو أردنا تحويل العمود D نستعمل هذا الاجراء مع ربطه بزر 

مع حفظ الملف بصيفة تدعم الاكواد مثل xlsb

Sub mrmas()
Range("d2:d101").Formula = "=rand()"
Range("d2:d101").Value = Range("d2:d101").Value
End Sub

بالتوفيق 

  • Like 3
  • Thanks 1
رابط هذا التعليق
شارك

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

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

Important Information