Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1116to1120
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
Inhaltsverzeichnis

Autofill per VBA

Autofill per VBA
alex
Irgendwie bekomme ich das Autofill per VBA nicht hin.
Kann mir jemand helfen?
Sub test()
With ThisWorkbook.Sheets(filename)
loletzte4 = IIf(IsEmpty(.Cells(.Rows.Count, 6)), .Cells(.Rows.Count, 6).End(xlUp).Row, . _
Rows.Count)
ThisWorkbook.Sheets(filename).Activate
Range("f" & loletzte4).Select
Selection.AutoFill Destination:=Range("F4:F" & loletzte4 + 1), Type:=xlFillDefault
End With
End Sub

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
.Formula anstatt Autofill
25.11.2009 00:01:21
NoNet
Hallo Alex,
AutoFill über den quellbereich hinaus (loLetzte4+1) funktioniert nicht.
Evtl. genügt Dir auch das Kopieren der Formel/Funktion/Bezug der Zelle in die anderen Zellen des Bereiches :
Sub Ausfuellen()
Dim filename
filename = "Tabelle1"
With ThisWorkbook.Sheets(filename)
loletzte4 = IIf(IsEmpty(.Cells(.Rows.Count, 6)), _
.Cells(.Rows.Count, 6).End(xlUp).Row, .Rows.Count)
ThisWorkbook.Sheets(filename).Activate
Range("F4:F" & loletzte4 + 1).Formula = Range("f" & loletzte4).Formula
End With
End Sub
Gruß, NoNet
AW: .Formula anstatt Autofill
25.11.2009 00:10:18
alex
super
funktioniert
dank dir nonet
Anzeige

105 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige