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

Werte von Ausgangs in Eingangsdatei übertragen

Forumthread: Werte von Ausgangs in Eingangsdatei übertragen

Werte von Ausgangs in Eingangsdatei übertragen
10.07.2014 10:09:44
Ausgangs
Hallo,
Ich möchte bestimmte Werte von einer Excel-Ausgangsdatei in eine Excel-Eingangsdatei einlesen. Dabei soll die Ausgangsdatei möglichst nicht (aktiv) geöffnet werden. Also die Ausgangsdatei ist für die Anwendung uninteressant, ich möchte einfach nur bestimmte Werte aus dieser Datei in meine Eingangsdatei einlesen.
Wie mache ich das? Vor allem mit dem öffnen der Workbooks?
Am einfachsten ist natürlich Workbooks(1).Sheets(1).Cells(x,y)=Workbooks(2).Sheets(2).Cells(x,y)
Dazu müssen aber beide Datein geöffnet und im selben Ordner sein. Wie mache ich das unabhängig?
Gruß

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Werte von Ausgangs in Eingangsdatei übertragen
10.07.2014 10:13:07
Ausgangs
Hallo,
Dazu müssen aber beide Datein geöffnet Ja
und im selben Ordner sein Nein
Gruß
Rudi

AW: Werte von Ausgangs in Eingangsdatei übertragen
10.07.2014 10:23:15
Ausgangs
Ja okay, du hast Recht. Aber wie geschrieben. Möchte ich nicht die Ausgangsdatei öffnen (zumindest nicht so, dass der user dass öffnen extra öffnen muss, bzw. überhaupt merkt, dass die Datei geöffnet ist

Anzeige
AW: Werte von Ausgangs in Eingangsdatei übertragen
10.07.2014 10:35:02
Ausgangs
Hallo,
sowas? 
Sub aaa()
Dim wksAus As Worksheet, wksEin As Worksheet
Const cstrAus As String = "c:\test\Ausgabe.xlsx"
Const cstrEin As String = "c:\test\Eingabe.xlsx"
Set wksAus = Workbooks.Open(cstrAus).Sheets("Daten")
Windows(wksAus.Parent.Name).Visible = False
Set wksEin = Workbooks.Open(cstrEin).Sheets("Daten")
'mach was
wksAus.Parent.Close False
End Sub

Gruß
Rudi

Anzeige
AW: Werte von Ausgangs in Eingangsdatei übertragen
10.07.2014 14:31:47
Ausgangs
Vielen Dank. Aber das wksEin brauche ich eigentlich nicht, da der Code in der "wksEin" Datei ist oder? Mein Code sieht folgendermaßen aus:
` 
 Dim wksAus As Worksheet
Const cstrAus As String = "C:\***\Daten.xlsm"
Set wksAus = Workbooks.Open(cstrAus).Sheets("Tabelle1")
Windows(wksAus.Parent.Name).Visible = False
ThisWorkbook.Cells(1, 2).Value = wksAus.Cells(1, 2)
wksAus.Parent.Close False
Aber das mit dem "mach was" passt noch nicht so ganz. Wie übertrage ich da einen Wert?

Anzeige
AW: Werte von Ausgangs in Eingangsdatei übertragen
10.07.2014 15:17:20
Ausgangs
Hallo,
ThisWorkbook.Cells(1, 2).Value = wksAus.Cells(1, 2)
Ein Workbook hat keine Zellen.
ThisWorkbook.WorkSheets(1).Cells(1, 2).Value = wksAus.Cells(1, 2)
Gruß
Rudi

Forumthreads zu verwandten Themen

Adresse des letzten Wertes einer Tabelle?
Moni

Hallo,
ich habe ein Problem, dass ich zum Teil mithilfe des Forums hier schon lösen konnte. Nur ein kleines Stückchen fehlt mir noch.
Zur Situation:
Ich habe eine Tabelle mit einer Spalte (C5:C221) in der ich jeden Tage einen Wert eintrage, bis die Tabelle irgendwann mal voll ist. I...
13.08.2008 14:11:59
Thread-ID: 1001534
9 Beiträge
Werte in anderes Tabellenblatt übertragen
Bibo

Hallo liebe EXCEL-Freunde,
ich habe in der Online-Suche leider kein Makro gefunden, das ich mit meinen minimalen VBA-Kenntnissen hätte selbständig auf meine Problematik anpassen können und bitte Euch deshalb um Eure Hilfe.
In das Tabellenblatt "Kommission" der Beispielmappe, das als Har...
31.08.2008 17:54:00
Thread-ID: 1006231
4 Beiträge
Anzeige
Werte in Tabelle schreiben
uw

Hallo,
ich habe in einer Tabelle die Tagessummen, die in eine andere Tabelle übertragen werden sollen.
In dem Beispiel sind die Daten in dem Blatt "Ausgangstabelle".
Diese Tabelle wird jeden Tag aktualisiert.
In jedem neuen Monat steht wieder in Zelle "B2" der Monatserste.
P...
17.12.2008 16:58:50
Thread-ID: 1033661
6 Beiträge
Werte einfügen aus Array in Tabelle mehrere Rows
chris

Hallo VBA Profis,
eine frage würde mich sehr über Hilfe freuen.
Dafür bedenke ich mich im vorraus.
ich habe den Code unten und will die Daten aus dem Array meArea2
in ein Tabellenblatt einfügen ab der zeile 2 also A2
Aber irgendwie schaffe ich es nicht.
habe es schon mi...
15.01.2009 10:13:00
Thread-ID: 1039973
9 Beiträge
Werte aus allen Tabellen in ein Tabelle zusammenfü
Kurt

Hallo Zusammen,
ich möchte gern alle Werte aus den vorhandenen Tabellen in eine Tabelle eingelesen werden.
Es dürfen nur nicht aus der "Muster + Alle" Tabelle, geht das per Makro?
Aus folgenden Zellen sollen alle Werte addiert in die "Alle" Tabelle reingesetzt werden.
D17 + D17<...
16.01.2009 16:14:00
Thread-ID: 1040622
10 Beiträge
Werte in Tabelle eintragen
fred


Hallo zusammen
Ich habe eine Arbeitsmappe mit ca 50 Tabellenblättern. Im Sheet Namensliste Im Bereich C9 bis C59 sind Namen eingetragen. Jeder dieser Namen ist ein Name eines Sheets. Ich möchte jetzt gerne für meine Diagramme Werte aus diesen Sheets in Tabelle 1 eingetragen haben.
...
18.01.2009 22:23:00
Thread-ID: 1041281
3 Beiträge
"Bedingte Formatierung" kopieren
Susanne

Hallo,
wenn ich unter Excel 2007 die bedingten Formatierungen von Zelle A1 via Innhalte einfügen auf Zelle A2 kopieren, werden die dort eventuell vorhandenen bedingten Formatierungen (im Gegensatz zu Excel 2003!) nicht automatisch gelöscht bzw. überschrieben.
Wie ersetze ich bei Excel 2...
08.02.2009 20:33:51
Thread-ID: 1048473
5 Beiträge
Combobox in tabelle einfügen mit werten
chris

Hallo mal wieder,
bitte bei diesem Problem um Hilfe.
Mit dem unten stehendem Code will ich in Tabelle1 Zeile 1 Comboboxen erstellen lassen.
Das klappt auch.Nur wenn ich jetzt diese zeile mit laufen lassen
Call test
Dann kommt ein fehler.
Laufzeitfehler 9 . Index auserhal...
13.02.2009 10:35:00
Thread-ID: 1050388
7 Beiträge
listbox werte in tabelle suchen
kirsche

hallo leute,
und wieder komme ich nicht weiter und brauche eure hilfe.
ich befülle eine listbox mit den daten aus einer hilfstabelle. nun werden über multiselect werte ausgewählt. über commandbutton1 schreibe ich diese werte in einen 2. tabelle, welche übersicht heißt. das funktioniert...
16.02.2009 12:03:00
Thread-ID: 1051097
3 Beiträge
alles bis auf bedingte formatierung kopieren
Tobias

Ahoi Super-Gurus!
WksRemote.Cells(i, 2).Copy Destination:=WksLocal.Cells(i, 2)
hiermit kopiere ich von zelleninhalte & kommentare von blatt 1 zu blatt 2,
bin jetzt aber draufgekommen das mir auch die bedingten formatierungen mitkopiert werden.
wie kann ich das verhindern?
13.03.2009 22:04:53
Thread-ID: 1060055
6 Beiträge
werte in tabelle suche
kirsche

hallo leute,
mal wieder stehe ich vor einem problem und hoffe auf eure hilfe.
ich möchte über eine userform daten nach bestimmten kriterien von einer tabelle in eine andere übertragen. das klappt mit meinem makro auch schon ganz gut, leider nur solange die reihenfolge des suchbegriffs b...
22.03.2009 20:51:26
Thread-ID: 1062708
3 Beiträge
Zahlenwerte automatisch in Tabelle anzeigen lassen
Bine

Hallo liebe Excel Helfer,
ich steh mal wieder vor einem Problem und habe im Archiv leider nix hilfreiches gefunden:
Ich habe folgendes Makro zur Zeichnung von Rechtecken:
Sub Makro1() start: On Error Resume Next Dim a, b, c, d As Integer Dim zelle As Range a = InputBox("Geben Si...
27.03.2009 11:55:53
Thread-ID: 1064556
6 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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