Results 1 to 4 of 4

Modifying VBA code to add conditional element

Threaded View

  1. #1
    Forum Contributor jonvanwyk's Avatar
    Join Date
    06-28-2010
    Location
    Iowa, USA
    MS-Off Ver
    Excel 2010
    Posts
    452

    Modifying VBA code to add conditional element

    I am currently using the code below to convert a cell range to a PDF file and automatically save it to a spot on a network drive with a predetermined name. How can I add a condition to this so that it only actually saves the PDF to that folder when the following conditions are met:

    E8 OR E10 OR E11 OR E13 = TRUE AND E17 OR E18 OR E19 OR E20 = TRUE

    Sub clicksubmit01()
    
        Dim FileName As String
        
        FileName = Left(ActiveWorkbook.Name, Len(ActiveWorkbook.Name) - 5)
        ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, FileName:= _
                "S:\Folder Location\" & Cells(2, 2).Value & " - " & Cells(6, 2).Value & ".pdf", _
                Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
                :=False, OpenAfterPublish:=False
        Range("A1:D27").Select
        
    End Sub
    Last edited by jonvanwyk; 07-19-2011 at 10:55 AM.

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Search Engine Friendly URLs by vBSEO 3.6.0 RC 1