Zelle variabel gestalten
23.08.2002 14:57:40
Marc
Ich habe wahrscheinlich eine eher leichte Aufgabe für euch ;O)
Ich möchte in diesem code die Zelle H2:H3 variabel gestalten.
Sub link()
Dim anzahlzeilen As Integer
Range("a1").Select
Set tbl = ActiveCell.CurrentRegion
anzahlzeilen = tbl.Rows.Count
variable1 = ActiveCell.Offset(anzahlzeilen - 1, 7).Select
Selection.AutoFill Destination:=Rang("H2:H3"), Type:=xlFillDefault
End Sub
Hoffe bzw. glaube ihr könnt mir helfen.
mfg Marc