Office: Range-Eingabe in einem Makro - wie automatisieren?

Helfe beim Thema Range-Eingabe in einem Makro - wie automatisieren? in Microsoft Excel Hilfe um das Problem gemeinsam zu lösen; Habe ein Makro mit folgemden Inhalt : ... Rows("2:2").Select Selection.Copy Range("A3:A200").Activate ActiveSheet.Paste ...... Dieses Thema im Forum "Microsoft Excel Hilfe" wurde erstellt von cnc-guru, 7. Februar 2008.

  1. cnc-guru Erfahrener User

    Range-Eingabe in einem Makro - wie automatisieren?


    Habe ein Makro mit folgemden Inhalt :
    ...
    Rows("2:2").Select
    Selection.Copy
    Range("A3:A200").Activate
    ActiveSheet.Paste
    ...

    jetzt möchte ich die Angabe A200 durch einen Wert ersetzen den ich vorher aus einer anderen Tabelle ermitteln will (Wert soll sein letzte Zeile mit Inhalt...)
    allerdings weiss ich hier schon nicht mehr weiter Range-Eingabe in einem Makro - wie automatisieren? :oops:


    Habe gerade erst die vba-welt entdeckt und bin noch nicht weit gekommen...
     
    cnc-guru, 7. Februar 2008
    #1
  2. schatzi Super-Moderator
    Hallo!

    Das hier bestimmt die letzte Zelle der Spalte C mit Inhalt:

    Range("C655356").End(xlUp)
     
    schatzi, 8. Februar 2008
    #2
  3. cnc-guru Erfahrener User
    sorry , Missverständnis !

    Rows("2:2").Select
    Selection.Copy
    Range("A3:A200").Activate
    ActiveSheet.Paste

    zum besseren Verständnis :
    mappe1 soll auf die Anzahl der ausgefüllten Zeilen untersucht werden. Dieses Ergebnis soll dann in Mappe2 (die anfangs nur 2 Zeilen enthält, aber später die gleiche Anzahl der Zeilen haben muß wie mappe1) anstatt A200 rein , also bei nur 5 Zeilen A5 ... am besten als Variable , die ich für die anderen Bereiche die ich brauche anstatt d: oder f: eingeben kann.

    viele Grüße Martin
     
    cnc-guru, 8. Februar 2008
    #3
  4. schatzi Super-Moderator

    Range-Eingabe in einem Makro - wie automatisieren?

    Hallo!

    Wenn sich z.B. in A123 der letzte Eintrag befindet, dann ergibt dies dynamisch den Bereich A3:A123

    Range("A3:A" & Range("A65536").End(xlUp).Row)
     
    schatzi, 11. Februar 2008
    #4
  5. cnc-guru Erfahrener User
    hat prima geklappt ,
    auch diesmal vielen Dank für die Hilfe !
     
    cnc-guru, 11. Februar 2008
    #5
Thema:

Range-Eingabe in einem Makro - wie automatisieren?

Die Seite wird geladen...
  1. Range-Eingabe in einem Makro - wie automatisieren? - Similar Threads - Range Eingabe Makro

  2. Excel Range als Bild in Word einfügen

    in Microsoft Excel Hilfe
    Excel Range als Bild in Word einfügen: Hallo, ich möchte gerne per Makro in einem Wordtemplate Mustergrafiken, die als Platzhalter dienen durch Bereiche in meiner Exceldatei ersetzen, die ich als Bild einfüge. Per Hand mache ich das...
  3. SVERWEIS mit Range von bis funktioniert nicht?

    in Microsoft Excel Hilfe
    SVERWEIS mit Range von bis funktioniert nicht?: Hallo, ich komme leider nicht weiter bei meinem SVERWEIS. Spalte A und C werden ausgefüllt. In Spalte B sollte dann der SVERWEIS sein. Leider komm ich mit "von bis" nicht weiter und jedes...
  4. Macro Fehler Subscript out of Range

    in Microsoft Excel Hilfe
    Macro Fehler Subscript out of Range: Hallo Zusammen, ich muesste aus ca. 500 pdf's mit teilweise 90 oder evtl. sogar mehr Seiten, ein paar Daten auslesen. Ich habe ein Makro, dass ich vor Jahren benutzt habe, mit dem ich erst die...
  5. Laufzeitfehler 1004 "Die Methode 'Range' für das Objekt '_Global' ist fehlgeschlagen".

    in Microsoft Excel Hilfe
    Laufzeitfehler 1004 "Die Methode 'Range' für das Objekt '_Global' ist fehlgeschlagen".: Hallo Leute,*:)* nachdem ich in die "addIn 1.2.4" ein Sheet RKL eine Dropdownliste und ein Togglebutton hinzugefügt habe bekomme ich beim aufruf der UF die Fehlermeldung "Laufzeitfehler 1004 "Die...
  6. 2x Worksheet_Change(ByVal Target As Range)

    in Microsoft Excel Hilfe
    2x Worksheet_Change(ByVal Target As Range): Hallo zusammen, ich bin VBA-Anfänger und habe die ersten Codes erstellt. Nun möchte ich 2 von Ihnen, welche einzeln funktionieren, zusammenfügen, so dass beide entsprechend durchgeführt werden....
  7. Turnierdatenbank Punkteausweisung anhand Rang

    in Microsoft Excel Hilfe
    Turnierdatenbank Punkteausweisung anhand Rang: Hallo Habe eine Turnierdatenbank, wo ich aus einem separatem Sheet die entsprechenden Rangpunkte automatisch herauslesen kann und - wenn ich den Rang z.B. 2 eingebe - die Punkte dann auf dem...
  8. Rang.gleich aber mit untersten Rang bei gleichen Werten

    in Microsoft Excel Hilfe
    Rang.gleich aber mit untersten Rang bei gleichen Werten: RANG.GLEICH (Funktion) Beschreibung Gibt den Rang zurück, den eine Zahl innerhalb einer Liste von Zahlen einnimmt. Die Größe ist relativ zu anderen Werten in der Liste. Wenn mehrere Werte dieselbe...
  1. Diese Seite verwendet Cookies, um Inhalte zu personalisieren, diese deiner Erfahrung anzupassen und dich nach der Registrierung angemeldet zu halten.
    Auf dieser Website werden Cookies für die Zugriffsanalyse und Anzeigenmessung verwendet.
    Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.
    Information ausblenden