Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Dateiname in Zelle / Nichtexceldatei öffnen

Dateiname in Zelle / Nichtexceldatei öffnen
29.09.2005 11:23:00
Ulf
Hallo,
ich hätte noch eben zwei (sicherlich eigentlich ganz simple) Probleme:
1: Ich lasse per Makro eine neue Exceldatei öffnen, dann werden Daten hineinkopiert, man kann einen Namen für die Datei eingeben und die Datei wird gespeichert und geschlossen.
Wie kann ich dabei den eingebenen Namen in eine Zelle derselben neuen Datei schreiben lassen?
2: Wie kann ich über den Klick auf eine Schaltfläche (die hab ich schon) eine bestimmte Nichtexceldatei öffnen? Also mit Makro zuweisen, das ist klar, aber wie müsste der Makrocode dann aussehen?
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Dateiname in Zelle / Nichtexceldatei öffnen
29.09.2005 11:44:46
u_
Hallo,
1) sheets(1).cells(1,1)=NeuerName
2) siehe Shell-Funktion
Gruß
Geist ist geil!
AW: Dateiname in Zelle / Nichtexceldatei öffnen
29.09.2005 11:55:12
Ulf
Das war mir leider etwas zu knapp...
Könntest Du das einem VBA-Neuling wie mir etwas ausführlicher erklären?
Danke!!
AW: Dateiname in Zelle / Nichtexceldatei öffnen
29.09.2005 12:10:05
u_
Hallo,
hier mal ein Beispiel

Sub speichern()
Dim NeuerName As String
NeuerName = InputBox("Speichern unter?")
If NeuerName <> "" Then
With ThisWorkbook
.Sheets(1).Cells(1, 1) = NeuerName
.SaveAs ThisWorkbook.Path & "\" & NeuerName & ".xls"
.Close
End With
End If
End Sub


Sub datei_oeffnen()
Dim Datei As String
Datei = Shell("C:\Programme\Microsoft Office\Office10\winword.exe n:\test\test.doc")
End Sub
Gruß
Geist ist geil!
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige