cel verwijzing

[karimba]

Hallo

Ik heb een olie vullen programma die met een parameters opgestart kan worden en nu wil ik vanuit cel A1 het aantal liters ophalen.
Ik heb als voorbeeld 10 (het aantal letters) in de code ingevuld en het werkt perfect

Shell "d:\Engine\OilTest\Oiltest.exe vullen 10 Start", vbNormalNoFocus

en het olieprogramma vult automatisch 10 liter.


wat ik nu wil, is een code die verwijst naar de cel A1 om het aantal liters te krijgen.

Shell "d:\Engine\OilTest\Oiltest.exe vullen Cel verwijzing Start", vbNormalNoFocus

wie kan mij hierbij helpen?


Alvast dank

 

[edmoor]

Ik zie nergens een Excel document, dus hoe wil je daar dan uit lezen?
Gebruikt dat programma een Excel object waarin een document wordt geopend?
M.a.w., daar is geen zinnig woord over te zeggen zonder de source code van dat programma te zien.

Als je die opdracht vanuit VBA in Excel geeft dan kan je dit proberen:

Shell "d:\Engine\OilTest\Oiltest.exe vullen " & Range("A1").Value & " Start", vbNormalNoFocus

 

[karimba]

als eerst dank voor je reactie.

Ik gebruik Excel om het olievulprogramma te openen en tegelijkertijd wordt het vulproces uitgevoerd volgens de hoeveelheid die in het blad RPM op cel A1 wordt aangegeven.
zie bijlage voor een voorbeeld.

 

[edmoor]

En je hebt wat ik in #2 liet zien al getest?
Uiteraard maak je er dan dit van: Sheets("RPM").Range("A1").Value

 

[karimba]

Hallo Edmoor


Ik heb de code uitgeprobeerd die je aangaf en helaas werkt deze niet.
maar als ik de celverwijzingscode verander in een nummer, werkt het wel.

Shell "d:\Engine\OilTest\Oiltest.exe vullen 10 Start", vbNormalNoFocus

wat doe ik verkeerd? of het ligt aan de vulprogramma?

 

[edmoor]

Ik ken dat programma niet dus weet ook niet welke parameters deze gebruikt.
Wat ik liet zien is syntactisch goed.

En "werkt niet" is altijd tekort door de bocht.
Vertel wat er wel gebeurd.

 

[snb]

Als

Shell "d:\Engine\OilTest\Oiltest.exe vullen 10 Start", vbNormalNoFocus

werkt

moet

Shell "d:\Engine\OilTest\Oiltest.exe vullen " & val(Range("A1")) & " Start", vbNormalNoFocus

ook werken, tenzij in cel A1 geen getal staat.

Welke parameters het exe programma accepteert kunnen wij zonder verdere informatie niet beoordelen.
Waarom een extern programma wordt aangeroepen is evenmin duidelijk.
De hele gang van zaken in VBA uit laten voeren lijkt me eenvoudiger.

 

[karimba]

Goedenavond,

Super bedankt !!!!!!! dit heeft met goed resultaat gewerkt de code gaf exact aan wat ik wou.

Super bedankt voor jullie help.:thumb::thumb::thumb::thumb::thumb::thumb: