Nobody pointed out to this poor soul that

if @conditions Null

won't work...

I get 37 hours a day...

24 hours a day, 12 at night, and 1 for lunch

you can replace the entire second loop with 1 command:

objWorksheet.Range("A2").CopyFromRecordset objRecordSet

Just as the column names, for use with pivot tables. I use this code to automate reporting to excel. A few lines of code hoses the data to excel &...

I called objRecordSet rs and objWorksheet ws,

but it seems like you could just do something like this

For CurCol = 0 To rs.Fields.Count - 1: ws.Cells(1, CurCol + 1).Value =...

CREATE FUNCTION xProper(@StringVal AS Varchar(8000)) RETURNS Varchar(8000)

BEGIN

 Declare @Char As Varchar(1), @Len As Int, @NewVal As Varchar(8000), @Pos As Int, @PrevChar AS Varchar(1)

 If @StringVal Is Null Return Null

 Select @Char='', @NewVal='', @Pos...