Sub M_snb() with Sheets("Query").cells(1).currentregion.columns(1).offset(3) Sheets("1. Detail").Cells(Rows.Count, 1).End(xlUp).offset(2).resize(.rows.count)=.value end with End Sub
Sub M_snb() with Sheets("Query").cells(1).currentregion.columns(1).offset(3) Sheets("1. Detail").Cells(Rows.Count, 1).End(xlUp).offset(2).resize(.rows.count)=.value end with End Sub