I have this... (with a few more lines as well)
But what i want is to make this same code work for all rows, A20 to A45...![]()
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$20" Then Select Case Target.Value Case "000-101-7221" Call Macro000_101_7221 Case "000-101-7521" Call Macro000_101_7521 Case "000-101-7621" Call Macro000_101_7621 Case "000-111-7521" End Select End If End Sub
Copy 2 of Packing Slip.xlsm
VERY beginner at VBA... try to use easy terms![]()
Bookmarks