أكاديمية الصقر للتدريب

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
أحمد يوسف ali mohamed ali-- لا تميز خلال هذه الفترة YasserKhalil كود بسيط لمعرفة معلومات مهمه عن جهازك - حسام خطاب اكسيل اسئله واجابات


اعلان هنا
ألعاب فلاش أون لاين
أعلن هنا
أعلن هنا
صفحتنا على الفيس بوك
أعلن هنا



أهلا وسهلا بك زائرنا الكريم في أكاديمية الصقر للتدريب، لكي تتمكن من المشاركة ومشاهدة جميع أقسام المنتدى وكافة الميزات ، يجب عليك إنشاء حساب جديد بالتسجيل بالضغط هنا أو تسجيل الدخول اضغط هنا إذا كنت عضواً .





طلب عمل كود ترحيل حسب الاسم والتاريخ

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



02-11-2019 06:46 مساء
الرحال
menu_open
عضو
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 01-11-2019
رقم العضوية : 15642
المشاركات : 11
الجنس : ذكر
تاريخ الميلاد : 1-1-1980
يتابعهم : 1
يتابعونه : 0
قوة السمعة : 18
الاعجاب : 4
 offline 

لسلام عليكم ورحمة الله وبركاته ارجو المساعدة في اضافة كود ترحيل حسب اسم الصفحة وحسب التاريخ في الشيت الذي يخصه وبارك الله فيكم
 
 
  الاحصائية لعمل النوبات.xlsm   تحميل xlsm مرات التحميل :(11)
الحجم :(98.03) KB







02-11-2019 08:04 مساء
مشاهدة مشاركة منفردة [1]
salim
menu_open
خبير معتمد
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 43
المشاركات : 430
الجنس : ذكر
تاريخ الميلاد : 1-5-1989
الدعوات : 1
يتابعهم : 13
يتابعونه : 17
قوة السمعة : 3401
الاعجاب : 294
 offline 
look/images/icons/i1.gif طلب عمل كود ترحيل حسب الاسم والتاريخ
 في الخلية A10 هذه المعادلة واسحب يميناً 7 أعمدة و نزولاً قدر ما تشاء

=INDIRECT("'نوبة" &" "&$C$2&"'!"&CHAR(64+COLUMNS($A$1:A1))&ROWS($A$1:A5))

الملف مرفق
 
 
 
  EHSAA3.xlsm   تحميل xlsm مرات التحميل :(6)
الحجم :(105.66) KB


أثارت هذه المشاركة إعجاب: محمد الدسوقى، ali mohamed ali،




02-11-2019 08:25 مساء
مشاهدة مشاركة منفردة [2]
الرحال
menu_open
عضو
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 01-11-2019
رقم العضوية : 15642
المشاركات : 11
الجنس : ذكر
تاريخ الميلاد : 1-1-1980
يتابعهم : 1
يتابعونه : 0
قوة السمعة : 18
الاعجاب : 4
 offline 
look/images/icons/i1.gif طلب عمل كود ترحيل حسب الاسم والتاريخ
الله يعطيك العافية 

هذا كود بحث 

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

يعني نقل البيانات من الصفحة الرئيسية الى الصفحات المحددة 

واشكرك على تفاعلك معي ورزقك الله في الدنيا والاخرة 
 

أثارت هذه المشاركة إعجاب: محمد الدسوقى،




02-11-2019 08:58 مساء
مشاهدة مشاركة منفردة [3]
salim
menu_open
خبير معتمد
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 43
المشاركات : 430
الجنس : ذكر
تاريخ الميلاد : 1-5-1989
الدعوات : 1
يتابعهم : 13
يتابعونه : 17
قوة السمعة : 3401
الاعجاب : 294
 offline 
look/images/icons/i1.gif طلب عمل كود ترحيل حسب الاسم والتاريخ
جرب هذا الكود  (يمكنك كتابة ما تشاء في الجدول وليس بالضروري سطر واحد)

Option Explicit

