On Sep 12, 7:05*am, wrote:
On Tuesday, September 11, 2012 11:26:10 AM UTC-4, TIMOTHY wrote:
i have two sheets in which one is blank

using vba code i want to copy column one three seven and paste them into another sheet

Try this (you may need to change sheet names as applicable)

Sub CopyColumns()
Sheets("Sheet1").Range("A:A,C:C,G:G").Copy _
* * Sheets("Sheet2").Range("A1")
End Sub

suppose column headings of that three are suppliername, contact, and
emailid. And if i dont know the column no. In that case?