attention all mac users

    Hi,


    Below is an excerpt of my code:
    Private Sub cmdFinish_Click()
    AllFormsUnload
    ActiveWorkbook.SaveAs Filename:="F:\Project Proformas" & Range("title").Value
    & ".xls", _
    FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
    ReadOnlyRecommended:=False, CreateBackup:=False
    On Error Resume Next
    Application.Dialogs(xlDialogSendMail).Show _
    arg1:="[email protected];[email protected];[email protected]",
    _
    arg2:="Project Proforma"
    If Err <> 0 Then
    MsgBox "Sorry, an error has occured, please notify [email protected]"
    End
    End If
    End Sub


    This works for PC, but I need some code for it to work on macintosh , as "F:" is a PC term.


    Cheers


    Jay

    Have you tried ThisWorkbook.Path in place of F:\ or if F:\ is a network drive try the UNC "\\server\share\Project Proformas.....

Participate now!

Don’t have an account yet? Register yourself now and be a part of our community!

Register Yourself Login