Sub transfer_data()
Dim Source_sh As Worksheet
Dim Target_sh As Worksheet
Dim last_ro%, N_ro%
Set Source_sh = Sheets("ورقة1")
last_ro = Source_sh.Cells(Rows.Count, 3).End(3).Row
If last_ro < 10 Then Exit Sub
Select Case Source_sh.Range("c2")
  Case "أ": Set Target_sh = Sheets("نوبة أ")
  Case "ب": Set Target_sh = Sheets("نوبة ب")
  Case "ج": Set Target_sh = Sheets("نوبة ج")
  Case "د": Set Target_sh = Sheets("نوبة د")
  Case "ه": Set Target_sh = Sheets("نوبة ه")
  Case "و": Set Target_sh = Sheets("نوبة و")
End Select

 N_ro = Target_sh.Cells(Rows.Count, 1).End(3).Row + 1
 Target_sh.Range("a" & N_ro).Resize(last_ro - 9, 6).Value = _
 Source_sh.Range("B10").Resize(last_ro - 9, 6).Value

End Sub


الملف مرفق

 
 
 
  EHSAA3_1.rar   تحميل rar مرات التحميل :(16)
الحجم :(79.32) KB


أثارت هذه المشاركة إعجاب: محمد الدسوقى، ali mohamed ali، الرحال،




02-11-2019 08:58 مساء
مشاهدة مشاركة منفردة [4]
ابراهيم الحداد
menu_open
خبير
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 26-08-2017
رقم العضوية : 163
المشاركات : 153
الجنس : ذكر
الدعوات : 1
يتابعهم : 0
يتابعونه : 26
قوة السمعة : 1300
الاعجاب : 33
 offline 
look/images/icons/i1.gif طلب عمل كود ترحيل حسب الاسم والتاريخ
السلام عليكم ورحمة الله
استخدم هذا الكود
Sub SelSheet()
Dim ws As Worksheet, Sh As Worksheet
Dim ShNam As String, C As Range, Dat As String
Set ws = Sheets("ورقة1")
ShNam = ws.Range("C2")
Dat = ws.Range("B10")
Set Sh = Sheets("نوبة" & " " & ShNam)
ws.Range("B10:F10").Copy
For Each C In Sh.Range("B4:B1000")
Sh.Activate
If C.Value = Dat Then
C.PasteSpecial xlPasteValues
End If
Exit For
Next
Application.CutCopyMode = False

End Sub

أثارت هذه المشاركة إعجاب: محمد الدسوقى، YasserKhalil، الرحال،




02-11-2019 11:44 مساء
مشاهدة مشاركة منفردة [5]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8167
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 428
قوة السمعة : 23793
الاعجاب : 2466
 offline 
look/images/icons/i1.gif طلب عمل كود ترحيل حسب الاسم والتاريخ
بارك الله فيكم إخواني وجزيتم خيراً على الحلول الرائعة

لإثراء الموضوع هذا حل آخر

لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب

أثارت هذه المشاركة إعجاب: ali mohamed ali، ashraf_hertlion،




02-11-2019 11:59 مساء
مشاهدة مشاركة منفردة [6]
الرحال
menu_open
عضو
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 01-11-2019
رقم العضوية : 15642
المشاركات : 11
الجنس : ذكر
تاريخ الميلاد : 1-1-1980
يتابعهم : 1
يتابعونه : 0
قوة السمعة : 18
الاعجاب : 4
 offline 
look/images/icons/i1.gif طلب عمل كود ترحيل حسب الاسم والتاريخ
جزاك الله خير على تفاعلكم ورزقكم من حيث لا تحتسبون 

أثارت هذه المشاركة إعجاب: YasserKhalil،




03-11-2019 12:38 صباحا
مشاهدة مشاركة منفردة [7]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8167
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 428
قوة السمعة : 23793
الاعجاب : 2466
 offline 
look/images/icons/i1.gif طلب عمل كود ترحيل حسب الاسم والتاريخ
وجزيت خيراً أخي الكريم الرحال

أما آن للرحال أن يستقر في المنتدى ويكف عن الترحال ؟! smile

الحمد لله أن تم المطلوب على خير والحمد لله الذي بنعمته تتم الصالحات

أثارت هذه المشاركة إعجاب: الرحال،




03-11-2019 11:31 صباحا
مشاهدة مشاركة منفردة [8]
الرحال
menu_open
عضو
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 01-11-2019
رقم العضوية : 15642
المشاركات : 11
الجنس : ذكر
تاريخ الميلاد : 1-1-1980
يتابعهم : 1
يتابعونه : 0
قوة السمعة : 18
الاعجاب : 4
 offline 
