Supportnet / Forum / Tabellenkalkulation

Guten Morgen! Vielleicht kann mir jemand weiterhelfen. Ich erzeuge aus einem Programm eine "temporäre" Excel-Datei. "Temporär" = Datei wurde noch nicht gespeichert, bekommt jedoch standardmäßig einen Dateinamen der ~ beinhaltet. Beispiel: ~17.xls Nun möchte ich gerne sämtliche offenen Excel-Dateien auf den Dateinamen ~ hin überprüfen. Falls es eine Datei mit ~ im Namen gibt, sollen aus dem ersten = einzigen Blatt (Blattname = Dateiname --> ~17) die Werte in eine andere (bereits offene) Mappe, Blatt Rohdaten kopiert werden. Läßt sich das umsetzen? Wünsche bereits jetzt ein schönes Wochenende! Tom

Hallo Tom,

zum prüfen folgender Ansatz, der angepast werden muss.

Dim BoOffen As Boolean
BoOffen = False
For Each x In Workbooks
If x.Name = "Auftragsplanung Übersicht.XLS" Then
Workbooks("Auftragsplanung Übersicht.XLS").Save
BoOffen = True
Exit For
End If
Next
If BoOffen = False Then Workbooks.Open Filename:=StNetz & "Auftragsplanung Übersicht.XLS", Password:=StDatei

Gruß Hajo

Hallo Hajo!

Danke, dass Du Dich meiner Problemstellung angenommen hast!

Werde mir den Code am Wochenende mal durch den Kopf gehen lassen.

Kurz noch eine Frage:
Wie kann ich im (temporären) Dateinamen auf ~ prüfen?
Gibt es in VBA quasi einen Befehl wie finden/suchen?

Tom

hallo Tom,

du kannst dir einfach mal die Hilfe zur DIR-Funktion ansehen.

Das is ganz easy...

Gruß Leo

• Suchen und Ersetzen
• Excel Fernbezüge
• wie übernehme ich daten von einer mappe in ne andere mappe?
• WENN-Formel
• suchen und überschreiben