سلام .چطور مي توان مجموع سل ها انتخاب شده را از هر جا و هر شيت را در سلي خواص نشان داد . يعني هر جايي را كه انتخاب كرديم مجموع ازدر سلي نمايش داده شود . مانند خود اكسل كه در نوار پايين آن نمايش ميدهد ؟
مجموع سل هاي انتخاب شده؟
Collapse
X
-
RE: مجموع سل هاي انتخاب شده؟
با درود
کار خاصی رو نمیخواد انجام بدی
کد های زیر رو در رویداد workbook واسه اینکه در همه sheet ها اعمال بشه کپی کن
حله
[undefined=undefined]
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Dim myRng As Range
Dim sumTip
Set myRng = Selection
sumTip = WorksheetFunction.Sum(myRng)
If myRng.Count > 1 Then
If sumTip > 0 Then
MsgBox "sum = " & sumTip
Else
End If
End If
End Sub
در پناه خداوندگار ایران زمین باشید و پیروز
کامنت