Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
240to244
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
240to244
240to244
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Wenn Funktion

Wenn Funktion
08.04.2003 12:36:55
Dominik
Hallo!

Ich möchte einen Wert(z.B. 251.14)in Zelle A2 aus einer Excel Datei(z.B. C:\TEST\test.xls) in eine beliebige -freie- Zelle in SpalteA einer zweiten Excel Datei (z.B. C:\251.14\test.xls), welche in einem anderen Ordner hinterlegt ist, per "WENN-Funktion" und SVERWEIS kopieren. Geht das? Und wenn ja, wie?

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Wenn Funktion
08.04.2003 12:42:59
Otto Ecker

Hallo Dominik,

mit "wenn" oder "Sverweis" schaffst Du feste Bezüge / Verknüpfungen. Wenn es tatsächlich um Kopieren geht, dann entweder per VBA oder einfach z.B. über Strg + C / Strg + V

Gruß Otto

Re: Wenn Funktion
08.04.2003 12:50:52
Dominik

Strg + C/Strg + V fällt aus. Tabelle 2 sollte die Daten nach Möglichkeit automatisch aus Tabelle1 übernehmen. Ein Problem was noch hinzukommt ist: wenn der Wert z.B. 251.14 dann befindet sich die Zieltabelle in Ordner14, 251.15 dann Ordner15 usw.
Geht das tatsächlich nur über VBA?

Re: Wie würde das in VBA aussehen?
08.04.2003 13:38:45
Dominik

Ist das ein grosser Programmierungsaufwand?

Re: Wie würde das in VBA aussehen?
08.04.2003 14:02:14
Otto Ecker

Hallo Dominik,

es kommt drauf an, was man daraus macht :-)

set erstesBlatt = workbooks("251.14").worksheets("Tab1")
set zweitesBlatt = workbooks("251.15").worksheets("Tab1")

zweitesBlatt.range("A1").value = erstesBlatt.range("A1").value

als Ansatz. Das Problem mit den Ordnern: lese mit Right(....,2) den jeweiligen Ordner aus und übergebe diesen Wert

also z.B. workbooks.open "c:\Dominik\"&Ordner& Variable & "\dat.xls"

Als Ansatz dürfte das reichen

Gruß Otto



Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige