Excel Makro für einen autom.Zeilensprung

Dieses Thema im Forum "Office-Programme" wurde erstellt von AIX, 26. August 2002.

Status des Themas:
Es sind keine weiteren Antworten möglich.
  1. AIX

    AIX Byte

    Registriert seit:
    27. Februar 2002
    Beiträge:
    12
    Hi,
    ich möchte folgendes mit Excel2000 erreichen:

    o In der ersten Zeile der Mappe sollen Überschriften stehen (fix)
    o In der zweiten Zeile stehen Platzhalter, die Daten aus einem
    anderen (Nicht-MS-Programm) an Excel übergeben (realisiert)
    o Nun soll ein Macro auf Knopfdruck die zweite Zeile komplett
    markieren und in die n ä c h s t e freie Zeile kopieren (mit
    dem Befehl "Inhalte einfügen" - "Werte") und speichern und
    schliessen
    o Beim erneuten öffenen der Mappe sollen die Daten aus Zeile 2
    wie oben markiert, kopiert und in nun in Zeile 4 geschrieben
    werden

    Frage: Wie lautet der Befehl "suche die nächste freie Zeile" und kopiere dort per "Inhalte einfügen" - "Werte" die Daten aus Zeile 2??

    Vielen Dank,

    Gruss aus Aachen

    Sascha
     
  2. AIX

    AIX Byte

    Registriert seit:
    27. Februar 2002
    Beiträge:
    12
    Hi Geert!!

    Suuuuuppppi- funktioniert wunderbar!!! Herzlichen Dank und viele Grüsse aus Aachen

    Sascha
     
  3. Geertakw

    Geertakw Kbyte

    Registriert seit:
    25. Februar 2001
    Beiträge:
    418
    Hi

    Wenn es eine Spalte gibt, die immer Inhalt hat ( zur Not eine
    unbenutzte Hilfsspalte:

    Sub transfer()
    anzahl = Worksheets("Tabelle1").Cells(1, 7).Value
    Rows("2:2").Select
    Selection.Copy
    Worksheets("Tabelle1").Cells(anzahl, 1).Select
    Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
    False, Transpose:=False
    End Sub

    In der Zelle 1,7 steht die Formel =Anzahl2(A:A)+2

    Die Formel kann in einer beliebigen unbenutzten Zelle stehen -
    die Referenz im Makro ist dann anzupassen.

    A:A steht für die niemals leere (Hilfs)Spalte.

    Gruß Geert
     
Status des Themas:
Es sind keine weiteren Antworten möglich.

Diese Seite empfehlen