تعلم واقرأ وارتقِ
[img]فورم اضافة وتعديل وحذف وحفظ الملف - صفحة 3 Uoou910[/img]

تعلم واقرأ وارتقِ


 
الرئيسيةالبوابةالتسجيلدخول
غفرانك ربنا واليك المصير
رب زدني علما
سجل بالمنتدى ليظهر لك باقى المواضيع المهمه
سبحانك لا علم لنا إلا ما علمتنا أنك أنت العليم
علم اولادك برياض الأطفال والصفوف الأولى من التعليم الابتدائى
مجدى يونس ببورسعيد
أهلا بك من جديد يا زائر آخر زيارة لك كانت في
آخر عضو مسجل setr فمرحبا به

عزيزى زائر المنتدى مرحبا بك نرجو التسجيل حتى تشاهد باقى الصفحات المختفية بها المواضيع المهمة

 

 فورم اضافة وتعديل وحذف وحفظ الملف

اذهب الى الأسفل 
انتقل الى الصفحة : الصفحة السابقة  1, 2, 3
كاتب الموضوعرسالة
مجدى يونس
Admin
مجدى يونس

عدد المساهمات : 1381
تاريخ التسجيل : 17/05/2012
الموقع : محافظة بورسعيد

فورم اضافة وتعديل وحذف وحفظ الملف - صفحة 3 Empty
مُساهمةموضوع: فورم اضافة وتعديل وحذف وحفظ الملف   فورم اضافة وتعديل وحذف وحفظ الملف - صفحة 3 Icon_minitimeالإثنين سبتمبر 16, 2019 8:12 pm

تذكير بمساهمة فاتح الموضوع :

فورم اضافة وتعديل وحذف وحفظ الملف


الفيديو



لتحميل الملف ضع رد لظهور الرابط




كود لم اشرحة بالفيديو



الكود:
Sub Refresh_Data()

Dim sh As Worksheet
Set sh = ThisWorkbook.Sheets("Database")

Dim Last_Row As Long
Last_Row = Application.WorksheetFunction.CountA(sh.Range("A:A"))

sh.Range("F:F").NumberFormat = "D-MMM-YY HH:MM:SS AM/PM"

With Me.ListBox1
   
    .ColumnHeads = True
    .ColumnCount = 6
    .ColumnWidths = "60,100,90,80,60,130"
   
    If Last_Row = 1 Then
        .RowSource = "Database!A2:F2"
    Else
        .RowSource = "Database!A2:F" & Last_Row
    End If
     

End With


End Sub


_________________
لا تعطيني سمكة ... و لكن علمني كيف أصطاد السمك
من أحب الله رأى كل شئ جميلا
مع تحياتى مجدى يونس


عدل سابقا من قبل مجدى يونس في الأحد أكتوبر 27, 2019 7:20 am عدل 2 مرات
الرجوع الى أعلى الصفحة اذهب الى الأسفل
http://magdiyonis1.forumegypt.net متصل

كاتب الموضوعرسالة
مجدى يونس
Admin


عدد المساهمات : 1381
تاريخ التسجيل : 17/05/2012

فورم اضافة وتعديل وحذف وحفظ الملف - صفحة 3 Empty
مُساهمةموضوع: رد: فورم اضافة وتعديل وحذف وحفظ الملف   فورم اضافة وتعديل وحذف وحفظ الملف - صفحة 3 Icon_minitimeالثلاثاء فبراير 11, 2020 5:01 pm

العفو اى خدمة
الرجوع الى أعلى الصفحة اذهب الى الأسفل
http://magdiyonis1.forumegypt.net متصل
moyam9962



عدد المساهمات : 9
تاريخ التسجيل : 04/02/2020

فورم اضافة وتعديل وحذف وحفظ الملف - صفحة 3 Empty
مُساهمةموضوع: رد: فورم اضافة وتعديل وحذف وحفظ الملف   فورم اضافة وتعديل وحذف وحفظ الملف - صفحة 3 Icon_minitimeالخميس مارس 12, 2020 3:41 am

شكرا الله يخليك
الرجوع الى أعلى الصفحة اذهب الى الأسفل
مجدى يونس
Admin
مجدى يونس

عدد المساهمات : 1381
تاريخ التسجيل : 17/05/2012
الموقع : محافظة بورسعيد

فورم اضافة وتعديل وحذف وحفظ الملف - صفحة 3 Empty
مُساهمةموضوع: رد: فورم اضافة وتعديل وحذف وحفظ الملف   فورم اضافة وتعديل وحذف وحفظ الملف - صفحة 3 Icon_minitimeالأربعاء مارس 25, 2020 2:03 pm

شكرا لك

_________________
لا تعطيني سمكة ... و لكن علمني كيف أصطاد السمك
من أحب الله رأى كل شئ جميلا
مع تحياتى مجدى يونس
الرجوع الى أعلى الصفحة اذهب الى الأسفل
http://magdiyonis1.forumegypt.net متصل
نورالدين بوكرو



عدد المساهمات : 2
تاريخ التسجيل : 16/06/2019

فورم اضافة وتعديل وحذف وحفظ الملف - صفحة 3 Empty
مُساهمةموضوع: رد: فورم اضافة وتعديل وحذف وحفظ الملف   فورم اضافة وتعديل وحذف وحفظ الملف - صفحة 3 Icon_minitimeالإثنين أبريل 06, 2020 5:24 am

بوركت أستاذ مجدي ، جزاك الله عنا كل خير
الرجوع الى أعلى الصفحة اذهب الى الأسفل
مجدى يونس
Admin
مجدى يونس

عدد المساهمات : 1381
تاريخ التسجيل : 17/05/2012
الموقع : محافظة بورسعيد

فورم اضافة وتعديل وحذف وحفظ الملف - صفحة 3 Empty
مُساهمةموضوع: رد: فورم اضافة وتعديل وحذف وحفظ الملف   فورم اضافة وتعديل وحذف وحفظ الملف - صفحة 3 Icon_minitimeأمس في 5:47 am

شكرا لك

_________________
لا تعطيني سمكة ... و لكن علمني كيف أصطاد السمك
من أحب الله رأى كل شئ جميلا
مع تحياتى مجدى يونس
الرجوع الى أعلى الصفحة اذهب الى الأسفل
http://magdiyonis1.forumegypt.net متصل
 
فورم اضافة وتعديل وحذف وحفظ الملف
الرجوع الى أعلى الصفحة 
صفحة 3 من اصل 3انتقل الى الصفحة : الصفحة السابقة  1, 2, 3

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
تعلم واقرأ وارتقِ :: تعلم الاكسل-
انتقل الى: