Else..If در محیط VBE اکسل

ساخت ماکرو باتن برای انجام فیلترها در اکسل ( AutoFilter )

VBA Macro Buttons for Filters in Excel

July 19, 2018

Jon Acampora

13 comments

درج ردیف و ایجاد ردیف در اکسل

درج ردیف در اکسل در صورتیکه ردیف پاک شود ردیف ها تغییر خواهند نمود 

Row()-1=

ایجاد ردیف اتومات 

ActiveCell.EntireRow.Insert XlShiftDown

حذف ردیف ها

شمارش ردیف ها در اکسل

Returns a Range object that represents the cell at the end of the region that contains the source range. Equivalent to pressing END+UP ARROW, END+DOWN ARROW, END+LEFT ARROW, or END+RIGHT ARROW. Read-only Range object.

Syntax

(expression.End (Direction

lngLastRow = Cells(Rows.Count, 1).End(xlUp).Row

کنسل کردن رایت کلیک در اکسل

این رویداد زمانی اتفاق می افتد که در صفحه ی کاری کلیک راست انجام  شود.

Private Sub Worksheet_BeforeRightClick(ByVal Target

(As Range, Cancel As Boolean

اگر در آن رنج بود : 

Cancel=True