هدف از ارائه این مطلب معرفی 101 کد نمونه vba  آفیس (101 Samples for Office 2010 Development) می باشد. امیدوارم از این کد ها نهایت استفاده را ببرید.هدف از ارائه این کدها بیان قدرت برنامه های آفیس و تغییر آن مطابق با سلیقه شما می باشد.در این مطلب به معرفی یک نمونه کد اکسل آن اشاره خواهم کرد.

قبل از هر چیز به این نکته اشاره کنم که این کدها یک نمونه هستند و شما باید مطابق با نیاز خود آن ها را تغییر دهید.می توانید متن اصلی این مطلب را از اینجا ببینید.

برای استفاده از این کد نرم افزار اکسل را اجرا کنید.وارد محیط ویرایشگر vba شوید.(Alt+F11)سپس تمام کدها را در sheet1 کپی کنید.مانند تصویر زیر:

نمونه کد های excel vba-حذف ردیف های تکراری-1

برای اینکه کاملا متوجه شوید این کدها به چه نحو عمل می کنند F8 را کلیک کنید تا مرحله به مرحله کد ها اجرا شده و نتیجه را بر روی فایل اکسل ببینید.

نمونه کد های excel vba-حذف ردیف های تکراری

نمونه کد:

Sub TestRemoveDuplicates()
' Set up the data:
Range("A1:C1") = Array("ID", "Name", "Price")
Range("A2:C2") = Array(1, "North", 12)
Range("A3:C3") = Array(2, "East", 13)
Range("A4:C4") = Array(3, "South", 24)
Range("A5:C5") = Array(4, "North", 12)
Range("A6:C6") = Array(5, "East", 23)
Range("A7:C7") = Array(6, "South", 24)
Range("A8:C8") = Array(7, "West", 10)
Range("A9:C9") = Array(8, "East", 23)

' Make sure you look at the current state of the data,
' before removing duplicate rows.

' Remove duplicates, looking for unique values in columns 2 and 3.
UsedRange.RemoveDuplicates Columns:=Array(2, 3), Header:=xlYes

End Sub 

 

برچسب ها :

مطالب مرتبط

دیدگاه ها

دیدگاه شما

(ضروری)
(ضروری,نمایش داده نمی شود)
(ضروری)

آخرين مطالب آموزشي

تغییر-حذف رنگ پس زمینه صفحات ورد-Word Page Color تابع RADIANS اکسل-تبدیل درجه به رادیان تابع DEGREES اکسل-تبدیل رادیان به درجه فرمول نویسی و معادلات در پاورپوینت-Equation PowerPoint فیلم برداری از صفحه نمایش با پاورپوینت Screen Recording PowerPoint تبدیل متن به جدول و بلعکس ورد-Convert Text to Table Word نحوه ایجاد جدول در ورد-Insert Table Word تعیین سایز کاغذ A5-A3 ورد و اکسل Word Excel Page Size ایجاد حاشیه برای عکس در ورد Picture Border Word ایجاد حاشیه در صفحات ورد-Page Borders Word ایجاد حاشیه برای پاراگراف در ورد-Word Paragraph Border تشخیص یا تعیین نسخه آفیس What version Office دانلود آفلاین آخرین آپدیت آفیس Office Updates رفع مشکل تبدیل اعداد انگلیسی-فارسی ورد 2016 Word آموزش نصب و حذف صحیح آفیس Install Uninstall Office 2016 تفاوت نسخه ها و لایسنس های آفیس Office ایجاد شماره اعداد خودکار در ورد Numbering تغییر فونت پیش فرض ورد Set Default Font Word خارج کردن متن عکس در وان نوت Picture to Text OneNote حل معادلات تایپی و دست نویس در وان نوت OneNote ادامه مطالب آموزشي

خبرنامه آفیس