مقایسه داده ها در دوستون وهای لایت کردن مشترک ها

**khakzad** · 2012/07/12, 22:35

RE: مقایسه داده ها در دوستون وهای لایت کردن مشترک ها

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

**ptgh** · 2012/07/12, 23:00

RE: مقایسه داده ها در دوستون وهای لایت کردن مشترک ها

فرض کنید دوتا ستون داریم یکی 200تا ردیف داره یکی 1300تا میخوایم اون 1300تارو با 200تا مقایسه کنیم و اونایی که متفاوته یه جا نشون بده...ولی محتوای سلولها دقیقا یکی نیست و ممکنه که اگه 6کاراکتر اولم یکه باشه واسه ما یکسان تلقی بشه واسه همین می هایم محتوای سلولها تا مثلا 6 کاراکتر مقایسه بشه...نمی دونم خوب توضیح دادم یا نه:-؟

**khakzad** · 2012/07/12, 23:06

RE: مقایسه داده ها در دوستون وهای لایت کردن مشترک ها

اون 6تاش حله
فقط مقایستون:
2 حالت هس: یا نظیر به نظیر مقایسه بشن.که چون تعداد مساوی نیس منطقی نیس.
یکی دیگه هم هر کدوم از اون 1300 تایی ها با همه ی اون 200 تا مقایسه بشن. و در صورت برابر بودن نشون بده
اگه منظورمو متوجه نمیشین، ی مثال ساده از داده هاتون بزنید[hr]
و خروجی که می خواین ازش داشته باشین

**ptgh** · 2012/07/12, 23:08

RE: مقایسه داده ها در دوستون وهای لایت کردن مشترک ها

دقیقا مدل دومی که گفتین می شه مقایسش چون هر یه سلول باید یه دور لوپ بخوره با همه مقایسه بشه تا کامل چک بشه!

**~M*E*H*D*I~** · 2012/07/12, 23:23

RE: مقایسه داده ها در دوستون وهای لایت کردن مشترک ها

به این لینک هم نگاهی بندازین بد نیست

http://www.mrexcel.com/forum/showthread.php?330477-VBA-for-compare-two-columns-and-show-differences-in-another

**khakzad** · 2012/07/12, 23:23

RE: مقایسه داده ها در دوستون وهای لایت کردن مشترک ها

خدمت شما
کافیه اون 1300 تا رو در ستون اول و اون 200 تا رو در ستون دوم کپی کنید.
ستون زرد هم فرمول داره.
درگ کنید تا پایین
ادرس دهی رو دقت کنید
سوالی بود در خدمتم[hr]
ی توضیح هم بدم
من 3 رقم جدا کردم
شما بکنیدش 6
ببخشید که داده هام خیلی فرضی هستن!!!!

فایل های پیوست شده

moghayese.xlsx (11.1 کیلو بایت, مشاهدات 230)

**ptgh** · 2012/07/12, 23:40

RE: مقایسه داده ها در دوستون وهای لایت کردن مشترک ها

یه دنیا ممنون...فقط با توابع نوشتین اینو؟! طرز کارشو می شه بگین که اگه نیاز شد تغییری بدم؟

**khakzad** · 2012/07/13, 00:12

RE: مقایسه داده ها در دوستون وهای لایت کردن مشترک ها

خواهش می کنم
بله
داخل سل زرد رنگ فرمول هس
الان 3تا رو مقایسه می کنه
3 رو به 6 تغییر بدین
محدوده هاتون رو هم باید گسترش بدین
فرمول های ارایه ای هس

فرمول left تعداد رقم دلخواه رو جدا می کنه.فرمول ایف هم که برای مقایسه هر سل با محدوده مورد نظر هس.
اگر برابر بود نشون میده.
اگر هم برابر نبود خالی می ذاره

**shamsololama** · 2012/07/13, 08:25

RE: مقایسه داده ها در دوستون وهای لایت کردن مشترک ها

نوشته اصلی توسط ptgh

دقیقا مدل دومی که گفتین می شه مقایسش چون هر یه سلول باید یه دور لوپ بخوره با همه مقایسه بشه تا کامل چک بشه!

با درود فراوان

Sub Macro1()
For Each c1 In Sheet1.Range("A1:A200")
If c1 <> "" Then
For Each c2 In Sheet2.Range("A1:A1300")
If Left(c1.Value, 6) = Left(c2.Value, 6) Then
c2.Interior.Color = 65535
c1.Interior.Color = 65535
End If

Next c2
End If
Next c1
End Sub

**ptgh** · 2012/07/13, 18:43

RE: مقایسه داده ها در دوستون وهای لایت کردن مشترک ها

سلام...ببخشید من یه سوال دیگه داشتم الان اگه بخوام نتایجو تو یه شیت دیگه برام چاپ کنه دستوری وجود داره آیا؟پیشاپیش ممنون...

**khakzad** · 2012/07/13, 23:22

RE: مقایسه داده ها در دوستون وهای لایت کردن مشترک ها

سلام
کافیه فرمول رو توی شیت دیگه بنویسید

**shamsololama** · 2012/07/14, 08:16

RE: مقایسه داده ها در دوستون وهای لایت کردن مشترک ها

نوشته اصلی توسط ptgh

سلام...ببخشید من یه سوال دیگه داشتم الان اگه بخوام نتایجو تو یه شیت دیگه برام چاپ کنه دستوری وجود داره آیا؟پیشاپیش ممنون...

با درود فراوان

Sub Macro1()
Dim c1, c2
Dim n

For Each c1 In Sheet1.Range("A1:A200")
If c1 <> "" Then
For Each c2 In Sheet2.Range("A1:A1300")
If Left(c1.Value, 6) = Left(c2.Value, 6) Then
c2.Interior.Color = 65535
c1.Interior.Color = 65535
Sheet3.Range("A1").Offset(n, 0) = c2.Value
n = n + 1
End If

Next c2
End If
Next c1
End Sub

**naser bahrpeyma** · 2013/10/27, 04:36

با درود
فایل پیوستی هایلایت کردن مشترکها دانلودش که میکنم یه چیز دیگه است اگه ممکنه یه بار دیگه بزارینش خیلی احتیاج دارم خیلی خیلی ممنونم

**maziardm** · 2013/10/27, 05:49

نوشته اصلی توسط khakzad

خدمت شما
کافیه اون 1300 تا رو در ستون اول و اون 200 تا رو در ستون دوم کپی کنید.
ستون زرد هم فرمول داره.
درگ کنید تا پایین
ادرس دهی رو دقت کنید
سوالی بود در خدمتم[hr]
ی توضیح هم بدم
من 3 رقم جدا کردم
شما بکنیدش 6
ببخشید که داده هام خیلی فرضی هستن!!!!

با سلام و روز خوش
فکر کنم فایلو اشتباه گذاشتید. با تشکر از شما