المساعدة فى كود تسلسل ارقام

وليد المصرى 1 · نوفمبر 28, 2012

السلام عليكم

المطلوب داخل الملف المرفق وهو كود لتسلسل ارقام

اشكركم

**أبو حنــــين** · نوفمبر 28, 2012

استعمل هذا الكود


Sub Printe()

ورقة1.PrintPreview

For s = 1 To 10

Cells(s, 1) = Cells(10, 1) + s

Next

End Sub

وليد المصرى 1 · نوفمبر 28, 2012

اشكرك يا اخى ولكن انا اريد تسلسل ارقام وليس PRINT PREVIEW

وليد المصرى 1 · فبراير 3, 2013

للرفع

**جمال عبد السميع** · فبراير 3, 2013

جرب أخى المرفق لعله المطلوب

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