Quantcast
Channel: Excel Help Forum - Excel Programming / VBA / Macros
Viewing all articles
Browse latest Browse all 50207

Export Table to CSV (with code & workbook)

$
0
0
Hey Guys,

I'm trying to export a table to a csv file

Check out this screenshot:

http://img685.imageshack.us/img685/4497/upperh.png

So I'm just trying to export B2 through the last Row in D (B2:Dlastrow)

Perhaps it's having a problem because the data is being populated with a vlookup from a different sheet? Ideas/Help?

Here is the workbook (pardon the size, I just wanted to include it in its entirety)

http://www.mediafire.com/?7kqvbs7vy96ok6r

Take a look at sheet ""Deactivate"

Here is the code I'm using

Code:

Sub Images1()
Dim LR As Long
Application.ScreenUpdating = False
Application.DisplayAlerts = False

    With Sheets("Deactivate")
        LR = .Range("A:A").Find(WorksheetFunction.Max(.Range("A:A")), LookIn:=xlValues, LookAt:=xlWhole).Row
        .Range("B2:D" & LR).Copy    'edit this range as needed
    End With
   
    Sheets.Add
    Range("A1").PasteSpecial
    ActiveSheet.Move
   
    ActiveWorkbook.SaveAs Filename:="C:\Users\daniel kim\Dropbox\TRACKING\deactivatelist.csv", FileFormat:=xlCSV, CreateBackup:=False
    ActiveWorkbook.Close False

Application.ScreenUpdating = True


End Sub

crossposted:


http://www.excelforum.com/excel-prog...15#post3062915
http://www.mrexcel.com/forum/excel-q...ml#post3352479

Viewing all articles
Browse latest Browse all 50207

Trending Articles