get the current filename as a variable
even the timestamp <g
--
HTH
Bob Phillips
(replace somewhere in email address with gmail if mailing direct)
"moon" <6369706865725F6475646540706C616E65742E6E6C wrote in message
. ..
Same here.
;-)
"Bob Phillips" schreef in bericht
...
myFileName = ActiveWorkbook.Fullname
if you want the path
myFileName = ActiveWorkbook.Name
without
--
HTH
Bob Phillips
(replace somewhere in email address with gmail if mailing direct)
"Janis" wrote in message
...
The myFileName line does not compile. What I want to do here is save
the
current filename with the date appended. I am trying to put the
current
filename into the Sub
tnx,
saveIndesign()
'Appends date to filename so as to not write over an existing file
Const fPath As String = "Mac OS X:Users:jrough:Documents"
Dim fName As String
Dim myFileName As String
myFileName = ActiveWorkbook.Filename
fName = fPath & myFileName & Time()
ActiveWorkbook.SaveAs Filename:=fName
End Sub
|