Office: (Office 2010) GetValue nicht vorhanden oder definiert

Hallöchen,

ich möchte auf Daten einer geschlossenen Exceldatei zugreifen und diese weiter verarbeiten. Dafür habe ich die Funktion GetValue(...), die Parameter Pfadname,Dateiname, Blattname und Zelle hat, gefunden. Die Parameter werden von mir vorher definiert.

Code:

Leider kommt beim Ausführen immer: " Fehler beim kompilieren: Sub oder Function nicht gefunden"

Auch die Hilfe spuckt bei dieser Funktion nicht aus. Als ob es die bei mir nicht gibt.

Hat jemand eine Idee voran das liegt?

:)

 

Hallo,

die Funktion gibt es von Excel nicht.

Vermutlich hast du nach einer solchen Funktion in einem Forum gesucht, dann musst du auch den Code dieser Funktion mit in dein Marko kopieren.
Hier einen solchen Code, den ich gefunden habe:
Code:

Quelle: http://spreadsheetpage.com/index.php...a_closed_file/

Diese Funktion muss zu deinem Makro dazu.
Hilft dir das weiter?

VG

 

Leider wird bei der Ausführung der Laufzeitfehler 13: Typen unverträglich an gezeigt. Aber meiner Meinung nach ist das Ergebnis von GetValue ein Integer oder irre ich mich da?

 

Hallo,

leider gibst du sehr wenige Informationen an, daher kann ich dir nur allgemein helfen.
Die obige Funktion, die ich gefunden habe, ermittelt aus einer geschlossenen Excelmappe einen Wert aus einer Zelle. Zurückgegeben wird also das, das in der Zelle steht. Das KANN eine Zahl sein und MÖGLICHERWEISE eine Ganzzahl (Integer). Es kann aber eben auch ein Fehlerwert sein oder ein Text (String).

Um jetzt zu ermitteln wie dein Fehler entsteht, muss ich überhaupt wissen, wass du versuchst zu erreichen.
Warum rufst du die Funktion auf und welchen Rückgabewert erwartest du? Wie ist dein Makro aufgebaut? Wie sieht die Exceldatei aus, aus der du einen Wert ermitteln willst?

VG

 

Ich möchte aus einer geschlossenen Datei (.csv) zunächst nur einen bestimmten Wert auslesen und witer verarbeiten. Das merkwürdige ist, wenn ich das Macro ausführe ohne die Datei zu verarbeiten öffnen geht es nicht. Wenn die Datei offen ist geht es und wenn die Datei danach geschlossen wird geht es auch aber nur manchmal.

Hier mein Code dazu´
Code:

 

Hallo Name?,

die von Dir verwendete Funktion GetValue ist nicht geeignet, Daten aus einer CSV-Datei (=reine Textdatei!) auszulesen. In einer Textdatei gibt es KEINE Spalten (schon gar keine, die A, B, C.... heißen) und KEINE Zeilennummern. Diese werden erst erzeugt, wenn Excel eine solche Datei öffnet UND einen Spalten- und Zeilentrenner erkennt.

wenn Du die Datei dabei im Excel-Format speicherst, dann bestimmt.
Auch wenn Excel meist als Standard für CSV-Dateien eingerichtet ist, ist dieser Dateityp kein eigentlicher "Excel-Dateityp": Mach die Datei mal mit dem Editor auf, dann wirst Du es bestimmt erkennen.

CSV-/Textdateien kann man aber in der Regel einfach einlesen, z. B. mit dieser Funktion:
VB-Tec / Daten / Dateien / Einlesen - Beliebige Datei einlesen

Danach kann man, wenn man die Trennzeichen kennt, den Text in Zeilen und Spalten aufteilen und weiter verwenden. Beispiele sollten hier zu finden sein.

Ergänzung: Codevorschlag:
Code:

Die Function ReadFile (siehe Link) musst Du noch dazukopieren.

Der Code ist nur deshalb so kurz und kompakt, weil ich mir jegliche Prüfung zur Fehlervermeidung und jede Fehlerbehandlung verkniffen habe. Also wundere Dich nicht über Fehlermeldungen.

Grüße
EarlFred

 

Danke Dein Beispiel funktioniert sehr gut.
Jetz kann ich gut darauf aufbauen.

Allerdings noch ein Kommentar zum vorherigen: Ich habe die .csv in als .xlsx gespeichert. Ich vermute eher das kurz nach dem Schließen die Datei trotzdem noch im Arbeitsspeicher war und deshalb konnte ich noch mit "A12" und co arbeiten.