"einfacher code" geht nicht
20.02.2004 10:44:54
dirk
der code geht leider nicht!
was fehlt denn da?
gruss dirk
Sub tabelle1()
If Sheets("Monats-Umsatzstatistik").Range(B166).Value > 0 Then
Sheets("Monats-Umsatzstatistik").Range(B166) = Sheets("Tabelle2").Range(B14)
End Sub