Printable View
سلامنقل قول:
فرمولی که من نوشته بودم کاملا درست و بدون ایراده و اینی که شما پیشنهاد کردی اصلا جواب نمیده
خوبه اگه مطمئن نیستید اول فرمولتون رو با یه مثال برای خودتون چک بکنید و بعد پست بدید
نقل قول:نقل قول:
دوست عزیز شما احتمالا به این سوال هم دقت نکردی
ایشون نوشته وقتی کلیک میکنم تا سلکت بشه ؛ نگفته وقتی دارم فرمول نویسی می کنم
خواهشا دقت در حواب سوالات فراموش نشه
در ضمن برای پاسخ به سوالات دوستان پست خود اونا رو نقل قول کنین نه پست جواب رو
موفق باشید
سلام دوست عزیزمنقل قول:
تا اونجایی که من اطلاع دارم این کار به غیر از استفاده از کدهای VBA (برنامه‌نویسی) در اکسل امکان‌پذیر نیست
سلامنقل قول:
در اكسل حداكثر ميشه براي هر workbook مقدار 255 صفحه sheet داشته باشيم
براي اين كار ميتونيد مسير زير رو دنبال كنيد:
tools----option---general----sheets in new workbook
خواهيد ديد بالاترين مقداري كه ميگيره 255 هست و اگر روي 255 ok كنيد مقدار پيش فرض خواهد شد و از اين به بعد اكسل رو كه باز كنيد براتون با 255 sheet خواهد اومد
.
.
سوال دوم رو تست نكردم ولي به نظرم تا حداكثر ميزان 255 صفحه ميشه كپي كرد
مثلا اگه ما sheet 1,2,3 داشته باشيم ميتونيم از sheet1 مقدار(255منهاي 3 گه تعداد sheet هاي موجود )كپي داشته باشيم
سلامنقل قول:
باز هم میگم دوست عزیز که در جوابهاتون به دوستان دقت کنین
سوال شده که چند تاشیت میشه به اکسل اضافه کرد و شما میگی 255 تا و بعد هم اشاره میکنی به قسمت تنظیمات پیش فرض !!!!!!!!!!!!!!!!!!!!!!!!!!!!!
جالبه !!!!!!!!!
اون قسمت همونطور هم که خودت گفتی برای تعیین تعداد شیت های پیش‌فرض هست نه برای وقتی که میخواهیم اضافه بکنیم
جواب دومتون هم کاملا بی‌ربط هست
سلام جنابنقل قول:
ناراحتي نداره
ما شما رو به استادي قبول داريم :11:
براي فرمول هم كه فرمودين دوتاي اونها درسته فقط تو بعضي سيستمها ; و بعضي ها , كار ميكنه
و مشكلي از فرمولها نبوده
براي بقيه موارد هم فرمايش شما صحيح است
هدف اينه كه با همكاري هم مشكلي از مشكلات دوستان برطرف بشه
در كل شما به بزرگي خودتون بخشيد و پستهايي رو كه ميگيد اشتباهه رو حذف كنيد
موفق باشيد
سلام دوبارهنقل قول:
اولا ناراحت نشدم ثانیا هم استاد خودتون هستین
ولی من عقیده دارم که ادم باید برای راهنمایی کردن دیگران آموزش درست و بدون اشکال ارائه بده و اگه نه و بلد نیست ارائه نده
مواردی که شما در پستهای اخیرتون ذکر کردین تماما غلطه
حتی همون فرمولی که نوشتین و فکر کردین که من تفاوت , و ; رو در سیستمها نمیدونم
نه عزیزجان ؛ فرمول رو من گفتم غلطه و نه نحوه فرمول نویسی رو
من هم به اون هدفی که گفتید ایمان دارم و در راستای همون هم اومدم اینجا
ولی باید بدونیم که جواب ندادن بسیار بسیار بسیار بهتر و سزاوارتر از غلط دادن جواب دادن است
موفق باشید
هموني كه شما ميگي
tnx
سلامنقل قول:
این کد رو پیدا کردم. اگر راه حلی دیگری بود پیشنهادکنید.
کد:Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim iColor As Integer
'// Note: Don't use if you have conditional
'// formatting that you want to keep
'// On error resume in case user selects a range of cells
On Error Resume Next
iColor = Target.Interior.ColorIndex
'// Leave On Error ON for Row offset errors
If iColor < 0 Then
iColor = 36
Else
iColor = iColor + 1
End If
'// Need this test in case Font color is the same
If iColor = Target.Font.ColorIndex Then iColor = iColor + 1
Cells.FormatConditions.Delete
'// Horizontal color banding
With Range("A" & Target.Row, Target.Address) 'Rows(Target.Row)
.FormatConditions.Add Type:=2, Formula1:="TRUE"
.FormatConditions(1).Interior.ColorIndex = iColor
End With
'// Vertical color banding
With Range(Target.Offset(1 - Target.Row, 0).Address & ":" & _
Target.Offset(-1, 0).Address) 'Rows(Target.Row)
.FormatConditions.Add Type:=2, Formula1:="TRUE"
.FormatConditions(1).Interior.ColorIndex = iColor
End With
End Sub
سلامنقل قول:
من كه گفتم دوست عزيز فقط تو اكسل به اين درد مبتلاست اون چيزي هم گه گفتين چك كردم فعال نيست..
چرا وقتی در تابع count یک عدد را از طریق فرمت text متن می کنیم ان عدد جزء شمارش می اید؟