Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
968to972
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
968to972
968to972
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Formeln kopieren

Formeln kopieren
11.04.2008 15:08:06
lisa
Hallo zusammen
Ist es möglich Formeln angefangen in I3 bis U3 per Macro kopieren zu lassen soweit wie in Spalte G etwas steht?
Hat hier jemand eine Idee
Liebe Grüße Lisa

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Formeln kopieren
11.04.2008 15:15:00
Jonatan
Hallo,
probier das mal:
Option Explicit

Sub kopieren()
Dim loletzte As Long
'Hier wird geschaut bis wo in Spalte G etwas drinsteht
loletzte = IIf(IsEmpty(Cells(Rows.Count, 7)), Cells(Rows.Count, 7).End(xlUp).Row, Rows.Count)
If loletzte >= 1 Then
Range("I3").AutoFill Destination:=Range("I3:U3")
End If
End Sub


Gruß Jonatan

AW: Formeln kopieren
11.04.2008 15:16:53
Renee
Hi Lisa,

ActiveSheet.Range("I3:U3").Copy _
Destination:=ActiveSheet.Range("I4:U" & _
ActiveSheet.Range("G" & ActiveSheet.Rows.Count).End(xlUp).Row)


GreettZ Renée

Anzeige
AW: Formeln kopieren
11.04.2008 15:17:05
Rudi
Hallo,

Sub tt()
Range("I3:U3").Resize(Range("G65536").End(xlUp).Row - 2).FormulaLocal _
= Range("I3:U3").FormulaLocal
End Sub


Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe

AW: Formeln kopieren
14.04.2008 08:39:09
lisa
herzlichen Dank für die Mühe!
Es klappt super!!
Liebe Grüsse Lisa

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige