elhadi قام بنشر يناير 26, 2015 مشاركة قام بنشر يناير 26, 2015 لدي ملف و به عملية الترحيل حسب اسم الشيت اريد تغيير طريقة النقل بحيث تتم حسب عمر المريض ان كان اقل او يساوي 18 سنة في شيت الاطفال و ان كان اكبر من ذلك يتم الترحيل في شيت الكبار malade.rar رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر يناير 26, 2015 مشاركة قام بنشر يناير 26, 2015 أخي الفاضل يرجى التوضيح هناك ورقة عمل باسم ADULT وأخرى باسم ENFENT وأخرى باسم ورقة1 ..إلى أين تريد الترحيل ومن أين وعلى أساس أي عمود ؟؟ راعي أن البعض لا يجيد اللغة الإنجليزية أو الفرنسية !! وأحيانا العربية ههههه تقبل تحياتي رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر يناير 26, 2015 مشاركة قام بنشر يناير 26, 2015 بعد اذن أخى الحبيب ياسر خليل تفضل أخى جرب الكود التالى Sub ragab() Dim sh As String Application.ScreenUpdating = False On Error Resume Next '====================================================== For ii = 1 To Sheets.Count If Sheets(ii).Name <> "ورقة1" Then Sheets(ii).Range("A2:H1000").ClearContents End If Next '====================================================== For i = 2 To Cells(10000, "H").End(xlUp).Row sh = Cells(i, "H").Value T = Sheets(sh).Cells(10000, 2).End(xlUp).Row + 1 Range(Cells(i, "B"), Cells(i, "H")).Copy Sheets(sh).Range("B" & T).PasteSpecial xlPasteValues Sheets(sh).Range("A" & T) = T - 1 Application.CutCopyMode = False Next i '====================================================== Application.ScreenUpdating = True MsgBox "تم الترحيل بنجاح" End Sub malade.rar 2 رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر يناير 26, 2015 مشاركة قام بنشر يناير 26, 2015 أخي الحبيب الغاائب الحاضر ..جاري الغالي .. وأستاذي الكبير رجب بيه جاويش مفتقدين تواجدك بيننا .. لما كل هذه الغيبة الطويلة ..! المهم متهربش مني أنا عازم نفسي عندك لما أنزل البلد ... تقبل تحياتي 1 رابط هذا التعليق شارك More sharing options...
ا بو سليمان قام بنشر يناير 26, 2015 مشاركة قام بنشر يناير 26, 2015 أخي الحبيب الغاائب الحاضر ..جاري الغالي .. وأستاذي الكبير رجب بيه جاويش مفتقدين تواجدك بيننا .. لما كل هذه الغيبة الطويلة ..! المهم متهربش مني أنا عازم نفسي عندك لما أنزل البلد ... تقبل تحياتي انت عازم نفسك عند اخي رجب لما تنزل البلد ... وانا علي تكاليف العزززززززززززززززومة ايش رايك وراي اخينا رجب 2 رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر يناير 26, 2015 مشاركة قام بنشر يناير 26, 2015 بوركت أخي الحبيب أبو سليمان بس كدا الأستاذ رجب يزعل ..بلشاي أبو الكرم والشهامة والنبل (بس فيها عيب صغير مش هقول عليه) 1 رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر يناير 26, 2015 مشاركة قام بنشر يناير 26, 2015 أخى الفاضل / ياسر خليل تشرف وتنور بلشاى كلها ونفرشلك الأرض ( 000000 ) ولا خليها ورد وبلاش اللى انت عارفه أخى الفاضل / ابو سليمان شكرا جزيلا أخى الكريم على هذه المشاعر الطيبة ولكن تكرم أنت وأخى الفاضل ياسر على أرض بلشاى أولا وبعدين لينا زيارك عندك ان شاء الله 1 رابط هذا التعليق شارك More sharing options...
الحسامي قام بنشر يناير 27, 2015 مشاركة قام بنشر يناير 27, 2015 السلام عليكم احبائي ايه يا عم ياسر العزومة لناس وناس بس على العموم ملحوقة ----------------- وبعد اذن اخي رجب هنا كود اخر لاثراء الموضوع Dim SH As Worksheet Dim rng As Range, cell As Range Set rng = Range([E2], Cells([E10000].End(xlUp).Row, "E")) For Each cell In rng Set SH = Sheets(3) If cell.Value > 19 Then Set SH = Sheets(2) LR = SH.[B10000].End(xlUp).Row + 1 SH.Cells(LR, "B").Resize(1, 7).Value = cell.Offset(0, -3).Resize(1, 7).Value Next cell Range("B2:H" & [B10000].End(xlUp).Row).ClearContents 4 رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر يناير 27, 2015 مشاركة قام بنشر يناير 27, 2015 (معدل) أخي الحبيب أخي في الله أخي الغالي عماد الحسامي (شفت القافية دي : غالي وحسامي ).. والله الذي لا إله إلا هو .. والله الذي لا إله إلا هو .. والله الذي لا إله إلا هو ..أفتقدك بشدة ، ودائما ببالي ولم تغيب عن بالي ، وسألت عليك الأستاذ يحيى حسين ، وطمني عليك فينك يا حبيب !!؟؟؟!!!! ليه الغيبة الطويلة دي ... الحمد لله إني اطمنت عليك ..عايزينك معانا يا كبير ..مفتقدينك والله تقبل تحياتي وودي وأشواقي وحبي في الله تم تعديل يناير 27, 2015 بواسطه YasserKhalil 1 رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر يناير 27, 2015 مشاركة قام بنشر يناير 27, 2015 لقد تشرف الموضوع بمرور الأستاذ الكبير الحسامى نورت بيتك أستاذنا الكبير الحسامى ويا ريت ما تحرمناش من ابداعاتك المتجددة رابط هذا التعليق شارك More sharing options...
إبراهيم ابوليله قام بنشر يناير 27, 2015 مشاركة قام بنشر يناير 27, 2015 اخى رجب اخى الحسامى اكواد جميله الاجمل التنوع بارك الله فيكم تقبلو تحياتى رابط هذا التعليق شارك More sharing options...
الصـقر قام بنشر يناير 27, 2015 مشاركة قام بنشر يناير 27, 2015 استاذنا الكبير عماد الحسامى والله العظيم كنت اسعد الناس عند رئيتى لمشاركتك لدرجة انى لم اصدق نفسى ههههههههههههه وبصيت على تاريخ المشاركة وابص على تاريخ اليوم بالتقويم واقول ايوة فعلا دى مشاركة اليوم الحمد لله انك بخير وصحه وعافية وان شاء الله لا تحرمنا من ابداعتك كل اعمالك بالمنتدى حفظتها عندى وعملت منها مكتبة دى بالنسبة لى كنز تعلمت منه الكثير مشاركة حضرتك كانت الساعه 4 فجرا دى بشرا ان شاء الله انه يكون فجر جديد لحضرتك معنا ويشرق معها شمس العلم تقبل تحياتى وواحترامى وتقديرى وحبى فى الله اخوك / حسام عيسى رابط هذا التعليق شارك More sharing options...
الحسامي قام بنشر يناير 27, 2015 مشاركة قام بنشر يناير 27, 2015 اخي الغالي ياسر ... الله وحده الذي يعلم مدى شوقي وحبي لكم اخي رجب ... النور نورك يا كبير اخي ابراهيم .. بارك الله فيك اخي حسام ... كلامك يدل على علو اخلاقك وان شاء الله لن نتغيب 1 رابط هذا التعليق شارك More sharing options...
جلال الجمال_ابو أدهم قام بنشر يناير 27, 2015 مشاركة قام بنشر يناير 27, 2015 الغائب الحاضر اخى فى الله / عماد الحسامى بارك الله فيك و كل عام و انتم بخيرنرجو ان تكون بخير و نرجو ان لا تحرمنا من ابداعاتكو بلاش تغيب علينا كتيرو ياريت تتطلع على الرابط من هنا حتى لا يكون مرورك مرور الكرام حاجة تانية مش عاوزين تخش علينا و ايديك فاضية لان منتدانا اصبح متعطش لكل عمل جديد رابط هذا التعليق شارك More sharing options...
عبدالباري البنا قام بنشر يناير 27, 2015 مشاركة قام بنشر يناير 27, 2015 اجمل ما في هذا الموضوع هو عوده احد الطيور الغائبة الى عشها الطيور التي طالما غردت وابتكرت وابدعت مرحبا بعودتك اخينا المبدع ... عماد الحسامى طالما عدت .... لن نعاتبك على غيابك املين الا يتكرر.....نورت بيتك 1 رابط هذا التعليق شارك More sharing options...
قصي قام بنشر يناير 27, 2015 مشاركة قام بنشر يناير 27, 2015 الله على البشاره الجميله بعودة الاستاذ الكبير الخلوق لاحرمنا الله منه الاستاذ عماد الحسامي لك وحشة ... أرجوك لاتغب عن اهلك في المنتدى بارك الله فيك اخوك قصي رابط هذا التعليق شارك More sharing options...
علي فاهم قام بنشر يناير 28, 2015 مشاركة قام بنشر يناير 28, 2015 الله على البشاره الجميله بعودة الاستاذ الكبير الخلوق لاحرمنا الله منه الاستاذ عماد الحسامي لك وحشة ... أرجوك لاتغب عن اهلك في المنتدى بارك الله فيك اخوك قصي صدقت و بالجق نطقت و لاننسى الشكر للاستاذ رجب جاويش رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.