Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1032to1036
1032to1036
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Kopieren in eine Datei mit unbekannten Namen

Forumthread: Kopieren in eine Datei mit unbekannten Namen

Kopieren in eine Datei mit unbekannten Namen
14.12.2008 23:35:21
Hans
Hallo, bauche schon wieder euere Hilfe.
Nachfolgendes Makro wird in der Test1.xls ausgeführt. Es kopiert Werte von "test2.xls nach test1.xls. Soweit so gut.
Windows("Test2.xls").Activate
Application.Goto Reference:="Daten1"
Selection.Copy
Windows("Test1.xls").Activate
Range("A1").Select
ActiveSheet.Paste
Nur jetzt habe ich folgendes Problem:
Die Datei "Test1.xls" kann auch einen andern Dateinamen haben.
Das heißt der Code "Windows("Test1.xls").Activate" muß fariabel gestalltet sein, oder einfacher gesagt, er muß nach dem "Copy" wieder in die Datei zurückspringen, aus der das Makro gestartet wurde.
Wie macht man sowas ?
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
siehe ThisWorkbook owT
15.12.2008 00:08:00
Uduuh
AW: siehe ThisWorkbook owT
15.12.2008 10:45:22
Hans
Hallo,
kannst du mir das genauer Erklären, ich komm nicht drauf?
AW: siehe ThisWorkbook owT
15.12.2008 11:17:14
Rudi
Hallo,
Thisworkbook.Activate
aktiviert die Mappe mit dem Makro, egal wie sie heißt.
Gruß
Rudi
Anzeige
AW: siehe ThisWorkbook owT
15.12.2008 12:01:58
Hans
Hallo Rudi,
Hab jetzt folgenden Code:

Sub test()
Windows("Test2.xls").Activate
Application.Goto Reference:="Daten1"
Selection.Copy
ThisWorkbook.Activate
Range("A1").Select
ActiveSheet.Paste
End Sub


Funktioniert aber nicht, was ist da falsch?
Bin leider noch nicht so gut in VBA

Anzeige
AW: siehe ThisWorkbook owT
15.12.2008 13:58:00
Rudi
Hallo,
aus meiner Sicht:

Sub Test()
Workbooks("Test1").xls").Sheets("Tabelle1").Range("Daten1").copy _
Thisworkbook.Sheets("Tabelle1").Range("A1")
End Sub


Gruß
Rudi

AW: siehe ThisWorkbook owT
15.12.2008 14:16:00
Hans
Hallo,
nein funktioniert nicht.
Kannst du dir Bitte meine Aufgabenstellung nochmal duchlesen, ich glaub du verwechseltst da was.
Bitte um Hilfe
Anzeige
DeinHirn.Activate owT
15.12.2008 23:46:00
D.Saster

Forumthreads zu verwandten Themen

Mappe mit variablen Dateinamen aktivieren
Peter

Hallöchen an alle,
wie kann man eine geöffnete Mappe über workbooks.activate oder windows.activate ansprechen, ohne dass man den vollen Dateinamen kennt.
Dateiname = "Auftragskennzahlen(*).xls"
Das * steht für eine Zahl, die mir nicht bekannt ist, sondern von einer Web-Datenbank ver...
07.08.2008 17:27:58
Thread-ID: 1000047
4 Beiträge
Öffnen mehrer Dateien mit gleichen Namen
Ryu

Hallo!
Wenn ich irgendwelche Exceldateien öffne und anschließend noch eine andere mit dem selben Namen (Wenn ich z.B. das Original bei mir behalte und die korrigierten von Kollegen bekomme), dann ist es so, dass entweder die zweite Datei automatisch umbenannt und geöffnet wird oder es wird...
27.08.2008 18:02:00
Thread-ID: 1005168
3 Beiträge
Anzeige
Liste mit Arbeitsblattnamen
Christian

Hallo Forum,
ich habe in einer Exceldatei mehrer - viele Arbeitsblätter, die, da sie importiert wurden, sehr unterschiedliche Namen haben, wie z.b. Apfel, Spargel, Schrauben, Ausfall......0,123 5,38 usw.
Um Daten aus diesen Blättern zusammenführen zu können benötige ich in einem Arbei...
28.08.2008 10:35:00
Thread-ID: 1005327
8 Beiträge
Anzeige
Bilddatei mit neuem Namen speichern
egonkernien

