Telefonszámunk: 1-472-0679

[Resolved] Run-time error 1004 AutoFilter

Kezdőlap Fórumok Excel programozás [Resolved] Run-time error 1004 AutoFilter

Topic Resolution: Resolved
10 bejegyzés megtekintése - 1-10 / 10
  • Szerző
    Bejegyzés
  • #8354
    korczk
    Felhasználó

      Sziasztok!
      A PentaSchool video Excel automatizálás makrók alapjai tanfolyam Munkafolyamat automatizálás fejezet 11. leckénél futottam az alábbi hibába.
      Végig csináltam lépésről lépésre, ahogy Imi megcsinálta a Szures makró fejlesztését, azonban a makró futtatásánál az alábbi hiba üzenetet kaptam, amikor F8-al a Selection.AutoFilter utasítást követő lépés végrehajtásakor.
      Kódrészlet:
      Selection.AutoFilter
      ActiveCell.CurrentRegion.AutoFilter Field:=1, Operator:= _
      xlFilterValues, Criteria2:=Array(1, „5/6/2007”)
      Itt állandóan elszáll a makró:
      „: Run-time error 1004: Range osztály AutoFilter metódusa hibás.”
      A kódom karakterre megegyezik a videoban láthatóval. Az aktív cella a táblázat adattartományán belül van. Kinéztem a szememet, elütöttem-e valamit, de minden stimmel.
      Mi lehet a gond?
      Kösz előre is: Kálmán

      #8355
      horvimi
      Adminisztrátor

        Szia Kálmán!

        Ha még nem derült ki, akkor a válaszodban töltsd fel a makrós fájlt.

        VIGYÁZZ!
        xlsm-et nem lehet feltölteni, de ha zip-eled, akkor már menni fog.

        Addig megkérdezem, hogy milyen Excel verzión, milyen nyelvi beállításokkal dolgozol?

        Ha kiderült.akkor oszd meg velünk a megoldást 🙂

        Imre

        #8356
        korczk
        Felhasználó

          Szia Imi!

          Excel 2016, magyar nyelvű.
          Próbáltam angol nyelvű területen is utána nézni, de semmi.
          A VB selection környékén lehet valami bib, korábban már futottam bele hasonlóba a Select utasítás esetén. Akkor a Select elhagyása lett a kulcs…

          Kösz előre is.
          Kálmán

          Attachments:
          You must be logged in to view attached files.
          #8358
          horvimi
          Adminisztrátor

            Szia!

            Gyorsan megnéztem.
            Természetesen nálam simán lefut 🙂

            Ezt a példát több száz ember megcsinálta már, soha nem jött hibajelzés.

            Ha kikommentezed a dátum szűrést, a második szűrés lefut jól?
            A megoldás munkafüzetben működik?

            Imre

            #8359
            korczk
            Felhasználó

              Szia Imi!

              Igen, kikommentezve a dátum szűrést a második simán lefut!
              Akkor ebből következtetve a dátum forma a szűrőben okozhat galibát.

              Kálmán

              #8360
              horvimi
              Adminisztrátor

                A megoldásban se működik?
                Ha abban sem, akkor nagy valószínűséggel a dátum forma más lehet a gépeden…

                Ha a megoldásban működik, (remélem nem), akkor fogalmam sincs 🙂

                #8361
                korczk
                Felhasználó

                  Szia!
                  A megoldásban sem működik.
                  Windows 8.1, a rövid dátum formám „éééé.hh.nn.”. Talán a pont a végén?

                  #8362
                  horvimi
                  Adminisztrátor

                    Windows 8.1??? Atyaég!

                    Az Excel viszont 2016-os. Ezt a kódot 2010-es verzión sokat futtattam, aztán 2013-on és 2016-on, végül 365-ön is.
                    Nem tudom, hogy mi a baja, valószínű, hogy valami regionális beállítás issue.
                    találtam egy fórum bejegyzést, ahol ugyanez a baj, ott sem tudták megoldani. Tehát legalább nem vagy egyedül a világegyetemben 🙂
                    https://www.ozgrid.com/forum/index.php?thread/1229157-recorded-autofilter-macro-using-array-with-date/&pageNo=1

                    Nálad ez nem fog menni, hacsak valami beállítást nem sikerül megtalálni.
                    Őszintén szólva már vártam ezt a hibát, mert kicsit illékonynak érzem ezt az Array-es megközelítést.
                    Ennek ellenére kb. 10 év alatt nem jött ki

                    Mást kell csinálni, úgy felvenni, hogy 2007 május 1 és 2007 május 31 közöttiekre szűrjön.
                    Felvettem úgy, hogy az autofilter lenyitásakor „Két érték között”-et választottam, és megadtam 2007 május 1 és 31-et.

                    Ezt vette fel:

                    ActiveSheet.Range("$A$1:$I$81").AutoFilter Field:=1, Criteria1:= _
                            ">=2007.05.01", Operator:=xlAnd, Criteria2:="<=2007.05.31"

                    Ezt futtatva nem működött. Nem dobott hibát, de üres fejléc maradt a szűrésnél.

                    Cseréltem erre:

                    ActiveSheet.Range("$A$1:$I$81").AutoFilter Field:=1, Criteria1:= _
                            ">=5/01/2007", Operator:=xlAnd, Criteria2:="<=5/31/2007"

                    Ezzel jó.
                    Nálam.

                    Ha nálad hiba lesz, akkor játszogass a hónap/nap/év sorrendekkel.

                    Imre

                    • A hozzászólás módosításra került: 3 years, 1 month telt el-horvimi.
                    • A hozzászólás módosításra került: 3 years, 1 month telt el-horvimi.
                    #8365
                    korczk
                    Felhasználó

                      Szia Imi!

                      Köszi a fáradtságot, így már működik. 🙂
                      Igazad lesz, angol oldalakon is hasonló megoldásokat javasolnak. Szóval a VB angol, az én excelem magyar, a kettő közötti átjrás nem egyszerű. 🙂
                      Kösz még egyszer! 🙂

                      #8366
                      horvimi
                      Adminisztrátor

                        Nem teljesen.
                        Én ezt már csináltam teljesen angol környezetben, ahol a Windows is és az Excel is angol, és a többi lehetséges vegyes környezetben is. Magánszemélyek,multik dolgozók, stb…

                        Nálad van valami különleges.

                        A VB editor környezet pedig mindenhol angol, vagy inkább úgy fogalmaznék, hogy nincs belőle magyar, mert németet és franciát láttam már…

                        Na mindegy, ezt megjegyzem magamnak. 🙂

                        Imre

                      10 bejegyzés megtekintése - 1-10 / 10
                      • Be kell jelentkezni a hozzászóláshoz.