Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("C3:C100")) Is Nothing Then
Dim row_num As Long, name As String
row_num = Target.Row
Set Target = Range("A1")
    If Cells(row_num, 3) = "Delete" Then
        If MsgBox("Are you sure you want to delete task?", 36, "Delete Task") = vbNo 

Advance Analytics

Analyze data
Build KPIs
Create dynamic dashboards

Automation using VBA / App Scripts

Automate repetitive work
Save time
Minimize mistakes

Personal Coaching

Training sessions
Improve skills
Learn and grow

Providing first class solutions since 2020

Discovered and fell in love with Excel back in 2010. Grown skills and reached the status of the office go to guy early on.
Freelancing since 2020.