Hallo wer hilft bitte?
Guten Abend.
Ich möchte eine Dialogbox aufrufen, dort eine Bilddatei auswählen.
Ich möchte diese Bilddatei in ein Image1 auf einer Userform laden. Z.B. D:\Daten\Bilder\DSC0011.jpg
Dann diese Bilddatei umbenennen in D:\Daten\Test\082008_01.jpg, abspeichern...
28.08.2008 22:32:28
Thread-ID: 1005608
5 Beiträge
Datei öffnen Abfrage nach Dateinamen mit Userform
lisa

Hallo zusammen.
Ich hab die gleiche Frage in einem älteren Thread von mir gerade eben gestellt.
Ich weiß aber nicht ob diesen noch jemand liest, da ich die Frage nicht auf, noch offen gestellt, habe und ihn auch nicht in Beiträge von heute finde.
Also wenn doppelt, bitte nicht böse...
04.09.2008 14:23:00
Thread-ID: 1007419
5 Beiträge
Namen mit Konstante: funktioniert nicht!?
Jens

Hallo liebes Forum,
leider mag mich Excel mal wieder nicht:
Folgende Formel funktioniert zwar:
=ANZAHL2('Mein_Blatt'!6:6)
und liefert den richtigen Wert, aber ich möchte die Formel nach unten kopieren; dabei wird der Wert 6 inkrementell erhöht, was aber nicht passieren soll.
11.09.2008 16:58:00
Thread-ID: 1009181
4 Beiträge
In Zelle mit Namen schreiben
fga

Hallo
Ich habe ein Tabellenblatt. In dem Blatt habe ich für die Spalten einen Namen definiert. Ebenso für die Zeilen. (links oben im Namensfeld)
Z.B.:
..... Sh1 Sh2 Sh3
Rh1
Rh2
Rh3
Nun möchte ich über den Namen der Zeile und Spalte die betreffende Zelle lesen,...
08.10.2008 15:27:04
Thread-ID: 1015078
12 Beiträge
Email Ergänzing, Adresse CC
Karel

Hallo Forum,
habe in diese Forum unterstehende Email VBA code gefunden.
AUF tabelleblatt Mailadresse stehn ab A2 sten untereinander alle Emailadresse
Wie kann ich Emailadresse als CC genau so abfragen auf Tabelleblatt mail adressen ab Zelle C2
Option Explicit
Sub Serien_E...
23.10.2008 19:45:00
Thread-ID: 1018786
7 Beiträge
Probleme mit Namen für Formel und Vba
Reinhard

Hallo Wissende,
die Datei: https://www.herber.de/bbs/user/56243.xls hat nach Klick auf den Button die nachfolgende Tabelle:
Die Berechnung in Spalte C ist korrekt, so soll es aussehen, also pro Stunde nur einen Wert, Rest 0.
Da die Originaldatei alle 65536 Zeilen ausgenutzt hat, e...
24.10.2008 13:28:00
Thread-ID: 1018986
6 Beiträge
Probleme mit Namen / Funktion
born2b@gmx.de

Guten Morgen,
bei angehängter Datei bekomme ich beim Speichern immer die
Meldung "Der Name Dms360 steht in Konflikt mit einer gültigen
Bereichsbezeichnung oder ist für Exel ungültig. Der Name
wurde durch _Dms360 ersetzt".
Dms360 ist eine selbstdefinierte Funktion. Ich fi...
05.11.2008 10:34:00
Thread-ID: 1021784
2 Beiträge
Probleme mit Namen / Funktion
born2b@gmx.de

Guten Morgen,
bei angehängter Datei bekomme ich beim Speichern immer die
Meldung "Der Name Dms360 steht in Konflikt mit einer gültigen
Bereichsbezeichnung oder ist für Exel ungültig. Der Name
wurde durch _Dms360 ersetzt".
Dms360 ist eine selbstdefinierte Funktion. Ich fi...
05.11.2008 11:01:00
Thread-ID: 1021795
2 Beiträge
Email Hyperlinke mit Betreff aus Dateiname&Registe
Patrick

Hallo miteinander
Ich versuche von der Excel Tabelle eine Email über einen Email Hyperlink zu starten. Diese Email soll automatisch im Betreff den Dateinamen der Exceltabelle und den Namen des aktiven Tablellenblattes/Registers enthalten.
Geht das und wie heisst der Hyperlink dazu ?
...
07.12.2008 15:18:33
Thread-ID: 1030869
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige