VBA zum Suchen und Kopieren in Excel

Dieses Thema VBA zum Suchen und Kopieren in Excel im Forum "Microsoft Office Suite" wurde erstellt von HannaTina, 26. Feb. 2015.

Thema: VBA zum Suchen und Kopieren in Excel Hallo Ihr Lieben, ich habe das folgende Problem: Ich habe eine Excel Tabelle mit mehreren Blaettern. Diese...

  1. Hallo Ihr Lieben,

    ich habe das folgende Problem:

    Ich habe eine Excel Tabelle mit mehreren Blaettern. Diese sind jeweils gleich aufgebaut. Es steht in einer Spalte eine Produktbezeichung und in der Nachbarspalte kann ausgewaehlt werden, ob es sich um einen Eilauftrag oder nur eine normale Anfertigung handelt.

    Jetzt moechte ich ein weiteres Blatt einfuegen, in welchem mir ueber ein Makro alle Eilauftraege als Tabelle angezeigt werden.

    In meinem Kopf bin ich so weit, dass das Makro die Spalte A nach dem Wort "Eilauftrag" absuchen soll und wenn es gefunden wird die dazugehoerige Spalte B mit der Produktbezeichung ausgibt, dieses in eine Tabelle schreibt und das fuer alle anderen Blaetter wiederholt.

    Leider bin ich nicht so gut in Programierung und weiss daher nicht wie ich es Excel beibringe :wink:

    Ich wuerde mich super ueber eure Hilfe freuen, da ich hier wirklich verzweifel :bahnhof:
     
  2. @ HannaTina
    , eine Lösung kann ich Dir nur soweit anbieten, da ich den genauen Aufbau Deiner Tabelle nicht kenne, gebe ich Dir folgende Infos zur Hand

    1. Einführung in die Excel-Makroprogrammierung

    2. Excel Programmierung mit V i s u a l B a s i c
     
    Zuletzt bearbeitet: 27. Feb. 2015
  3. Hallo John,

    schon mal vielen Dank dafuer! Ich werde mich da mal durcharbeiten. Bislang bin ich so weit, das ich erstmal versuche aus einem der Blaetter mit Namen "Specials Planning Boards" alle Auftraege (Auftragsname steht in Spalte B) die den Status "Urgent" haben (das steht bei mir in der Spalte D) raus zu suchen und das in einem anderen Blatt ("Backorders") als neue Tabelle ausgeben zu lassen. Mein Code dazu sieht folgendermassen aus, aber da fehlt wohl noch einiges, den er funktioniert nicht :D

    With Worksheets("Specials Planning Boards").Range("D3:D50")
    Set c = .Find(Backorders, LookIn:=xlValues)
    If Not c Is Nothing Then
    firstAddress = c.Address
    Do
    c.Value.Copy
    c.Value.Paste Destination:=Worksheets("Backorders").Range("A8:A55")
    Set c = .FindNext(c)
    Loop While Not c Is Nothing And c.Address <> firstAddress
    End If
    End With

    Danke fuer die Hilfe!
     
Die Seite wird geladen...

VBA zum Suchen und Kopieren in Excel - Ähnliche Themen

Forum Datum
Excel VBA Makro zum suchen eines Textes und anschließend einen Breich zu kopieren Microsoft Office Suite 22. Jan. 2015
Batch suchen und in den %Pfad% kopieren Windows XP Forum 15. Nov. 2012
Batch Dateien suchen und kopieren Webentwicklung, Hosting & Programmierung 4. März 2009
Excel-VBA: Suchen, Markieren & Kopieren Microsoft Office Suite 23. Okt. 2007
Mit dem eingegebenen Product Key ist ein Problem aufgetreten. Versuchen Sie es erneut oder rufen Sie Windows 7 Forum 10. Sep. 2015