Too many line continuations
Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Makro og VBA
Forum beskrivelse: Hjælp til Makroer og VBA-programmering
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=3680
Udskrevet den: 04.Maj.2024 kl. 20:55
Emne: Too many line continuations
Besked fra: bryst
Emne: Too many line continuations
Posteringsdato: 16.Nov.2018 kl. 14:38
|
Hej forum. Forsøger at indspille en makro, som 1) nulstiller al filtrering 2) filtrerer kolonne A således at rækker hvor celleværdien er 0 fravælges. men får fejlen "too many line continuations". En som kan hjælpe ? På forhånd tak :-)
|
Svar:
Besked fra: Mads32
Posteringsdato: 20.Nov.2018 kl. 18:04
|
Hej Prøv at /topic662.html - uploade din fil, så vil jeg se på det. Du kan også sende den på privat mail.
|
Besked fra: Ib Hansen
Posteringsdato: 21.Nov.2018 kl. 08:05
|
Jeg forstår ikke, du får den fejl Den her makro er indspillet... Men først - I kolonne A skrev jeg først tallene 1 - 10 nedad. - Så kopierede jeg tallene og indsatte dem til og med kolonne E.
- Så slettede jeg nogle af tallene i kolonne A, så der blev tomme pladser. - Så mærkede jeg række 1 op og lavede "Filter" på hele rækken. - Så filtrerede jeg kolonne E, til kun at vise 10-tallet. Herefter startede jeg "Indspil makro". - Så fjernede jeg filtreringen i kolonne E, så alle rækker åbnede. - Så filtrerede jeg kolonne A, så de "tomme" ikke blev vist. - Og så afsluttede jeg indspilningen med "Stop indspilning". Så åbnede jeg makroen. - Kopierede koden og indsatte den på en button på siden og så kører den uden problemer.
Jeg har ændret lidt i koden, ved at sætte den til $E$65000, så den filtrere ned til række 65.000. Hvis du vil udvide eller reducere antal kolonner der skal filtreres, skal du selv ændre $E$, til den kolonne / det bogstav, der skal filtreres til. Og så skal du sætte Field:=5 til det antal kolonner der er henad. Det virker uden problemer for mig
 ------------- Excel 2010 Dk og 2019 Dk på samme computer. Bruger dog stadig mest 2010.. Men sådan er der jo så majet :o) |
Besked fra: bryst
Posteringsdato: 22.Nov.2018 kl. 08:37
|
Hej med jer. Mange tak for hjælpen. Jeg fik det løst med denne:
Det minder vist meget om din løsning også (så vidt jeg kan se ud fra min beskedne viden om makroer)
 |
Besked fra: Ib Hansen
Posteringsdato: 22.Nov.2018 kl. 12:54
|
Jeg kan så til gengæld ikke få din kode til at virke. Når du bruger - ActiveSheet.ShowAllData - kræver det, der allerede er filtreret i en af kolonnerne. Hvis ikke, vil VBA komme med en fejl (en BUG). Og når du har 0 med til sidst i den nederste linje - ActiveSheet.Range("$A$9:$O$504").AutoFilter Field:=1, Criteria1:="<>0" - Sorterer den ikke. Du skal undlade 0'et til sidst - ActiveSheet.Range("$A$9:$O$504").AutoFilter Field:=1, Criteria1:="<>" "<>" er lavet med "Indspil makro" og det er filterets måde at beskrive, at de "tomme celle" ikke skal vises. Ellers ved jeg ikke rigtigt, hvad det er, du ønsker koden skal gøre
------------- Excel 2010 Dk og 2019 Dk på samme computer. Bruger dog stadig mest 2010.. Men sådan er der jo så majet :o) |