اريد كود يقوم بعمل بوردر للخلايا

[إبراهيم ابوليله]

ارجو المساعده

بكود يقوم بعمل بوردر للخلاياborder.rar

[أبو حنــــين]

جرب هذ ا

Private Sub CommandButton1_Click()

    Range("b2").Borders.LineStyle = xlContinuous

End Sub

Private Sub CommandButton1_Click()

    Range("b4").Borders.LineStyle = xlEdgeBottom

End Sub

[طارق محمود]

السلام عليكم

أخي العزيز

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

تفضل المرفق

border.rar

[طارق محمود]

عفوا أخي العزيز أبوحنين

لم أر ردك إلا بعد أن وضعت ردي

[أبو حنــــين]

السلام عليكم : / أخي طارق

الحمد لله على هذه الهفوة التي جلعت الاستاذ طارق يعقب على مشاركتي

هذا التعقيب الذي دوما أستأنس به

[إبراهيم ابوليله]

الاخ ابو حنين

الاخ طارق

بارك الله فيكم

وفعلا هذا ماكنت اريده

وكود الاخ طارق لا يخرخ الا من استاذ كبير

بارك الله فيكما وجعلكما نافعين بعلمكما