Alle Formeln in Range c5:P5 bis Ende kopieren

• Alle Formeln in Range c5:P5 bis Ende kopieren von hp vom 13.10.2003 16:31:22
  • AW: Alle Formeln in Range c5:P5 bis Ende kopieren - von ChrisL am 13.10.2003 16:39:15
    • AW: Alle Formeln in Range c5:P5 bis Ende kopieren - von hp am 13.10.2003 16:53:18

Betrifft: Alle Formeln in Range c5:P5 bis Ende kopieren
von: hp

Geschrieben am: 13.10.2003 16:31:22

Hallo zusammen,

folgendes Problem: Ich möchte in Range(c6:p?)die Formeln aus c5:P5 per VBA ausfüllen.

Für eine Spalte habe ich den Autofill-Befehl. Um in dem ohnehin riesigen Makro die Übersicht zu behalten, möchte ich nicht für jede Spalte den Code erneut hinterlegen.

Ab spalte P:P sind auch noch Daten gepflegt, so daß xlEnd ausfällt.

Kann mir jemand helfen? Ich bin ziemlich under pressure....

habe schon einmal dieses Thema gepostet. Leider läuft folgende Antwort auf den Debugger:

Dim y As Integer
Dim intRow As Integer
intRow = Cells(Rows.Count, 1).End(xlUp).Row
y = intRow
Range("C5:p5").AutoFill Destination:=Range("C6:P" & y), Type:=xlFillDefault

Was mach ich falsch? Oder besser noch: Wie mach ichs richtig?

Danke und Gruß/hp


Betrifft: AW: Alle Formeln in Range c5:P5 bis Ende kopieren
von: ChrisL
Geschrieben am: 13.10.2003 16:39:15

Hi hp

Ändere mal so...

Dim intRow As Long
intRow = Cells(Rows.Count, 1).End(xlUp).Row
Range("C5:p5").AutoFill Destination:=Range("C5:P" & intRow), Type:=xlFillDefault

Anhand von welcher Spalte soll die letzte beschriebene Zeile ausgewählt werden (intRow). Im Moment geschieht dies anhand von Spalte A.

Gruss
Chris




Betrifft: AW: Alle Formeln in Range c5:P5 bis Ende kopieren
von: hp
Geschrieben am: 13.10.2003 16:53:18

Hallo Chris,

Klappt prima! Du hast mir sehr gut geholfen!!!

Danke/hp

Excel-Beispiele zum Thema " Alle Formeln in Range c5:P5 bis Ende kopieren"

Anzeigen von Werten und Formeln		Zeile einfügen und Formeln und Werte übernehmen
Formeln mit Zelladressen speichern		Zeilen mit leeren Formeln beim Druck unterdrücken
Alle Formeln und Links in Werte wandeln		Namen löschen ohne Formeln zu zerstören
Alle Formeln und Zahlen löschen		Spielpaarungen von Vorrunde bis Finale durch Formeln ermitteln
Markierung von Formeln über bedingte Formatierung		Zellschutz nur für Formeln
Blatt ohne Code, Steuerelement und Formeln speichern		Eintragen von Matrixformeln in eine Jahres-/Monatsmatrix
Alle Zellen mit Formeln finden		Blätter in andere Arbeitsmappen kopieren
Module von Mappe zu Mappe kopieren		Arbeitsblatt 40 mal kopieren
Schriftgröße beim Kopieren verdoppeln		Beim Kopieren auch die Zeilenhöhe und Spaltenbreite übernehmen
Tabellencode nach Kopieren des Blattes löschen		Arbeitsmappe blitzschnell kopieren
VBE-Namen der Blattmodule beim Kopieren festlegen		Blattinhalt von einer zur anderen Arbeitsmappe kopieren
Formel bis zur letzten Zeile der Nebenspalte kopieren		Datei kopieren, wenn noch nicht vorhanden
Zeilenweise von Blatt zu Blatt kopieren		Erste Druckseite in eine neue Arbeitsmappe kopieren
Durch DoppelKlick Spalte in zweites Arbeitsblatt kopieren		Teilergebnisse einer Serie von Tabellen in anderes Blatt kopieren
Bei Eintrag in Spalte A aktuelle Zeile kopieren		Filtern und Kopieren
Zeile mit aktiver Zelle in anderes Blatt kopieren		Zeilen in Abhängigkeit des Wertes in Spalte A kopieren
Einen von einer Schlüsselziffer abhängigen Bereich kopieren		Vorgegebene Anzahl von Einträgen in 2. Blatt kopieren
Über InputBox festzulegenden Bereich kopieren		Passwortgeschützte Mappe öffnen, Daten kopieren, schliessen
Tabellenblatt kopieren und dreistellig fortlaufend numerieren		Jede zweite Zelle kopieren
Werte aus UserForm-ComboBox suchen und Fundstelle kopieren		Gruppe von Optionsfeldern kopieren und Makro zuweisen
Nicht zusammenhängenden Bereich in nächste Zeile kopieren		Wert aus UserForm-TextBox suchen und Fundstelle kopieren
Nur sichtbare Zellen in anderes Arbeitsblatt kopieren		Zeile in Abhängigkeit zur Eingabe in Blätter kopieren
Werte prüfen und kopieren		Bei Eintrag von X Zeile in andere Tabelle kopieren
Daten kopieren wenn kein Datum oder Datum > Heute		Blattinhalte dreier Blätter in neues Blatt kopieren
Kopieren und Umbenennen eines Blattes		Nur Zeilen mit bestimmtem Inhalt kopieren
Artikelnummern nach Kriterien suchen und Datensätze kopieren		Bild in zweites Blatt an gleiche Position kopieren
Alle Zeilen ohne Wert in vorgegebener Spalte kopieren		Bei Eintrag Zeile in 2. Blatt kopieren und Tabellen sortieren
Bildergruppe in anderes Blatt kopieren		Bei Eingabe Formel in der Nebenspalte nach unten kopieren
Auswahl in andere Arbeitsmappe kopieren, speichern, schließen		Begriff suchen und Fundzeilen in anderes Blatt kopieren
Aktive Zeile kopieren und löschen		Datensätze, die öfter als 3 mal vorkommen, kopieren
Den jeweils darüberliegenden Wert in Leerzellen kopieren		Alle Zeilen mit einem Suchbegriff in nächstes Blatt kopieren
Dateien listen und Blätter in neue Arbeitsmappe kopieren