Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1308to1312
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1308to1312
1308to1312
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA Zelleintrag auf verschiedenen Tabellen und kop

VBA Zelleintrag auf verschiedenen Tabellen und kop
18.04.2013 13:36:06
Hans
Hallo.
Mein Problem.
Ich möchte in Tabelle 1 in Spalte B Zahlen mit Zahlen in Tabelle2 in Spalte D vergleichen und bei übereinstimmung das Datum in Tabelle2 in Spalte E kopieren und in Tabelle1 in Spalte A einfügen.
Wäre schön wenn mir da jemand helfen kann und es auch bisle beschreibt was der Code ausführt/bewirkt.
Vielen Dank.

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

Betreff
Datum
Anwender
Anzeige
AW: VBA Zelleintrag auf verschiedenen Tabellen und kop
18.04.2013 13:44:53
Klaus
Hi,
dazu braucht es keinen Code, das geht per WENN-Formel:
in Tabelle1!A1 folgende Formel und runter kopieren:
=WENN(Tabelle1!B1=Tabelle2!D1;Tabelle2!E1;"")
Grüße,
Klaus M.vdT.

AW: VBA Zelleintrag auf verschiedenen Tabellen und kop
18.04.2013 14:56:55
Klaus
Hi,
du hast im anderen (falschen) Thread gefragt, ob man das auch per Makro statt per Formel lösen kann.
Klar kann man:
Sub MakroLoesung()
Dim lRow As Long
With Sheets("Tabelle1")
lRow = .Cells(.Rows.Count, 2).End(xlUp).Row
.Range("A1:A" & lRow).FormulaR1C1 = "=IF(Tabelle1!RC[1]=Tabelle2!RC[3],Tabelle2!RC[4],"""")"
.Range("A1:A" & lRow).Value = .Range("A1:A" & lRow).Value
End With
End Sub
Ich seh aber den Vorteil zur Formellösung nicht.
Grüße,
Klaus M.vdT.

Anzeige
AW: VBA Zelleintrag auf verschiedenen Tabellen und kop
18.04.2013 15:17:54
Hans
Sorry für Eintrag in falschen Thread.
Könntest Du den Code noch etwas erläutern was was tut?
Anbei mal meine Tabelle.
https://www.herber.de/bbs/user/84935.xls
Vielen Dank.
Ich möchte das Tabellenblatt Tabelle 1 in das ich mir noch mehr Daten über andere Codierung hole anschließend nach beendigung über eine Code bereinigen. Somit wäre Formel dann auch weg.

AW: VBA Zelleintrag auf verschiedenen Tabellen und kop
18.04.2013 15:26:05
Klaus
Hi,
warum sind denn die Bereiche in deiner Mustertabelle völlig anders als in deiner Aufgabe aus Thread 1?
Anbei der angepasste Code mit Kommentaren:
Sub MakroLoesung()
'schreibt Datums hin, wenn Werte gleich
'Dimensionierung
Dim lRow As Long
'Im ersten Tabellenblatt
With Sheets("Tabelle1")
'ist das die letzte Zeile
lRow = .Cells(.Rows.Count, 3).End(xlUp).Row
'schreibe in A6 bis A-letzte Zeile die Formel aus Beitrag 1
.Range("A6:A" & lRow).FormulaR1C1 = "=IF(Tabelle1!RC3=Tabelle2!RC2,Tabelle2!RC7,"""")"
'überschreibe die Formel mit Werten
.Range("A6:A" & lRow).Value = .Range("A6:A" & lRow).Value
End With
End Sub
Grüße,
Klaus M.vdT.

Anzeige
AW: VBA Zelleintrag auf verschiedenen Tabellen und kop
18.04.2013 15:43:24
Hans
Versteh ich nicht Deine Frage. Die Angabe war doch im ersten Thread genau so beschrieben.
In Tabelle2 sind meine Positionen und die dazugehörigen Termine. In Tabelle1 nur die Positionen. nun will ich jeder Position wenn enthalten in Tabelle 1 ein Datum zuweisen.Dieses der Position zugehörige Datum mag ich gerne in Spalte H Schreiben.
Vielen Dank für Deine Mühen.
Ich glaub das schau ich mir heut Abend nochmal an.
Seh grad gar nix mehr.

AW: VBA Zelleintrag auf verschiedenen Tabellen und kop
18.04.2013 15:53:48
Klaus
Hallo,
im ersten Beitrag schreibst du:
das Datum in [..] in Tabelle1 in Spalte A einfügen.
jetzt schreibst du:
Dieses [...] Datum mag ich gerne in Spalte H Schreiben
Da hat es sich doch von A auf H geändert.
im ersten Beitrag schreibst du
in Tabelle 1 in Spalte B Zahlen
in deiner Mustertabelle sind in Tabelle1 aber nur in Spalte C Zahlen.
in Tabelle2 in Spalte D
aber in der Mustertabelle stehen nur in Spalte B Zahlen
das Datum in Tabelle2 in Spalte E
und in der Mustertabelle stehen die Datums dann in G ... und dann schreibst du noch:
Die Angabe war doch im ersten Thread genau so beschrieben.
Was ist mit deinem Excel los? Kyrillische Spaltenbezeichnungen vielleicht? Ich bin dann raus aus der Nummer.
Grüße,
Klaus M.vdT.

