Loading
Ozgrid Excel Help & Best Practices Forums

Excel Video Tutorials / Excel Dashboards Reports



Results 1 to 4 of 4

Thread: Turn Off AutoFilter Mode

  1. #1
    Join Date
    3rd July 2006
    Posts
    87

    Turn Off AutoFilter Mode

    hi

    i have a userform that uses auto filter the filter the search results. I am wondering if someone can show me how to turn the auto-filter off once action (printing) is completed.

    below is the code I am using:

    VB:
    Private Sub CommandButton1_Click() 
        Dim ws As Worksheet 
        Set ws = Sheets("ComplaintData") 
         
        With ws 
            .AutoFilterMode = False 
            With .Range("A1:L1") 
                .AutoFilter 
                If ComboBox1.Value = "Month" Then 
                    .AutoFilter Field:=11, Criteria1:=ComboBox2 
                     
                ElseIf ComboBox1.Value = "Category" Then 
                    .AutoFilter Field:=7, Criteria1:=ComboBox2 
                     
                ElseIf ComboBox1.Value = "Customer" Then 
                    .AutoFilter Field:=3, Criteria1:=ComboBox2 
                     
                ElseIf ComboBox1.Value = "Owner" Then 
                    .AutoFilter Field:=9, Criteria1:=ComboBox2 
                End If 
            End With 
             
            With ws.PageSetup 
                .PrintTitleRows = "$1:$1" 
                .PrintTitleColumns = "" 
            End With 
             
             
            With ws.PageSetup 
                .CenterHorizontally = True 
                .Orientation = xlLandscape 
                .Draft = False 
                .FitToPagesTall = False 
                .FitToPagesWide = 1 
                 
            End With 
             
            With Application 
                .Dialogs(xlDialogPrinterSetup).Show 
                ws.PrintOut 
                ws.Visible = True 
                .ScreenUpdating = True 
            End With 
        End With 
         
        Unload Me 
    End With 
     
    End Sub 
    
    
    Also, I was given a code in this forum to handle the "Item not found" situation. Where would I insert it in this code. If the searched item doesnt exist, then I would like the message box to come up before it shows the printer selection box and if the searched item exists then directly show the printer selection box.....following were the two lines

    VB:
    On Error Goto ErrFindClick 
    
    
    VB:
    ErrFindClick: 
    MsgBox " " & combobox1.Value & " Not Found!" 
    Exit Sub 
    
    
    cheers

    Excel Video Tutorials / Excel Dashboards Reports


  2. #2
    Join Date
    26th January 2003
    Location
    Derbyshire,UK
    Posts
    18,509

    Re: autofilter - turn off

    have you looked at the similar items listed at the top of your Thread. Item 2
    Hope that Helps

    Roy

    For free Excel tools & articles visit my web site

    If I have helped you and you feel like putting your hand in your pocket please make a donation to Children in Need

    RoyUK's Web Site

    royUK's Database Form

    Where to paste code from the Forum

    About me.

  3. #3
    Join Date
    24th January 2003
    Location
    Australia
    Posts
    31,718

  4. #4
    Join Date
    26th January 2003
    Location
    UK
    Posts
    4,684

    Re: autofilter - turn off

    vikrampnz - Do a quick search of OzGrid under my name and key words
    AutoFilter or Filter or Advanced Filter. I have posted lot of codes covering all sorts for this

    jiuk

    Excel Video Tutorials / Excel Dashboards Reports


Thread Information

Users Browsing this Thread

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

Possible Answers

  1. Autofilter Mode On
    By markc in forum EXCEL HELP
    Replies: 5
    Last Post: January 20th, 2007, 20:23
  2. Filter Mode
    By bearcub in forum EXCEL HELP
    Replies: 7
    Last Post: August 9th, 2003, 06:43

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
  •  
porno