zu 99% auf "Select "verzichten?
23.09.2005 22:18:41
HansH
kann mir jemand sagen, wie ich hier "zu 99% auf Select verzichten" kann?
Private Sub Landesbezirk()
Range("E10:P10").Select
Selection.ClearContents
Range("F6").Select
ActiveCell.FormulaR1C1 = "Land"
Range("E9:P9").Select
ActiveCell.FormulaR1C1 = "Niedersachsen"
Range("C12").Select
ActiveCell.FormulaR1C1 = "Gasse 9"
Range("C14").Select
ActiveCell.FormulaR1C1 = "30159 Hannover"
Range("F1").Select
End Sub
Gruß
HansH