CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

u.l.johansen Praktikant

15. marts 2011 - 19:18 Der er 2 kommentarer og
1 løsning

Makro målsøgning

Har brug for lidt hjælp til en makro, som kan eksekvere omkring 70 målsøgninger.

Beregningen skal ske på hver enkeel kolonne.
I række 1 står der f.eks 1,0, som er den variable i målsøgningen
I række 2 til 50 står der en formel som ganger med tallet i række 1
I række 51 er der en sum af række 2 til 50
I række 52 er et fast tal på hvad summen i række 50 skal give.

Det vil sige at opgaven går ud på først at lave en målsøgning i kolonne 1, derefter i kolonne 2, osv

Jeg kan sende et eksempel i excel, hvis det skulle hjælpe.

Ulrick

Synes godt om

u.l.johansen Praktikant

15. marts 2011 - 22:05 #1

Det er måske nemmere at forstå opgaven, hvis jeg viser en makro som virker, men som bør kunne optimeres ved noget loop.

Sub Målsøgning()
'
Range("C13").GoalSeek goal:=Range("C14"), changingcell:=Range("C3")
Range("D13").GoalSeek goal:=Range("D14"), changingcell:=Range("D3")
Range("E13").GoalSeek goal:=Range("E14"), changingcell:=Range("E3")
Range("F13").GoalSeek goal:=Range("F14"), changingcell:=Range("F3")
Range("G13").GoalSeek goal:=Range("G14"), changingcell:=Range("G3")
Range("H13").GoalSeek goal:=Range("H14"), changingcell:=Range("H3")
Range("I13").GoalSeek goal:=Range("I14"), changingcell:=Range("I3")
Range("J13").GoalSeek goal:=Range("J14"), changingcell:=Range("J3")
Range("K13").GoalSeek goal:=Range("K14"), changingcell:=Range("K3")
Range("L13").GoalSeek goal:=Range("L14"), changingcell:=Range("L3")
Range("M13").GoalSeek goal:=Range("M14"), changingcell:=Range("M3")

End Sub

Synes godt om

u.l.johansen Praktikant

16. marts 2011 - 09:06 #2

Efter at have testet ovenstående, så opdager jeg nu at makroen ikke altid kan finde en løsning, fordi jeg i alle mine formler har afrundet til nærmeste heltal.
Kan man tilføje et maks antal iterationer eller acceptere at Goalseek bare skal ramme indenfor +/- 3 stk eller noget i den stil.
Håber virkelig at nogen kan hjælpe.

Synes godt om

u.l.johansen Praktikant

21. marts 2011 - 23:04 #3

Opretter ny tråd med yderligere præcisering

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

Excel kurser

Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Skal have Excel til at registrere årsskifte Af CBH i Excel	1	I går 14:23	I går 19:10
fremskrivning af data Af L_Amtoft i Excel	2	I går 10:25	I går 14:44
Lås ark Af Bent i Excel	8	14/01/202515:11	I går 08:38
Hjælp til VBA og kalender Af HHA i Excel	9	14/01/202509:47	14/01/202516:37
Udregne tal med 4 decimaler i excel Af jthyge i Excel	5	11/01/202515:32	13/01/202516:44

Se alle spørgsmål i kategorien Opret spørgsmål

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

Alle kategorier på Eksperten

Seneste artiklerRSS