Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Genauen (EINZELNEN!) Wert in Zelle finden/ kopieren
zurück: text mit Sonderzeichen ergänzen weiter: Outlook Email aus Excel - Categorie & Tracking und Signa Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Offen Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
henr.82
Excel- Kenner, VBA Quereinsteiger


Verfasst am:
22. Feb 2013, 16:45
Rufname: Hein
Wohnort: Osnabrück

Genauen (EINZELNEN!) Wert in Zelle finden/ kopieren - Genauen (EINZELNEN!) Wert in Zelle finden/ kopieren

Nach oben
       Version: Office 2007

Hallo Leute,

ich habe diesen COde:
Code:

Sub ml()
Dim Loletzte As Long
Dim RngZ As Range
For Each RngZ In Worksheets("Data").Range("B1:B200")
 Loletzte = Worksheets("Sheet2").Cells(Rows.Count, 1).End(xlUp).Row + 1
 If RngZ Like "2" Then Worksheets("Sheet2").Cells(Loletzte, 1) = RngZ
 Next
End Sub


Diese sucht nach der Zahl "2".

Zwei Dinge bekomme ich nicht hin:

1.- Ich würde gerne verschiedene Kriterien wählen, nach denen gesucht werden soll. Diese verschiedenen Kriterien sollen dann in Spalte F3 bis F7 auf Tabelle3 stehen.

2.- Ich erhalte auch Werte wie bspw. "32" oder "2001" - also Excel sucht nicht nach "EXAKT" dem Kriterium sondern, ob es sich irgendwo drin befindet. (Die einzelnen Zahlen sind durch Komma getrennt). Rolling Eyes

Wäre über Hilfe sehr froh...!

Grüße,
Henri
Gast



Verfasst am:
22. Feb 2013, 16:56
Rufname:


AW: Genauen (EINZELNEN!) Wert in Zelle finden/ kopieren - AW: Genauen (EINZELNEN!) Wert in Zelle finden/ kopieren

Nach oben
       Version: Office 2007

If RngZ = "2" Then Worksheets("Sheet2").Cells(Loletzte, 1) = RngZ


like macht genau das was du beschreibst. Es muss nur ungefähr so sein.

Deshalb like weg und dafür Gleichheitszeichen

Gruß

Stefan
henr.82
Excel- Kenner, VBA Quereinsteiger


Verfasst am:
22. Feb 2013, 18:45
Rufname: Hein
Wohnort: Osnabrück

AW: Genauen (EINZELNEN!) Wert in Zelle finden/ kopieren - AW: Genauen (EINZELNEN!) Wert in Zelle finden/ kopieren

Nach oben
       Version: Office 2007

Hallo Stefan,

danke für deine Hilfe!
Wie ist es, wenn ich verschiedene Werte, und auch mehre Werte gleichzeitig, in einer Zelle suchen möchte?
Rolf-H
Gast


Verfasst am:
22. Feb 2013, 21:05
Rufname:

AW: Genauen (EINZELNEN!) Wert in Zelle finden/ kopieren - AW: Genauen (EINZELNEN!) Wert in Zelle finden/ kopieren

Nach oben
       Version: Office 2007

Hallo Henri,
meinst du es so?
Code:
Sub ml()
Dim Loletzte As Long
Dim RngZ As Range
Dim varWert As Variant
Loletzte = Worksheets("Sheet2").Cells(Rows.Count, 1).End(xlUp).Row
For Each RngZ In Worksheets("Data").Range("B1:B200")
    For Each varWert In Array(1, 4, 7, 11) 'Werte nach denen gesucht werden soll
        If RngZ.Value = varWert Then
            Loletzte = Loletzte + 1
            Worksheets("Sheet2").Cells(Loletzte, 1).Value = RngZ.Value
            Exit For
        End If
    Next varWert
Next RngZ
End Sub

Gruss Rolf
henr.82
Excel- Kenner, VBA Quereinsteiger


