내일도 화이팅

안녕하세요 반갑습니다. 저번 업로드는 입고견적서의 데이터를 입고데이터로 옮기는 코드를 제공해드렸는데요. 그럼 출고 견적서의 데이터도 출고 데이터로 옮길 수 있는 프로그램이 되어야겠죠? 코드는 아래와 같습니다. Sub 출고견적서입력() Dim input_data As String Dim data As Integer data = 3 Do While (Cells(data, "B").Value "") data = data + 1 Loop input_data = "B" & Trim(Str(data)) & ":" & "E" & Trim(Str(data + 100)) Range(input_data).Value = Worksheets("출고견적서").Range("B3:E100").Value End Sub 입고견적서의 ..