View Single Post
 
Old 08-29-2017, 10:19 AM
NoSparks NoSparks is offline Windows 7 64bit Office 2010 64bit
Excel Hobbyist
 
Join Date: Nov 2013
Location: British Columbia, Canada
Posts: 842
NoSparks is a glorious beacon of lightNoSparks is a glorious beacon of lightNoSparks is a glorious beacon of lightNoSparks is a glorious beacon of lightNoSparks is a glorious beacon of light
Default

Add a second paste line
Code:
Rows(rowNum).PasteSpecial Paste:=xlFormats
You might also want to add
Code:
If rowNum = 0 Then Exit Sub
right after the InputBox.
Reply With Quote