look/images/icons/i1.gif طلب عمل كود ترحيل حسب الاسم والتاريخ
السلام عليكم ورحمة الله وبركاته 

الرابط يحولني لموقع يظهر الكمبيوتر انه في فايرس تم فتح ولكن يوجد رموز كثيرة جداً 
ياليت ترفع على موقع اخر 





03-11-2019 01:14 مساء
مشاهدة مشاركة منفردة [9]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8167
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 428
قوة السمعة : 23793
الاعجاب : 2466
 offline 
look/images/icons/i1.gif طلب عمل كود ترحيل حسب الاسم والتاريخ
وعليكم السلام أخي الكريم
إليك الرابط المباشر
لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب

أثارت هذه المشاركة إعجاب: الرحال، hassona229،




03-11-2019 05:15 مساء
مشاهدة مشاركة منفردة [10]
الرحال
menu_open
عضو
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 01-11-2019
رقم العضوية : 15642
المشاركات : 11
الجنس : ذكر
تاريخ الميلاد : 1-1-1980
يتابعهم : 1
يتابعونه : 0
قوة السمعة : 18
الاعجاب : 4
 offline 
look/images/icons/i1.gif طلب عمل كود ترحيل حسب الاسم والتاريخ
السلام عليكم ورحمة الله وبركاته 

اشكرك اخي على مجهوداتك 

حصلت الكود وحاولت احطه مودل بس رفض 
ياليت اذا مافيها ازعاج لحضرتك تربط مع الملف لاني جديد في عالم الاكسل 

وجزاك الله كل خير 





03-11-2019 06:59 مساء
مشاهدة مشاركة منفردة [11]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8167
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 428
قوة السمعة : 23793
الاعجاب : 2466
 offline 
look/images/icons/i1.gif طلب عمل كود ترحيل حسب الاسم والتاريخ
أخي الكريم
لا أفهم ماذا فعلت وكيف رفض .......!!
من المفترض أن الأمر بغاية البساطة

تفتح الملف الخاص بك
تضغط Alt+ F11 للدخول لمحرر الأكواد
من قائمة Insert اختر Module
وضع الكود ...

لتنفيذ الكود من ورقة العمل اضغط Alt + F8 واختر اسم الكود وانقر Run

عموماً إليك الملف المرفق 

وإليك رابط فيديو هام جداً للتعامل مع البدايات
لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
 
 
  الاحصائية لعمل النوبات.xlsm   تحميل xlsm مرات التحميل :(8)
الحجم :(103.926) KB


أثارت هذه المشاركة إعجاب: الرحال،




03-11-2019 10:49 مساء
مشاهدة مشاركة منفردة [12]
الرحال
menu_open
عضو
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 01-11-2019
رقم العضوية : 15642
المشاركات : 11
الجنس : ذكر
تاريخ الميلاد : 1-1-1980
يتابعهم : 1
يتابعونه : 0
قوة السمعة : 18
الاعجاب : 4
 offline 
look/images/icons/i1.gif طلب عمل كود ترحيل حسب الاسم والتاريخ

ما اقول الا الله يرزقك من حيث لا تحتسب ويعطيك حتى يرضيك 

انت عملت الي انا ابيه بالضبط 

شكراً  

أثارت هذه المشاركة إعجاب: YasserKhalil، ashraf_hertlion،





المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
ترحيل الرقم حسب عدد مراتبه اسامة محمد
12 193 YasserKhalil
الترحيل المبعثر حسب اسم الصفحه عبدالرحمن صبحى
19 483 محمود ابو الدهب
كيفية عمل تصفية للبيانات حسب قيمة خلية أو ترحيل البيانات حسب قيمة الخلية Hatem Eissa
26 4546 morestudy
ترحيل الفواتير حسب اسم الشهر ali mohamed ali
17 1203 ali mohamed ali
ترحيل بيانات بحسب المدة ashraf.hassane9
3 320 ashraf.hassane9

الكلمات الدلالية
ترحيل ، الاسم ، والتاريخ ،


 







اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.



الساعة الآن 10:23 صباحا

أعلن هنا
أعلن هنا
أعلن هنا