حذف سلولها با شرایط خاص

[it_heidari]

خیلی ممنون از شما. لطف کردین

[EXCELIAN]

ببخشيد مي خواستم ببينم اين اکسل که در فقط يک ستونش 145000 عدد عادي (بدون فرمول و هيچي) درج کنيم کند مي شود، چرا چيزي بيشتر از 17 ميليارد خانه براي يک صفحه آن تخصيص داده اند؟
جالب است بدانيد اگر تمام خانه هاي يک شيت را انتخاب کنيم و و فقط بخواهيم درون تمام آنها عدد مثلا" يک را وارد کنيم اکسل زير بار نمي رود!

[Elhamstructure]

سلام
من میخوام سلولهای اکسلم به صورت 3 تا در میان حذف بشن میشه کسی راهنماییم کنه؟
من تازه عضو شدم و وقت هم ندارم برا کارم تعداد سلول هام نزدیک 1000 تاست

[mokaram]

به لینک زیر مراجعه کنید
حذف ردیف با شرایط خاص

[savco]

با سلام خدمت دوستان محترم ی مشکلی جهت اجرای عملیات زیر دارم ممنون میشوم کمک کنید .
من میخوام ی سری عدد که متغیره را در سلول a1 بنویسم که با رقم سلول b1 جمع بشه و جواب در سلول c1 ثبت بشه . مشکل اینجاست که سلول a1 متغیره من میخوام هر عدد جدیدی که مینویسم داخل سلول c1 جمع و ثبت بشه و وقتی که سلول a1 را پاک کردم یا عدد جدیدی نوشتم درسلول c1 جمع شده و کسر نگردد . شرمنده اگه خوب توضیح ندادم .

[iranweld]

با سلام

فایل پیوست را ملاحظه بفرمایید

Private Sub Worksheet_Change(ByVal Target As Range)

On Error Resume Next  'skip all run-time errors'

 If Not Application.Intersect(Target, Range("A:D")) Is Nothing Then

Application.EnableEvents = False

I = Target.Row



If Range("A" & I).Value <> "" Then

Range("C" & I).Value = Range("A" & I).Value + Range("B" & I).Value


 End If

 End If
 
Application.EnableEvents = True

On Error GoTo 0  'Turn off error trapping and re-allow run time errors

End Sub 

[savco]

با سپاس فراوان ممنون فایل ارسالی دوم دقیقا همونی که میخواستم . باز هم تشکر