من یه ستون دارم که داخل هر سلولش اعداد متفاوتی نوشته شده و می خوام تموم اعدادش با یه عدد دیگه جمع بشن
مثلا ستون
a1+100
چه طور باید این کار رو انجام بدم ؟
|
🖤 پیام تسلیتبا نهایت تأسف و تأثر، باخبر شدیم جناب آقای محمد محمدی با نام کاربری smartman ، از مدیران ارزشمند انجمن اکسل ایران، دار فانی را وداع گفتهاند. ایشان سالها با دانش، تجربه، اخلاق نیکو و روحیه کمک به دیگران، سهم بزرگی در رشد و پویایی انجمن داشتند و خاطره حضور ارزشمندشان همواره در ذهن اعضای انجمن باقی خواهد ماند. مدیریت و اعضای انجمن ExcelIran این ضایعه را به خانواده محترم ایشان، دوستان و تمامی اعضای انجمن تسلیت عرض نموده و از خداوند متعال برای آن مرحوم، رحمت و مغفرت الهی و برای بازماندگان صبر و شکیبایی مسئلت دارند.
انا لله و انا الیه راجعون
|
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Not Intersect(Range("a" & Target.Row), Target) Is Nothing Then
If IsNumeric(Target) And Target <> Empty Then
Target.Value = (Target.Value + 100)
End If
End If
Application.EnableEvents = True
End Sub
کامنت