Datum

Titel

26.04.2024 21:51:33

Idee für Grafik

26.04.2024 21:29:07

PQ zufällige Reihenfolge

26.04.2024 17:18:47

Große Datenmenge in komplexes Diagramm verpacken

26.04.2024 16:22:47

Aktualisierung Verknüpfung bei geschlossener Quelldatei

Du findest keine passende Antwort auf Deine Frage?

Stelle Deine Frage in unserem Live-Forum

Archiv - Navigation

1592to1596

Aktuelles Verzeichnis

Verzeichnis Index

Übersicht Verzeichnisse

Vorheriger Thread

Rückwärts Blättern

Nächster Thread

Vorwärts blättern

HERBERS

Excel-Forum (Archiv)

20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Vorwärts blättern

Inhaltsverzeichnis

Daten aus aktuellster geschl. Datei kopieren

Forumthread: Daten aus aktuellster geschl. Datei kopieren
7 Beiträge zu diesem Forumthread
Anzeige
305 Threads zu ähnlichen Themen
VBA Beispiele zu verwandten Themen

Top 100 Forumthreads

28.11.2017 11:24:23

max

Hi,
Ich bin seit Tagen auf der Suche/probiere auch selbst so gut wie möglich (was nicht viel ist) ein Makro für mein Problem zu schreiben:
Ich muss aus der immer Aktuellsten Datei (wird monatlich neu erstellt und alle 15 min aktualisiert, und Dateinamen variieren) die Daten des Tabellenblatts (Name Variiert von Datei zu Datei) in meine Aktuelle Excel Tabelle (in ein Tabellenblatt("Aktuellwert") kopieren, damit ich Sie von dort aus weiter auswerten kann.
Hat jmd für mich ne Lösung/Hilfe bitte?

7
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Problem klar - Lösungsansatz?

28.11.2017 11:33:31

Phi
AW: Problem klar - Lösungsansatz?

28.11.2017 11:39:08

max
AW: die Datei öffen ...

28.11.2017 11:43:21

Phi
AW: die Datei öffen ...

28.11.2017 11:45:51

max
AW: die Datei öffen ...

28.11.2017 11:52:15

Phi
AW: die Datei öffen ...

28.11.2017 11:57:50

max
AW: die Datei öffen ...

28.11.2017 12:28:35

Phi

AW: Problem klar - Lösungsansatz?

28.11.2017 11:33:31

Phi

@Max:
wenn Dateiname und Sheet-Name wechseln, muss es zumindest Ansatzpunkte geben, wie VBA darauf zugreifen könnte:
- neueste Datei in einem bekannten Ordner: kein Problem
- die Angaben zum Blattnamen reichen nicht
Reichen Deine VBA-Kenntnisse für solche Codes? (neueste Datei, von snb)


myFile = ASCIItoANSI(CreateObject("wscript.shell"). _
exec("cmd /c dir ""c:\temp\*.xls*"" /s/b/od") _
.stdout.readall)(0)

AW: Problem klar - Lösungsansatz?

28.11.2017 11:39:08

max

hi,
sorry, klar.. Ansatzpunkte,

Sub Dateiliste_Neu()
'   Aktuellste Datei feststellen
Dim strVerzeichnis As String
Dim StrDatei As String
Dim I As Integer
Dim StrTyp As String
Dim Dateiname As String
Dim Dateiname_neu As String
Dim Zeit As Date
strVerzeichnis = "C:\Users\ElAu\Desktop\Maxi\Excel\E1 Täglich\"
StrTyp = "*.csv"
Dateiname = Dir(strVerzeichnis & StrTyp)
Dateiname_neu = Dateiname
Zeit = FileDateTime(strVerzeichnis & Dateiname)
Do While Dateiname  ""
If Zeit

das Hab ich mir schonmal zusammenkonfiguriert, aber es gibt mir nur den Namen der aktuellsten Datei aus.. kann man damit mehr anfangen ?

AW: die Datei öffen ...

28.11.2017 11:43:21

Phi

@Max:
wenn der Dateiname bekannt ist, kann die Datei geöffnet werden. Dann bleibt das Problem das Sheet zu finden ...

AW: die Datei öffen ...

28.11.2017 11:45:51

max

Ja, aber ich weis/finde einfach nichts, dass ich mir das so hinbekomme, ich verzweifle hier schon den dritten Tag daran..

AW: die Datei öffen ...

28.11.2017 11:52:15

Phi

@Max:
Öffnen einer xls-Datei


dim WB as Workbook
myPath = >>
myFile = >>
set WB = workbooks.open(myPath & myFile)
>>

AW: die Datei öffen ...

28.11.2017 11:57:50

max

Danke für den Tip!
Aber nun öffnet sich nur die Datei, was ich am liebsten vermeiden würde, da diese automatisch beschrieben wird, und dabei nicht offen sein darf..
Deswegen bräuchte ich den Code dafür das Worksheet aus der geschlossenen Tabelle zu kopieren..

AW: die Datei öffen ...

28.11.2017 12:28:35

Phi

@Max:
es gibt VBS Codes, die recht variabel aus geschlossenen Dateien auslesen und dabei die Vorgängerversion von VBA nutzen. Ein sehr guter Code wurde vor wenigen Tagen gepostet, aber ich werden ihn nicht re-posteten.
Möglichkeiten:
- Datei schreibgeschützt öffnen (read-only)
- Datei kopiere (VBA FileCopy)