NEWBIE... get value of cell and save file as that value

beaj · May 15th, 2002, 06:23 AM

OK...Im very new to excel and dont know if this can be done but here goes
I need to look up the value of a cell eg (H4)
..this is an invoice number...and then save the xls file as that number using a button from VB

Hope this isnt too vague
Regards
Brad

Asala42 · May 15th, 2002, 06:55 AM

G'day,

I'm still a beginner in VBA but something like this would work:

Code:

Sub AssignFileName()
FileNm = Sheets("Sheet1").Range("H4").Value
    ChDir "C:WINDOWSDesktop"
    ActiveWorkbook.SaveAs Filename:=FileNm
End Sub

Tweak for the correct Directory/Sheet/cell reference.

Hope that helps,
Adam

beaj · May 16th, 2002, 05:22 AM

woo woo thanx great job....so simple really...

May 15th, 2002, 06:55 AM	#2
Asala42 Board Regular Join Date: Feb 2002 Location: Southfield,MI USA Posts: 1,030	G'day, I'm still a beginner in VBA but something like this would work: Code: Sub AssignFileName() FileNm = Sheets("Sheet1").Range("H4").Value ChDir "C:WINDOWSDesktop" ActiveWorkbook.SaveAs Filename:=FileNm End Sub Tweak for the correct Directory/Sheet/cell reference. Hope that helps, Adam

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

May 15th, 2002, 06:23 AM	#1
beaj New Member Join Date: May 2002 Posts: 3	OK...Im very new to excel and dont know if this can be done but here goes I need to look up the value of a cell eg (H4) ..this is an invoice number...and then save the xls file as that number using a button from VB Hope this isnt too vague Regards Brad

May 16th, 2002, 05:22 AM	#3
beaj New Member Join Date: May 2002 Posts: 3	woo woo thanx great job....so simple really...