How to apply border to a new row created by VBA in a table/list in excel?

[nitind]

How to apply border to a new row created by VBA in a table/list in excel?
I have created a button which adds new rows to the table which is bordered and the background of whole sheet is white.Now when the new row is added the new row does not have any border.I want that the new row should also have the same border as the other rows.How to do it.

 

[Barry Katcher]

Right after the portion of your code that inserts the row, insert the code below. It will go up one row, copy the row, then go back down to the new row and Paste Special>Formats.

Sub Macro1()
    ActiveCell.Offset(-1, 0).Rows("1:1").EntireRow.Select
    Selection.Copy
    ActiveCell.Offset(1, 0).Range("A1").Select
    Selection.PasteSpecial Paste:=xlFormats, Operation:=xlNone, SkipBlanks:= _
        False, Transpose:=False
    Application.CutCopyMode = False
End Sub

 

[nitind]

Thanks a lot Barry!!! I have also pasted a new query.Can u plz provide me the solution for the same