عذراً السؤالين السابقين لم يتم ترتيبهم :
السؤال الأول : Private Const MyRng_MyDate As String = "A2:AA1000"
مالمقصود ب 1000
السؤال الثاني : عند الضغط على إضافة التقرير تظهر لي النتيجه في العامود B كيف اجعلها تبدأ من A بنفس الكود
السؤال الثالث : مالمقصود ب 24
MyTop = MyTop + 24
Next
'========================
With Me
If Num <= Mycount Then
.Height = 60 + (24 * Num)
.Frame1.Height = (24 * Num)
Else
.Height = 60 + (24 * Mycount)
.Frame1.Height = (24 * Mycount)
.Frame1.ScrollBars = 2
.Frame1.ScrollHeight = (Num) * 24
السؤال الرابع : كيف اسوي تجميد لصف العنوان بالنتيجه
ياليت تجاوبني عليها أستاذي
كل الشكر