---

Hallo,
ich habe bereits die Beiträge zu "Daten aus Excel auslesen" durchgeforstet, konnte aber für folgendes Problem keine Lösung finden:

Ich möchte:
1. Eine Exceldatei öffnen
2. Daten auslesen
3. Die Exceldatei wieder schließen

Code:

---

(SETQ vla-shellobj (VLAX-CREATE-OBJECT "Shell.Application"))
(VLAX-INVOKE-METHOD vla-shellobj 'OPEN "C:\\Excel_test.xls")
(IF (SETQ excel (VLAX-GET-OR-CREATE-OBJECT "Excel.Application"))
  ....Daten auslesen....
)
(VLAX-RELEASE-OBJECT excel)
(VLAX-RELEASE-OBJECT vla-shellobj)

---

1. und 2. funktioniert, aber ich weiß nicht, wie ich das Excelfenster wieder schließen kann, hat da einer einen Tip???

------------------
viele Grüße

Jörn

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ich habe eine Lösung dank eines Tips von CADmium, wenn Interesse da ist werde ich es nochmal posten, im Moment ist gerade die Zeit knapp.

------------------
viele Grüße

Jörn

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Jörn,

hab ebenfalls Interesse an diesem Thema, bitte poste doch mal Deine Lösung.

Gruß, Jürgen

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Jürgen,

Code:

---

(SETQ vla-shellobj (VLAX-CREATE-OBJECT "Shell.Application"))
(VLAX-INVOKE-METHOD vla-shellobj 'OPEN "C:\\Excel_test.xls")
(IF (SETQ excel (VLAX-GET-OR-CREATE-OBJECT "Excel.Application"))
  ....daten auslesen....
)
;;;Excel schließen
(vlax-invoke-method
      (vlax-get-property excel "ActiveWorkbook")
      'Close)
  (vlax-invoke-method excel 'QUIT)
  (vlax-release-object excel)
  (gc)
;;;Excel schließen Ende
(VLAX-RELEASE-OBJECT vla-shellobj))

---

------------------
viele Grüße

Jörn

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP