CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede PGFfyn Mester
01. april 2019 - 08:23 Der er 3 kommentarer og
3 løsninger

VBA og Goal seeking

Hej.
VBA og Excel 2016 og Goal Seeking.

Af gode grunde vil jeg gerne skjule Goal Seeking, og har et problem med at få VBA til skrive/hente Target Value - som skal anføres med tal og desværre ikke en cellereference.
De 2 andre oplysninger til Goal Seeking er cellereferencer, og det kører fint.

Hvordan får jeg VBA til at hente Goal-tallet som brugeren har indtastet i Excel?

På forhånd tak.
Avatar billede kim1a Ekspert
01. april 2019 - 08:41 #1
Hvordan har brugeren indtastet tallet?
Hvis det er i en celle:
Range("cellen").value

Hvis det er en inputboks:
A = inputboksen
Avatar billede finb Ekspert
01. april 2019 - 09:05 #2
Drop goal-seeking i vba, brug:
For x = y to z
  undersøg et-eller-andet
Next x
Avatar billede PGFfyn Mester
01. april 2019 - 10:01 #3
Den er ikke glad for koden Range("C7").Value - kan ikke køre.
Og hvis det ikke kan lade sig gøre må jeg prøve For …
Avatar billede kim1a Ekspert
01. april 2019 - 13:04 #4
Kører vbaen rundt mellem flere ark, måske du skal have filnavn og arknavn med i range?

Kender du til tricket med immidiate vinduet? Du kan sætte en stop på lige inden du kommer til det skridt du vil tage, så kan du i immidiate vindue prøve at skrive:
?range("C7").value

Hvis den melder fejl så er det måske activesheet.range("C7").value
Avatar billede Jan K Ekspert
01. april 2019 - 13:19 #5
Erklær en variabel, fx

Dim Maal as Double '(eller hvilken datatype, du mener er stor nok)

Sæt så variablen til en værdi, fx

Maal = Range("F1").value' (den celle, hvor brugeren taster værdien)

og indsæt Goal i den kodelinje, der kører målsøgningen, altså fx

Range("A3").GoalSeek Goal:=Maal, ChangingCell:=Range("A1")
Avatar billede PGFfyn Mester
01. april 2019 - 16:06 #6
Tak til jer alle - er nybegynder med VBA - har lært en masse af jer, og nu funker det.
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
Stort udvalg af Excel kurser til alle niveauer og jobfunktioner
Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
Vba Array sortering Af Jan Hansen i Excel 2 19/02/202517:39 21/02/202520:03
Fravælge celler til sum Af lurup i Excel 6 19/02/202501:36 19/02/202516:06
Fortsæt i nyt lopslag ved fejl ved det første Af Roland i Excel 3 18/02/202512:58 19/02/202514:51
VBA Excel Af ingeman i Excel 17 12/02/202515:42 14/02/202511:44
Tjekke redigering af delt Excel fil Af cyperbent i Excel 3 06/02/202522:51 08/02/202518:16
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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester



Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 17:34 PC starter ikke op, sort skærm, ingen BIOS Af jonasbang i PC
I går 15:20 Hvordan får man en "Asus Nuc" i gang Af bjarnebif i PC
I går 13:21 Uønskede nyheder på mobil Samsumg S21 (måske via app?) Af Philip Kuhlmann i Browsere
I går 13:10 USB dongle Af Wombat i Andet hardware
21/0217:41 SMS ok eller svindel. Af valby i Diverse
White papers
Flere white papers »


Premium
Teaser billede
Alt om den prisvenlige iPhone 16E: Så god er den i forhold iPhone 16 og 16 Pro
Læs mere »
Derfor ender dine AI-projekter ofte med at blive for dyre: Tre store udfordringer, som det er svært at tackle
Regeringen har sendt brev til den danske it-branche som svar på bekymringer: Og svaret er "stærkt, klart og meget kærkomment," siger branchen
En lille håndfuld cloud-leverandører sidder på 64 procent af det globale marked: Omsætter for flere hundrede milliarder kroner
Se alle »
Computerworld
Teaser billede
Test: En af de bedste elbiler, som du overhovedet kan købe, er fransk
Læs mere »
Test: Verdens vildeste trådløse højttaler trodser naturlovene og udløser et sjældent seks-tal
Selv pc’er fra 2020 efterlades i kulden: Her er de processorer som mister Microsoft Windows-support
Ny Windows-opdatering skaber store problemer for brugerne: Alvorlige fejl
Se alle »
CIO
Teaser billede
Microsoft gør klar til at lukke for WSUS efter 20 år - alle it-admins bør forberede sig
Læs mere »
Tre ud af fire it-projekter løber af sporet og går over budgettet - og det er der en særlig forklaring på
Regioner klar med licens-aftale med Microsoft: Priserne stiger markant
Microsoft indgår syvårig milliardaftale med rådgivnings-gigant – 600 danske ansatte får Copilot-licenser
Se alle »
Job & Karriere
Teaser billede
40 år gammelt dansk it-selskab fusionerer med hollandsk firma og skifter navn
Læs mere »
Her er deres månedsløn: Så meget tjener CIO'erne i de danske regioner - den bedst lønnede får mere end digitaliseringsministeren
Lønninger i den danske it-branche fortsætter med at stige - så meget tjener de danske it-folk i gennemsnit
Nørgaard: I de gode gamle dage havde jeg for vane at fyre alle mine medarbejdere jævnligt
Se alle »
White paper
Teaser billede
Sådan: Opgradér din printerløsning uden store investeringer
Læs mere »
Sikkerhed gjort enkelt: Beskyt din virksomhed direkte i browseren
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »