2013-09-05 3 views
5

के साथ मेरी एक्सेल वर्कशीट क्वेरी करें क्या वीबीए का उपयोग करके वर्कशीट से पूछना संभव है?वीबीए

data table

मैं समय स्तंभ यानी (00:00) जहां दिन उदाहरण के लिए बराबर होती है में सभी मूल्यों को चुनने के लिए सक्षम होना चाहते हैं: शनिवार

मैं वहाँ यह करने के लिए किसी भी तरह से, एक ट्यूटोरियल वास्तव में सहायक होगा।

धन्यवाद

+1

उपयोग 'AutoFilter' (के रूप में वांछित को फ़िल्टर" दिन "कॉलम, फिर भी" समय "स्तंभ को फ़िल्टर) और उसके बाद '.SpecialCells (xlCellTypeVisible)' विधि का उपयोग करें। –

उत्तर

4

आप programmtically ऑटो फ़िल्टर बना सकते हैं, तो मिलान मानों का चयन करें:

Dim ws As Worksheet: Set ws = ActiveSheet 

With ws 
    .AutoFilterMode = False 
    .Range("1:1").AutoFilter 
    .Range("1:1").AutoFilter field:=2, Criteria1:="=Saturday", Operator:=xlAnd 
    With .AutoFilter.Range 
     On Error Resume Next ' if none selected 
     .Offset(1).Resize(.Rows.Count - 1).Columns(2).SpecialCells(xlCellTypeVisible).Select 
     On Error GoTo 0 
    End With 
    .AutoFilterMode = False 
End With