Is there a save-as option instead of copying sheet from workbook to save it
separately?

hi
xl does not have this feature built in. but it is possible. as an ex-lotus
user, i got use to one of it's features call save range. so i wrote a macro
for that in excel. I have the macro in my personal file in the xl start
folder so that it will be available for all files and runit from a custom
menu item.
Sub mac1SaveRange()

'Macro written by FSt1 4/27/00

Dim cnt As Long
Dim cell As Range


ActiveSheet.UsedRange.Select
If Selection.Cells.Count = 1 Then
If MsgBox("You have selected only one cell. Continue?????", vbYesNo,
"Warning") = vbNo Then
Exit Sub
End If
End If
cnt = 0
For Each cell In Selection
If Not IsEmpty(cell) Then
cnt = cnt + 1
End If
Next
If cnt = 0 Then
If MsgBox("There is no data in the selected range. Continue?!?!?!?!?",
vbYesNo, "Warning") = vbNo Then
Exit Sub
End If
End If
Selection.Copy
Workbooks.Add
Range("A1").PasteSpecial xlPasteAll
Application.Dialogs(xlDialogSaveAs).Show
End Sub


Post back if you need help setting it up.

regards
FSt1
"ali1h" wrote:

Is there a save-as option instead of copying sheet from workbook to save it
separately?

Hi


How do you copy the sheet now? Simply copy-paste, or do you copy the sheet
(right-click on sheet tabMove or copyTo book: (new book)check 'Create a
copy'OK)

Or I'm completly missing your point?



--
Arvi Laanemets
( My real mail address: arvi.laanemets<attarkon.ee )



"ali1h" wrote in message
...
Is there a save-as option instead of copying sheet from workbook to save
it
separately?

"Move or Copy Sheet" will let you move or copy to a new workbook, so you can
save there.
--
David Biddulph

"ali1h" wrote in message
...
Is there a save-as option instead of copying sheet from workbook to save
it
separately?

On Jan 15, 9:15 am, "David Biddulph" <groups [at] biddulph.org.uk
wrote:
"Move or Copy Sheet" will let you move or copy to a new workbook, so you can
save there.
--
David Biddulph

"ali1h" wrote in message

...

Is there a save-as option instead of copying sheet from workbook to save
it
separately?

You can always use [Ctrl] + drag to drop the sheet tab into either
another worksheet or that gray area when your sheets are not maximized.