waarde variabele in VB

[nobody11]

hoi beste vrienden,

ik heb een technisch VB vraagje

ik laat in een VB code een waarde ingeven via een inputbox, nu, ik wil die waarde graag gebruiken in een formule die ik laat invullen in excel.. maar met onderstaande code krijg ik in excel in cel A1 de formule (h*2), en aangezien excel H niet kent berekent die dat niet.. hoe moet ik die H ook laten kennen aan excel (zonder ze te laten schrijven in een cel?), de optie om gewoon range("A1").formula = h*5 te doen is ook niet echt te verkiezen aangezien de formula in A1
een PMT formule zou zijn waarop k nadien een "goal seeker" op los laat

sub test()
h = inputbox("geef een getal in")

range("A1").formula = "=h*2"

 

[Demeter]

probeer deze eens

sub test()
dim h as integer
h = inputbox("geef een getal in")

range("A1").formula = "=" & h "*2"

 

[nobody11]

probeer deze eens

sub test()
dim h as integer
h = inputbox("geef een getal in")

range("A1").formula = "=" & h "*2"

syntax error..

 

[Finch]

Ik snap de vraag niet helemaal, maar is het dit wat je in gedachte had?

Sub test()
h = InputBox("geef een getal in")

Range("A1").Formula = "=" & h & "*2"
End Sub

Zoniet: Graag verduidelijking wat het gewenste resultaat moet ziijn in cel A1 bij een bepaalde inputwaarde.

 

[Roncancio]

Iets begrijp ik niet helemaal.
Als je via een inputbox een waarde aan H geeft, bijv. 4, dan heb je m.i. geen formule nodig.

Dan zou het dus zo kunnen.

Sub test()

Range("A1").Value = InputBox("geef een getal in") * 2
End Sub

Met vriendelijke groet,


Roncancio

 

[nobody11]

Ik snap de vraag niet helemaal, maar is het dit wat je in gedachte had?

Sub test()
h = InputBox("geef een getal in")

Range("A1").Formula = "=" & h & "*2"
End Sub

Zoniet: Graag verduidelijking wat het gewenste resultaat moet ziijn in cel A1 bij een bepaalde inputwaarde.

dit is idd wat ik zoek bedankt!!

 

[Roncancio]

dit is idd wat ik zoek bedankt!!

Dan gaarne de vraag op opgelost zetten.
Bvd.

Met vriendelijke groet,


Roncancio

 

[nobody11]

Dan gaarne de vraag op opgelost zetten.
Bvd.

Met vriendelijke groet,


Roncancio

tochn og een vraag, het lukt me nog niet volledig,

de code is de volgende:

sub ttest()
h=inputbox("geef je initiele aankoopbedrag in")

range("A2").formula = "=-pmt(3,75%,25*12,&i")

dit lukt niet bij mij.. iemand de oplossing?


edit: ondertussen gevonden

dit is de code voor geinteresseerden:

h = InputBox("geef je initiele aankoopbedrag in")

Range("A2").Formula = "=-pmt(3,75%,25*12," & h & ")"

 

[Demeter]

probeer eens met de macro recorder je formule in eenc el in te vullen.
en dan in je editor de code bekijken en over nemen