Anzeige
AW: VBA Zelleintrag auf verschiedenen Tabellen und kop
19.04.2013 08:27:36
Matze
Hallo Hans,
warum eigentlich Code?
In H6 = Sverweis($C6;Tabelle2!$B$6:$H$262;6;Falsch) und nach unten kopieren.
Bei nicht vorhanden Zahlen kommt die #NV , das kann auch durch "" oder anderen Text geändert werden.
Mit Code: in ein Modul (abgeänderte Zeilen von Klaus)
Option Explicit ' muss über den Code
Sub MakroLoesung()
Dim lRow As Long
With Sheets("Tabelle1")
lRow = .Cells(.Rows.Count, 3).End(xlUp).Row
.Range("H6:H" & lRow).FormulaR1C1 = "=VLOOKUP(RC3,Tabelle2!RC[-6]:R[256]C[-1],6,FALSE)"
.Range("H6:H" & lRow).NumberFormat = "dd.mm.yyyy"
End With
End Sub
Matze
Anzeige

332 Forumthreads zu ähnlichen Themen

Zellinhalt aus anderer Tabelle übernehmen
Marc

Hallo zusammen,
habe ein Problem mit dem ich einfach nicht weiterkomme (wahrscheinlich für Euch kein Problem...!)
Ich möchte aus einer Tabelle Zellinhalte in eine andere Tabelle im gleichen Arbeitsblatt übernehmen, d.h. aus Tabelle 2 soll der Zellinhalt aus D61 in Tabelle 1 in H60 über...
21.08.2008 22:08:00
Thread-ID: 1003658
3 Beiträge
Anzeige
Daten sortiert aus anderem Tabellenblatt auslesen
Robert

Hallo,
bräuchte eure Hilfe bitte.
Aus einem Tabellenblatt ("FEHLZEITEN") sollen Daten ausgelesen und in einem anderen Tabellenblatt ("EINSATZPLANUNG") ab Zeile 100 eingefügt und bei Änderungen in "FEHLZEITEN" aktualisiert werden.
Habe da mal eine Beispieldatei zur besseren Veransch...
28.08.2008 11:32:00
Thread-ID: 1005356
3 Beiträge
Zeile mit Werten aus anderer Tabelle vergleichen
onkelbobby

Hi,
ich versuche folgendes in meine Datei einzubauen.
Tabelle 2 enthält Adressdaten und eine Infospalte. In diese Infospalte kann der Wert "S" oder der Wert "A" eingetragen werden.
In Tabelle 1 sind auch diverse Adressdaten gepflegt. Alle Adressen in Tabelle 1 sind auch in Tabelle 2...
29.08.2008 10:37:00
Thread-ID: 1005722
3 Beiträge
Anzeige
Cursor auf anderes Blatt springen lassen
KlausF

Schönen Freitag-Morgen Leute!
In einer Datei kontrolliere ich in Tabelle 20 errechnete Werte. Entsprechen diese nicht meinen Vorstellungen, so muß ich in Tabelle 1 in der korrespondierenden Zelle (d.h. die mit der gleichen Adresse wie die aktuelle Zelle in Tab.20) Korrekturwerte eingeben.
26.09.2008 08:02:06
Thread-ID: 1012475
3 Beiträge
Übertrag auf anderes Blatt
Sankt

Hallo ,
erstmal vielen Dank für Eue Hilfen.
Ich würde gerne bei folgendem Blatt von der jeweiligen unteren Zelle einen Übertrag auf die Obere Zelle machen. Wie es normal geht weiß ich.
Meine Frage ist nun kann ich den Wert übernehmen wenn ich das Blatt kopiere.
https://www.herb...
02.10.2008 14:42:14
Thread-ID: 1013889
3 Beiträge
Übertrag auf anderes Blatt
Sankt

Hallo,
ich habe diese Frage schon einmal gestellt aber leider komme ich mit der Antwort nicht zurecht.

Ich möchte gerne aus ein Zelle November M47 den Wert in Dezember D9 übernehmen.
Normal würde es funktionieren mit ='November 2008'!M47. Man könnte nun ganz einfach die Stunden...
06.10.2008 11:50:21
Thread-ID: 1014393
7 Beiträge
Text aus einer Zelle in ein anderes Tabellenblatt
grigolet

Hallo,
ich erstelle gerade eine Arbeitsmappe in der auf verschiedenen Tabellenblättern die gleichen Namen erscheinen sollen (aus dem Blatt 'Verhandlungsergebnis' sollen die Personendaten der Beteiligten in ein erstelltes Vertragsformular übernommen werden). Ich habe das z.B. mit = gelöst. J...
09.10.2008 11:24:26
Thread-ID: 1015295
2 Beiträge
Übertrag auf anderes Blatt
Sankt

Hallo
ich habe da ein kleines Problem.
Ich benutze folgende Formel
=INDIREKT(""&WAHL(MONAT(A1)-1;"Januar";"Februar";"März";"April";"Mai";"Juni";"Juli";"August"; "September";"Oktober";"November";"Dezember")&"!D9")
die funktioniert auch so weit ganz gut.
Nun habe ich...
03.11.2008 16:50:00
Thread-ID: 1021376
7 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
7
2
2
1
2
2
6
1
6
2
6
19
2
4
1
8
4
1
1
4
4
3
8
5