VBA

Hi please see this codes and tell where is problem Sub test() Dim mysheet As Worksheet Dim lr As Integer Dim selrow As Integer Dim cat As Integer Dim x As …