Avatar billede hubertus Seniormester
16. juni 2008 - 15:57 Der er 17 kommentarer og
1 løsning

aktivitet ved ændringer af indholdet i flere celler

Hej Experter
Hvordan er det generelt med at få excel til at genberegne ved ændringer på et ark?  Jeg kender godt proceduren Worksheet_change(byval target as range)

Hvor den registrere ændringer med følgende linie:
If target.adress ”$D$12” then

Jeg har brug for at kunne checkee ændringer i flere celler – Hvilke muligheder har jeg?
Avatar billede excelent Ekspert
16. juni 2008 - 16:26 #1
fx.
If Intersect(Target, Range("A1:A20")) Is Nothing Then Exit Sub
eller
If Intersect(Target, Range("A1, A3, A5 ,F8")) Is Nothing Then Exit Sub
Avatar billede hubertus Seniormester
16. juni 2008 - 16:52 #2
Det var jo det jeg søgte - :OO) - tak for hurtigt svar.

Kan man evt. lave en kombination af et range + enkeltceller?
Avatar billede excelent Ekspert
16. juni 2008 - 16:55 #3
jada :-)
If Intersect(Target, Range("A1:A20,B2,C3")) Is Nothing Then Exit Sub
Avatar billede hubertus Seniormester
16. juni 2008 - 19:39 #4
Hejsa - tak for hjælpen!! - dejligt med hurtigt svar- super.
Avatar billede hubertus Seniormester
18. juni 2008 - 16:07 #5
Hej Excelent

Har jeg en mulighed for at validere på om der sker en ændring i det target range som er defineret i nedenstående linie?
If Intersect(Target, Range("A1, A3, A5 ,F8")) Is Nothing Then Exit Sub?

f.eks. om der er sket en ændring i A5?
Avatar billede hubertus Seniormester
18. juni 2008 - 16:42 #6
Jeg har fundet en mulighed:  if target.address = "F8" then noget kode

er der andre muligheder?
Avatar billede excelent Ekspert
18. juni 2008 - 18:25 #7
fx if target.value <>, <, >, = et eller andet
Avatar billede hubertus Seniormester
20. juni 2008 - 06:32 #8
Det lyder rigtigt godt, giver en del flere muligheder Jeg har selv været ved at undersøge om de boolske operatore (AND og OR) virker - men kan ikke få det til at virke. Er det korrekt at de ikke kan bruges?
Avatar billede excelent Ekspert
20. juni 2008 - 14:58 #9
De virker også i vba
Avatar billede hubertus Seniormester
06. juli 2008 - 12:25 #10
Hej igen
Kan man få linien If Intersect(Target, Range("A1:A20,B2,C3")) Is Nothing Then Exit Sub til også at checke for ændringer på et andet ark i samme workbook? Årsag jeg har en dropdown box der har 3 valgmuligheder - resultatet leveres på et andet ark. Jeg vil gerne at en ændring fra dropdownboxen medfører en genberegning af det ark, hvor linen if intersect indgår. Beregningen skal påvirkes af valget.

sætter gerne nogle point på højkant :O) Kan du hjælpe?
Avatar billede excelent Ekspert
06. juli 2008 - 17:10 #11
vi kan da prøve

hvad hedder arket med dropdownbox, hvilken celle ?

hvad hedder arket hvor der testes i Range("A1:A20,B2,C3") ?

genberegning ??? har du manuel beregning ? og hvis er det så kun et bestemt ark der skal genberegnes ?
Avatar billede hubertus Seniormester
06. juli 2008 - 18:43 #12
Super - jeg er glad for at du vil prøve :O)

arket med dropdownboxen hedder beregner og indholdet(altså valgmulighederne) hentes i et ark, der hedder g-data. Cellen hvor valget i dropdownboxen afleveres til hedder A7. Arket hvor der testes på ranget ("A1:A20,B2,C3") hedder beregner. Det er på dette ark genberegningen skal ske.
Min workbook er sat til automatisk genberegning, men det sker ikke før, at jeg har markeret en celle og trykket enter. Det er blot arket beregner, der skal genberegnes.
Jeg har nogle procedure, som levere tal til arket beregner. Disse procedure anvender resultatet af valget i dropdownboxen.
Håber det kastede lidt mere lys over opgaven
Avatar billede excelent Ekspert
06. juli 2008 - 19:02 #13
i hvilken celle er dropdownbox ?

hvad sker der hvis der ændres i Range("A1:A20,B2,C3") ?
Avatar billede hubertus Seniormester
06. juli 2008 - 19:41 #14
Dropdownboxen er et kombinationsbox, hvori man kan vælge mellem 3 destinationer.

I ranget indtastes f.eks. en vægt, som bruges i en funktion.
Avatar billede excelent Ekspert
06. juli 2008 - 20:31 #15
ok kikker på det når jeg får tid
Avatar billede hubertus Seniormester
06. juli 2008 - 20:48 #16
jeg har konstrueret en demo, der viser problematikken. Jeg kan sende den hvis du er interesseret.
Avatar billede excelent Ekspert
06. juli 2008 - 21:30 #17
ja tak det ville være en hel del lettere
pm@madsen.tdcadsl.dk
Avatar billede hubertus Seniormester
06. juli 2008 - 21:47 #18
den er på vej
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