رخداد BeforeDoubleClick وقتی که یک کاربرگ دابل کلیک می‌شود، قبل از اینکه اقدام پیش‌فرض دابل کلیک اجرا شود، فعال می‌گردد.
دستور اجرا
expression.BeforeDoubleClick (Target , Cancel)
expression متغیری است که یک شی Worksheet را نمایندگی می‌کند.
پارامتر‌ها
| نام | اجباری/اختیاری | نوع داده | توضیحات |
|---|---|---|---|
| Target | اجباری | Range | نزدیکترین سلول به نشانگر ماوس هنگام دوبار کلیک کردن. |
| Cancel | اجباری | Boolean | هنگام وقوع رویداد نادرست است. اگر رویه رویداد این آرگومان را روی True تنظیم کند، عمل دوبار کلیک پیش‌فرض پس از اتمام رویه انجام نمی‌شود. |
مقدار بازگشتی
ندارد.
ملاحظات
متد Application.DoubleClick باعث فعال شدن این رخداد نمی‌شود.
این رخداد وقتی که کاربر روی حاشیه سلول دابل کلیک نماید فعال نمی‌شود.
ویدیوی آموزشی
مثال
کد زیر با استفاده از رخداد BeforeDoubleClick رنگ پس‌زمینه یک سلول و سلول‌های اطراف آن را به رنگ زرد تغییر می‌دهد.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim targetCol As Integer, startCol As Integer
Dim targetRow As Integer, startRow As Integer Me.Cells.ClearFormats 'clear format for all cells in the workbook targetRow = Target.Row targetCol = Target.Column If targetRow - 1 >= 1 Then startRow = targetRow - 1 Else startRow = targetRow End If If targetCol - 1 >= 1 Then startCol = targetCol - 1 Else startCol = targetCol End If Me.Range(Me.Cells(startRow, startCol), Me.Cells(targetRow + 1, targetCol + 1)).Interior.Color = vbYellow
End Sub