Verfasst am:
24. Feb 2013, 20:09
Rufname: Hein
Wohnort: Osnabrück

AW: Genauen (EINZELNEN!) Wert in Zelle finden/ kopieren - AW: Genauen (EINZELNEN!) Wert in Zelle finden/ kopieren

Nach oben
       Version: Office 2007

Hallo Rolf,

danke für deine Hilfe!! Versuche bereits eine Weile mir deinen Code zurecht zu bauen und komme irgendwie nicht so recht weiter... :-/
Ich habe mal eine Mappe angehängt mit Erklärung darin, vielleicht könntest du dir die mal anschauen?

Grüße,
Henri



test.xls
 Beschreibung:

Download
 Dateiname:  test.xls
 Dateigröße:  26 KB
 Heruntergeladen:  18 mal

henr.82
Excel- Kenner, VBA Quereinsteiger


Verfasst am:
28. Feb 2013, 15:48
Rufname: Hein
Wohnort: Osnabrück


AW: Genauen (EINZELNEN!) Wert in Zelle finden/ kopieren - AW: Genauen (EINZELNEN!) Wert in Zelle finden/ kopieren

Nach oben
       Version: Office 2007

... irgend jemand hier eine Idee...?? Rolling Eyes
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: Formatierung Zelle ( Formel ) 5 Gast 1347 01. Sep 2004, 13:19
ae Formatierung Zelle ( Formel )
Keine neuen Beiträge Excel Formeln: Formatierung einer anderen Zelle wenn in der einen ein Text 2 Gast 5007 01. Sep 2004, 11:04
Gast Formatierung einer anderen Zelle wenn in der einen ein Text
Keine neuen Beiträge Excel Formeln: Autom. Farbänderung einer Zelle. 1 Stefan 66 5197 19. Aug 2004, 14:51
fl618 Autom. Farbänderung einer Zelle.
Keine neuen Beiträge Excel Formeln: Suche Zelle nach einem ähnlichem Wert ab... (wildcart) 2 Ranzi 2538 09. Aug 2004, 18:22
icke Suche Zelle nach einem ähnlichem Wert ab... (wildcart)
Keine neuen Beiträge Excel Formeln: manuelle Berechnung von einzelnen Sheets 4 Hopi 1107 08. Aug 2004, 20:24
Robsl manuelle Berechnung von einzelnen Sheets
Keine neuen Beiträge Excel Formeln: Hyperlink per VBA kopieren 1 Gast 1118 03. Aug 2004, 16:57
ae Hyperlink per VBA kopieren
Keine neuen Beiträge Excel Formeln: Kopieren für Anfänger 3 taraniel 2021 29. Jul 2004, 20:36
fl618 Kopieren für Anfänger
Keine neuen Beiträge Excel Formeln: Bei SVERWEIS wird die Matrix mit hochgezählt, beim kopieren. 1 MariaMagda 1606 28. Jul 2004, 14:14
Thomas Ramel Bei SVERWEIS wird die Matrix mit hochgezählt, beim kopieren.
Keine neuen Beiträge Excel Formeln: Text und fortlaufende Nr. in eine Zelle 2 Strebe nach Können 1013 16. Jul 2004, 19:19
Strebe nach Können Text und fortlaufende Nr. in eine Zelle
Keine neuen Beiträge Excel Formeln: Wenn in Spalte A der Wert .... dann die Felder in Spalte B 3 mucky 2520 16. Jul 2004, 08:06
mucky Wenn in Spalte A der Wert .... dann die Felder in Spalte B
Keine neuen Beiträge Excel Formeln: Extrahieren von Text bis zum ersten Semikolon einer Zelle 8 Gast 2949 13. Jul 2004, 18:59
Arnim Extrahieren von Text bis zum ersten Semikolon einer Zelle
Keine neuen Beiträge Excel Formeln: punkt am ende der zelle? 3 marKUSS 1815 08. Jul 2004, 14:26
Gast punkt am ende der zelle?
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: HTML Editor Forum