ActiveWorkbook.SaveAs Range A1 problem...

[guybrown]

Hi all

A1 contains H:\FolderOne\FolderTwo\Filename.scr
A1 may be changed by users so I don't want to incorporate into code - I'd rather refer to cell A1.

ActiveWorkbook.SaveAs Filename:=Range("A1"), FileFormat:=xlTextPrinter, CreateBackup:=False

This code doesn't seem to work. Any help much appreciated.

Guy, XP prof, XL 2007

 

[Andrew Poulsom]

In what way doesn't it work? Maybe you need the Value property:

ActiveWorkbook.SaveAs Filename:=Range("A1").Value, FileFormat:=xlTextPrinter, CreateBackup:=False

You may also need to qualify the range with its worksheet, eg:

Filename:=ThisWorkbook.Worksheets("Sheet1").Range("A1").Value

 

[guybrown]

Legend! Again I'm overlooking the simpler things... The macro changed sheets so you're right - I had to reference back to Sheet1. Thanks!