Avatar billede alen32 Nybegynder
11. november 2005 - 10:42 Der er 2 kommentarer og
1 løsning

Ændring i makroen

Hej!
Jeg har optaget en makro som laver en pivottabel. Makroen funfgerer fint hvis jeg har artikel 400011 med i min datasæt, men hvis den ikke er i datasæt så stopper makro på nedenstående linie.
Kan i hjælpe mig med at lave sådan noget: " hvis artiklen 400011 eksisterer så artiklen.visible=false"

With ActiveSheet.PivotTables("Pivottabel2").PivotField("Artikel")
.PivotItems("400011            Betfor sække (25 kg)").Visible = False
Avatar billede bak Forsker
11. november 2005 - 11:27 #1
du får lige den nemme måde

On Error Resume Next
With ActiveSheet.PivotTables("Pivottabel2").PivotField("Artikel")
.PivotItems("400011            Betfor sække (25 kg)").Visible = False

On Error Goto 0
Avatar billede alen32 Nybegynder
12. november 2005 - 13:34 #2
Det virker! men jeg har kun brugt "On Error Resume Next" , skal jeg også have med " On Error Goto 0"
Send et svar.
Avatar billede bak Forsker
13. november 2005 - 21:30 #3
On error goto 0 bruges til t sætte vba's fejlfanger til normal igen.
Dette sker også automatisk ved End Sub, så hvis dette er i slutning af makroen skulle der ikke være noghet problem, der er bare mest korrekt at bruge :-)
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