المشاركات : 101
المواضيع 31
الإنتساب : Oct 2012
السمعة :
0
الشكر: 0
تم شكره 1 مرات في 1 مشاركات
برنامجي ينقل البيانات من الفيجول بيسك الى الاكسل ولكن احيانا عندما اقوم بنقل البيانات
مثلا لو كانت عندي شهادة لطالب معين وتصميم هذه الشهادة كصفحة واحده فقط
ولكن احيانا عندما انقر على زر الامر الذي يقوم بكتابة معدلات الطالب على الشهادة ينفذ الامر لكن عند فتح الشهادة اجد ان بعض الاعمدة فيها ممتد وهذا يؤدي الى جعل الشهادة على صفحتين
كيف استطيع تثبيت عرض العمود برمجيا او من خلال الاكسل يكون افضل
المشاركات : 607
المواضيع 17
الإنتساب : Sep 2013
السمعة :
39
الشكر: 788
تم شكره 579 مرات في 160 مشاركات
ممكن تعرض لنا كود نقل البيانات ؟
(وَقُل رَّبِّ زِدْنِي عِلْمًا)
المشاركات : 101
المواضيع 31
الإنتساب : Oct 2012
السمعة :
0
الشكر: 0
تم شكره 1 مرات في 1 مشاركات
الكود طويل لكن هذا جزء منه
If (from = 2) Then
.Range(cell2).Font.Size = 12
.Range(cell3).Font.Size = 12
If (num >= 11 And (course = 8 Or course = 7)) Then
.Range(cell2).Value = result(sec_avg)
.Range(cell3).Value = result(tot_avg)
Else
.Range(cell2).Value = s_avg
.Range(cell3).Value = t_avg
End If
' .Range(cell3).Cells
End If
في جملة كتبتها وهي
.Cells(, "H").EntireColumn.ColumnWidth = 9.14
ولكن شكلها ما بتاثر كثير وكمان المشكلو انو صعب كل ما بدي اكتب في عمود بدي اكتب هاي الجملة
المشاركات : 506
المواضيع 39
الإنتساب : Sep 2013
السمعة :
14
الشكر: 715
تم شكره 578 مرات في 220 مشاركات
أخي الكريم, من أين تنقل البيانات؟ هل من الـ (DataGridView) أم من قاعدة البيانات مباشرة أم من (Textbox)؟
المشاركات : 101
المواضيع 31
الإنتساب : Oct 2012
السمعة :
0
الشكر: 0
تم شكره 1 مرات في 1 مشاركات
البيانات احضرها من قاعدة البيانات وارسلها مباشرة الى الاكسل سؤال هل الجملة الاخيرة .Cells.Columns.AutoFit() تؤثر على عرض العمود اللي انا واضعوه
المشاركات : 506
المواضيع 39
الإنتساب : Sep 2013
السمعة :
14
الشكر: 715
تم شكره 578 مرات في 220 مشاركات
السلام عليكم,
نعم إنها تؤثر على عرض العمود الذي وضعته, حيث إنها تقوم بتغيير عرض العمود اوتوماتيكيا.
جرب الكود و أعطني النتيجة.
تحياتي