Probleme mit Worksheet_Change
Betrifft: Probleme mit Worksheet_Change
von: Sebastian
Geschrieben am: 20.08.2004 09:15:25
Hallo,
will ein Makro erstellen, welches die Spalten F:J auf Änderungen überprüft und bei Auftreten dieser den Bereich AM9:CN9 in die betreffende Zeile kopiert, wo sich was geändert hat. Also auch AM.target:CN.target
Danach werden die kopierten Formeln in feste Werte umgewandelt.
Soweit bin ich gekommen, aber makro wird abgebrochen:
Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = "F:J" Then
Range("AM9:CN9").Select
Selection.Copy
Cells(Target.Row, Range("AM:CN")).Select
Selection.PasteSpecial
With ActiveSheet.Range("AM11:CN300")
.Value = .Value
End With
End If
End
Sub
Danke schonmal.
Betrifft: AW: Probleme mit Worksheet_Change
von: harry
Geschrieben am: 20.08.2004 11:01:03
hi,
versteh zwar nicht alles, was dein code so machen soll, aber so funkts bei mir:
Sub Worksheet_Change(ByVal Target As Range)
Dim zeiLe As Long
If Target.Column > 5 And Target.Column < 11 Then
zeiLe = Target.Row
Range("AM9:CN9").Select
Selection.Copy
ActiveSheet.Cells(zeiLe, 39).Select
Selection.PasteSpecial
With ActiveSheet.Range("AM11:CN300")
.Value = .Value
End With
End If
End Sub
liebe grüße,
harry