Avatar billede sgt_hp Nybegynder
31. marts 2009 - 20:22 Der er 3 kommentarer

Makro i Excel (filter)

Hej

Har bøvlet lidt med makroer til Excel 2007.

Har optaget mig til fælgende makro:

Sub Filtrer()
' Filtrer Makro
    ActiveSheet.ListObjects("Tabel1").Range.AutoFilter Field:=19, Criteria1:= _
        "=*Mo*", Operator:=xlAnd
        Range("T12").Select
End Sub

Problemet for mig er dog, at jeg gerne skulle have den til at læse en celle i stedet for at hvor der nu står *Mo*.

Hvordan kan dette lade sig gøre?
På forhånd tak
Avatar billede jkrons Professor
01. april 2009 - 22:36 #1
Prøv med

Sub Filtrer()
' Filtrer Makro
    ActiveSheet.ListObjects("Tabel1").Range.AutoFilter Field:=19, Criteria1:= _
        "=" & Range("a1"), Operator:=xlAnd
        Range("T12").Select
End Sub

Det er ikek testet, da jeg ikke har 2007b hjemme. Regt A1 til den celle, du vil bruge.
Avatar billede sgt_hp Nybegynder
02. april 2009 - 17:30 #2
Det virker.. Tak
Avatar billede jkrons Professor
03. april 2009 - 13:12 #3
Velbekomme :-)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

IT-JOB

Styrelsen for Grøn Arealomlægning og Vandmiljø

Teamleder til Application Management

Capgemini Danmark A/S

Open Application (Denmark)

Politiets Efterretningstjeneste

IT Sikkerhedsarkitekt i PET

Forsvarsministeriets Materiel- og Indkøbsstyrelse

Sektionschef til Cyber Security Guidance ved Cyberdivisionen i Forsvaret

Forsvarsministeriets Materiel- og Indkøbsstyrelse

Ingeniør til Satellitkommunikation