Bitte Code Vervollständigen.
14.11.2005 06:53:33
Heinz
Habe den unteren Code mittels Recorder aufgezeichnet.Ich glaube er wird aber zu lange,für meine Bedürfnisse.
Ich möchte wenn ich in D7:D37 "Schicht 1" oder "Schicht 2" eingebe das dann in F7:F37 eine 8 eingetragen wird.
Könnte mir bitte jemand helfen ?
Danke Heinz
Range("D7").Select
ActiveCell.FormulaR1C1 = "Schicht 1"
Range("F7").Select
ActiveCell.FormulaR1C1 = "8"
End Sub