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
344to348
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
344to348
344to348
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zahl suchen und dann Zellen kopieren/vba

Zahl suchen und dann Zellen kopieren/vba
04.12.2003 10:35:14
Marc
Hallo zusammen,

ich habe folgendes Problem. Ich habe eine Liste mit drei Spalten (Arbeitsblatt 1). In der ersten stehen Namen, in der zweiten dazugehörige Zahlen und in der dritten steht nochmal Text, der wiederum zu dem jeweiligen Namen gehört. Nun möchte ich in einem anderen Arbeitsblatt (2) aus einer Zele einen Wert auslesen und diesen dann in der Spalte mit den zahlen suchen im ersten Arbeitsblatt. Wenn er gefunden wurde, soll der Inhalt der Zelle der ersten Spalte, gleiche Zeile wie die gesuchte Zahl und der Inhalt der dritten Zeile kopiert und auf dem Arbeitsblatt (2) in dem die Zahl ausgelesen wurde in bestimmte Zellen eingefügt werden.

Würd mich freuen, wenn jemand Rat weiß.

Vielen Dank schonmal.

Gruß

Marc

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

Betreff
Datum
Anwender
Anzeige
AW: Zahl suchen und dann Zellen kopieren/vba
04.12.2003 10:57:31
Thomas 

Sub Suchen_Markieren_Zahl()
On Error Resume Next
Cells.Find(What:="Zahl", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False).Activate
Cells.FindNext(After:=ActiveCell).Select.Activate
Rows(ActiveCell.Row).Select
Selection.Copy
Sheets("Arbeitsblatt2").select
ActiveSheet.paste
End Sub


Ich weis nicht ob es deinen Wünschen entspricht oder ob es Funktioniert, habe leider nicht die möglichkeit es selbst zu testen...
PS.: aus dem Tabellenblatt aus dem du etwas herauskopierst muss markiert sein
musst aber testen

Viele Grüße
Thomas
Anzeige
scheint leider nciht ganz zu funktionieren
04.12.2003 11:57:54
Marc
Hallo,

vielen Dank erstmal für die Hilfe, leider funktioniert es nicht oder ich mache was falsch. Wenn ich im Arbeitsblatt 2 die Zelle mit der Zahl, die im ersten Arbeitsblatt gesucht werden soll markiere und ich es durchlaufen lasse, wird dann die ganze Zeile markiert und kopiert aber in Arbeitsblatt 2. Es sollten aber die Zellen vor und hinter der gesuchten Zahl im ersten Arbeitsblatt kopiert und in bestimmte Zellen im 2. Arbeitsblatt eingetragen werden. Schön wäre es natürlich auch, wenn man die Zelle, die man als "Suchbegriff" auslesen will im 2. Arbeitsblatt nicht erst markieren müsste.

Ich werde mal noch ein wneig probieren.

Vielen Dank für die Hilfe.
Gruß

Marc
Anzeige
AW: scheint leider nciht ganz zu funktionieren
04.12.2003 13:05:35
Karl-Otto Reimann
Hallo Marc
Schau doch 'mal bei Dieter Maj um 11:24
Gruß KO
komme leider nicht klar
04.12.2003 13:42:11
Marc
Hallo,

irgendwie komme ich damit nicht klar.
Vielleicht eins nach dem anderen. Wie kann ich denn per vba den Inhalt einer Zelle in Tabelle 2 auslesen (das ist auf jeden Fall eine Zahl) und in einer variablen ablegen?

Gruß
Marc

326 Forumthreads zu ähnlichen Themen

Formel über VBA in Range.
Tom

Hi,
ich Versuch eine Summenformel
=SUMME(A3:A29)
verzweifelt über VBA dynamisch einzutragen.
Die Summe muss von A bis J eingetragen werden. Jedesmal mit dem entpsrechenden Buchstaben nicht immer mit A.
Hab das so versucht:
For k = 2 To 10 'Range(Cells(k, 29), Cells(...
13.08.2008 11:41:00
Thread-ID: 1001455
4 Beiträge
Anzeige
In Spalte nach Anzahl eines Begriffs suchen?
Lauren

Hall Leute!
ich will nach einem Begriff, in meinem Fall nach "SUMs" in der Spalte C suchen und wissen wie oft es in der Spalte vorkommt.
Bei Berechnungen funktioniert es mit ZÄHLENWENN ohne Probleme aber wie erhalte ich die "absolute" Zahl?
Vielen Dank für Eure Hilfe!
Grüße
...
19.08.2008 11:08:23
Thread-ID: 1002846
5 Beiträge
von Datum bis Datum suchen und Werte in die Spalte
Datum

Hallo liebe Excel-Könner,
ich habe folgendes Problem und finde keine Lösung.
Ich habe in Spalte A von 2006 bis heute Datum stehen, über eine UserForm möche ich in zwei TextBoxen von bis Datum eintragen und in Spalte B in diesem Bereich den WertX.
Ich hoffe Ihr könnt mir helfen!
...
07.09.2008 09:31:20
Thread-ID: 1007931
8 Beiträge
Anzeige
Makro bei Wertänderung in Bereich auslösen
Ulrich

Hallo zusammen,
kann man ein Makro starten, wenn sich in einem definierten Tabellenbereich ein Wert ändert? Wie geht das?
Danke im Voraus und Grüße,
Ulrich
19.09.2008 12:37:58
Thread-ID: 1010993
5 Beiträge
Formel gesucht: Anzahl vesch. Werte in Zellbereich
Martin

Hallo liebe Excelianer,
gibt es eine Formel, die die Anzahl verschiedener Zelleninhalte für einen Bereich ermittelt? Zum Beispiel wenn ich 15 Zellen hätte, in denen 3mal die 5 steht und 12mal die 7 steht. Da ja nur 2 verschiedene Werte in den 15 Zellen stehen, müsste also 2 herauskommen. Nu...
19.09.2008 13:25:00
Thread-ID: 1011022
4 Beiträge
UDF - pos. oder neg. Wert in ausgeblendet. Bereich
Peter

Guten Abend
Ich möchte mit Hilfe einer Funktion (z.B. yWert) abfragen, ob innerhalb einem benannten Bereich (z.B. "Zahlenteil") positive oder negative Werte in ausgeblendeten Zeilen enthalten sind. Falls dies zutrifft, sollte die Rückgabe der Tabellenname sowie die betreffenden Zelladressen...
26.09.2008 21:20:00
Thread-ID: 1012746
4 Beiträge
VBA--Zellen finden/vergleichen/kopieren
Christian

Hallo
einen Beispieldatei ist anbei!!
Bisher konnte ich mit folgendem Code Zellinhalte "täglich" teilen und in neue Zellen kopieren.
Sheets("179").Select Range("B255").End(xlUp).Offset(1, 0).Select ActiveCell.FormulaR1C1 = "=TRIM(LEFT('tägliche Statistik'!R12C6,FIND(""/"",'täglic...
07.10.2008 10:15:00
Thread-ID: 1014634
3 Beiträge
@viele meinungen: spaltenangaben in vba
Herbert

hallo,
wie macht ihr denn das: wenn ich in einem vba-code spaltenangaben mache, und in der tabelle dann spalten einfügen oder entfernen muss, muss ich alle spaltenangaben im code manuell ändern. und wehe, ich vergesse das, dann stimmt das ganze makro nicht mehr.
beispiel:
With Sheet...
08.10.2008 19:41:00
Thread-ID: 1015156
6 Beiträge

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
3
1
4
7
2
4
3
3
2
5
4
4
4
1
25
1
3
5
1
15
4
2
11
4
6