اذهب الي المحتوي
أوفيسنا

أبو وليد

03 عضو مميز
  • Posts

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

  • تاريخ اخر زياره

مشاركات المكتوبه بواسطه أبو وليد

  1. فكرة الجدول المؤقت رائعه

    سويت عمود أخر في الاستعلام مع تغيير الكود وإضافة في الكود

    Option Compare Database
    
    Public Rowclose As Double
    Public RowEMA As Double
    
    
    
    
    
    Function Add_3(T, N)
        
        'T = ticker
        'N = close
    
    
       
        
        If T = 0 Then
            
            Add_3 = N
    
        Else
            Add_3 = N * (2 / (5 + 1)) + (1 - (2 / (5 + 1))) * Rowclose
            
        'Else
          '  Add_3 = Rowclose_1 + Rowclose_2 + Rowclose_3
                
        End If
        
        Rowclose = Add_3
    End Function
    
    Function EMA_2(T1, S)
        
        'T = ticker
        'N = close
    
    
       
        
        If T1 = 0 Then
            
            EMA_2 = S
    
        Else
            EMA_2 = S * (2 / (5 + 1)) + (1 - (2 / (5 + 1))) * RowEMA
            
        'Else
          '  Add_3 = Rowclose_1 + Rowclose_2 + Rowclose_3
                
        End If
        
        RowEMA = EMA_2
    End Function

    المشكله عند عمل الكود الاول فقط يعطي نتيجة 100%

    لمن أضيف عمود أخر يعطي نتيجة خطأ في العمود الجديد والعمود السابق

     

    تحملني يااستاذي الفاضل

  2. في ‏٢٥‏/‏٠٤‏/‏١٤٣٧ at 14:34, jjafferr said:

    شكرا :rol:

     

    جرب هذا الكود بدل السابق :

    
    
    Public RowID As Integer
    Public RowVal As Double
    
    
    Function Add_5(N)
        
        'N = vol
    
    '    If Len(RowID & "") = 0 Or RowID = 0 Then
            RowID = RowID + 1
    '    End If
        
        If RowID = 1 Then
            Add_5 = N
            
        Else
            'Add_5 = N + RowVal + 5
            Add_5 = RowVal + 5
            
        End If
        
        RowVal = Add_5
        
    End Function
    
    

     

     

    جعفر

    استاذي

    الكود رائع ومفيد جدا

    ولكن به مشله لا أعلم هل هي من الكود ام ماذا

    عند فتح الاستعلام وتحريك عجلة الماوس تتغير النتائج

  3. بارك الله فيك

    ونفع بك رائع أنت لا تقدم حلوم بل معلومات للأبد

    استفدت كثيرا ووضعت لي حلول لأشياء الغيت عملها لعدم وصولي لحلها

     

    بما أن تكلمت عن السرعة لدي استفسار

    لدي ملف كبير به تقريبا

    541906 كل يوم يضاف له 173 سجل

    هذه السجلات لعدد 173 شركه

    عملت استعلام في عملية sum

    لبعض الاعمدة المضافة للاستعلام حسابيا

    طبعا عملية sum لمجموعة من تلك السجلات

    الاستعلام يستغرق وقت طويل جدا ما ادري هل السبب كثرة السجلات أم ماذا

     

    بارك الله فيك

  4. بارك الله فيك

    أي خليه فيهم وكيف يتم ذالك

    6 دقائق مضت, أبو وليد said:

    بارك الله فيك

    أي خليه فيهم وكيف يتم ذالك

    الجمع التراكمي لكل السجلات

    ما اريده مثل الجدول يبدا من ثالث سجل ثم يتحرك سجل واحد

    كما هو واضح في الجدول والمرفق

     

    وفقك الله

×
×
  • اضف...

Important Information