اذهب الي المحتوي
أوفيسنا

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

قام بنشر

السلام عليكم

لدي ورقة Horaire2027    اريد ترحيل البيانات الى ورقة Feuil1 و  Feuil12 و Feuil13

 

            1- ترحيل البيانات الى الورقة Feuil1 الحقول بالون الأزرق لا تفرغ الحقول عند الترحيل 

            2-ترحيل البيانات الى الورقة Feuil12 الحقول بالون الأصفر وعند الترحيل تفرغ الحقول

            3-ترحيل البيانات الى الورقة Feuil13 الحقول بالون الأحمر وعند الترحيل تفرغ الحقول

 

Horaire-18-06-2026-(04.12.06).xlsb

قام بنشر

استاذ 

ترحيل البيانات الى الورقة Feuil1 الحقول بالون الأزرق لا تفرغ الحقول عند الترحيل 

ترحيل البيانات الى الورقة Feuil12 الحقول بالون الأصفر وعند الترحيل تفرغ الحقول

تكون بأيقونة 

وترحيل البيانات الى الورقة Feuil13 الحقول بالون الأحمر وعند الترحيل تفرغ الحقول

تكون بأيقونة

والحقول الفارغ لم يتم ترحيل

قام بنشر

وعليكم السلام ورحمة الله وبركاته

 استاذنا الفاضل

طلبك واضح ولكن  ملفك المرفق لا يتوافق مع طلبك

الطلب الثاني والثالت في شيت Horaire2027 عدد الخلايا 8 وفي الشيتين المرحل اليها 9 خلايا

وخود كلمة المؤسسة في الشيتين Feuil12 وFeuil13 وعدم وجودها في شيت Horaire2027

على كل حال  الكود المرفق تم عمله حسب الموجود في شيت Horaire2027  وهي 8 خلايا

حسب الشيت المرفق تم تقسيم الكود الى جزئين بزرين  الاول للترحيل الى Feuil1 وFeuil12 والكود الثاني الى وFeuil13

Horaire-18-06-2026-(04.12.06).xlsb

  • Like 1
قام بنشر

السلام عليكم 

استاذ لقد قمت بإضافة حقل كلمة الموسسة في شيت Horaire2027 التي يتم ترحيل الى ورقة Feuil13 التي بالون الأحمر

 لقد نسيت الحقلين ولقد اضافة الحقلين 

استاذ اما شيت Feuil12  توجد كلمة المؤسسة في الشيت Horaire2027   بالون الازرق

استاذ  الحقول لي بالون الازرق لم يتم ترحيل البيانات انه يقوم بترحيل بالون الأخضر

استاذ ترحيل البيانات الى ورقة  Feuil1 لي بالحقول الازرق فقط مرة واحدة فقط .

بارك الله فيك

 

Horaire-18-06-2026-(04.12.06).xlsb

قام بنشر

وعليكم السلام ورحمة الله وبركاته

منذ ساعه, بلال بلال said:

استاذ ترحيل البيانات الى ورقة  Feuil1 لي بالحقول الازرق فقط مرة واحدة فقط .

 

اذا الامر لا يحتاج الى كود ترحيل يمكنك كتابة البيانات مباشرة في سيت Feuil1

ثم

منذ ساعه, بلال بلال said:

استاذ اما شيت Feuil12  توجد كلمة المؤسسة في الشيت     بالون الازرق

 

  شيت Feuil12   خاص باللون الاصفر وليس الازرق   كما ذكرت ولا وجود لكلمة المؤسسة في الخلايا الصفراء في شيت Horaire2027 

بالنسبة

منذ ساعه, بلال بلال said:

استاذ  الحقول لي بالون الازرق لم يتم ترحيل البيانات انه يقوم بترحيل بالون الأخضر

 نعم يوجد خطا في رقم الصف المرحل- فقط قم بتغيير  B3:I3 الى B4:I4 في مكانين بالكود حسب الموضح الاتي

      For Each cell In wsSource.Range("B3:I3, B6:I6, B9:I9")
الى
    For Each cell In wsSource.Range("B4:I4, B6:I6, B9:I9")

وكذلك تغيير 
wsFeuil1.Cells(nextRow1, 1).Resize(1, 8).Value = wsSource.Range("B3:I3").Value

الى
    wsFeuil1.Cells(nextRow1, 1).Resize(1, 8).Value = wsSource.Range("B4:I4").Value

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

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

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information