یافتن شماره حذف شده

[sunstar]

هزاران سپاس

[misammisam]

سلام
چیزی که بنظرم میرسه با VB هست :

Private Sub CommandButton1_Click()
Range("H5:H6").ClearContents

SerchMan = Range("E5").Value
SerchWoman = Range("E6").Value
StartMan = Range("F5").Value
StartWoman = Range("F6").Value
LastRow = Sheet4.Range("A:B").Cells.Find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious, LookAt:=xlWhole).Row

For i = 2 To LastRow
If (Range("B" & i).Value = SerchMan) Then
If (Range("A" & i).Value <> StartMan) Then
Range("H5").Value = StartMan
Exit For
Else
StartMan = StartMan + 1
End If
End If
Next i

For j = 2 To LastRow
If (Range("B" & j).Value = SerchWoman) Then
If (Range("A" & j).Value <> StartWoman) Then

Range("H6").Value = StartWoman
Exit For
Else
StartWoman = StartWoman + 1
End If
End If
Next j

End Sub 

[sunstar]

سلام
خواهش میکنم قضیه فیلتر رو فراموش کنید.مسله رو جور دیگری مطرح میکنم فرض کنید ما در محل کارمان 5 نفر مرد و 5 نفر زن داریم و اطلاعات انها را در یک شیت اکسل وارد می کنیم به طوریکه در ستون اول شماره فرد (از یک تا 5 برای مردان و همچنین از یک تا 5 برای زنان) و ستون دوم جنسیت فرد را درج میکنیم.اگر به فرض یکی از شماره ها مربوط به هریک از جنسیتها سهواً درج نشده باشد(مثل فایل قبلی).آیا کدی وجود دارد که شماره ای که درج نشده را نشان دهد؟

[misammisam]

سلام
خوب تو فایلی که الان گذاشتید بطور کلی مرد شماره 3 و زن شماره 4 وجود نداره بنابراین تو فیلترم معلومه نشونش نمیده .
الان من متوجه نشدم این فایلتون مثلا نتیجه بعد از فیلتره یا دیتابیس اولیتونه که قراره تازه فیلتر بشه .
اصلا قضیه اصلی سوالتون چیه که به چنین چیزی احتیاج دارید ؟ اونو بگید احتمالا بهتر به نتیجه میرسید .

[sunstar]

سلام
از پاسخ جنابعالی ممنونم.ولی منظور من اصلاً این نبود.فایل نمونه رو به پیوست میذارم اگه به فایل توجه کنید هر وقت ردیف جنسیت مرد رو انتخاب می کنیم متوجه میشیم شماره3 حذف شده و هر وقت جنسیت زن رو انتخاب می کنیم متوجه میشیم شماره4 حذف شده ، وقتی اطلاعات یک شیت اکسل ، کم باشه پیدا کردن اولین شماره حذف شده خیلی راحته مثل نمونه فایل اکسلی که من گذاشتم ، ولی وقتی که اطلاعات شما فرضاً 800ردیف باشه و شماره هایی مربوط به هر دو جنس ، حذف شده باشه ؛ پیدا کردنشون واقعاً زمانبره.حالا من کدی میخواستم که با اجرای اون اولین شماره حذف شده هردو جنس رو نشون بده فرضاً در msgbox پیغام بده مرد=3 ،زن=4
امیدوارم توضیحات من واضح باشه
با تشکر

[misammisam]

از اساتيد بزرگوار کسی نیست به سوال بنده پاسخ بده؟سوال واقعا اشکار وواضح بیان شده.

سلام
اتفاقا سوالتون کاملا نامفهومه ،
اصلا تو فیلتر کردن چیزی حذف نمیشه فقط بقیه گزینه ها نسبت به فیلتر شما هاید میشن .
فکر کنم در واقع شما شماره اولین زن یا مردو میخواید ، حالا چه با فیلتر چه بدون فیلتر.
مثل این :

[sunstar]

از اساتيد بزرگوار کسی نیست به سوال بنده پاسخ بده؟سوال واقعا اشکار وواضح بیان شده.

[mrhartsclube]

سلام دوست عزیز
اگه یه مثال بزنید که ببینیم عددها چی هستن و ارتباطشون با زن و مرد رو کاربر چجوری تشخیص میده شاید بشه به برنامه هم چنین مطلبی رو فهموند.

[sunstar]

فرض کنید که دریک فایل اکسل در ستون a تعدادی شماره به صورت صعودی درست شده و در ستون b نیز کلمات زن یا مرد درج شده است وقتی ستون bرا فیلترمیکنیم و یکی از گزینههای زن یا مرد را انتخاب می کنیم متوجه می شویم که در ستون a بعضی از شماره ها حذف شده است مثلا وقتی در ستون b گزینه زن را انتخاب می کنیم متوجه می شویم که در ستون aشماره اول ردیف زن( 1) و دومین رديف زن (3)می باشد. وردیف شماره (2) زن حذف شده است. آیا کدی هست که اولین شماره حذف شده مربوط به ستون مرد یا زن را نشان دهد؟