[عمر سالم]

(01-02-17, 11:25 PM)sendbad100 كتب : جرب هذا

كود :

Dim i As Double

For i = 1 To MF.Rows - 1
i = Val(MF.TextMatrix(i, 2))
Next
 MsgBox i

الكود هذا يزيد رقم واحد في اول خليه من العمود
اي العمود فيه خليه فيها الرقم 6 يظهرلي 7
ولا يجمع الخلية اللي بعدها