wenn dann in makro

• wenn dann in makro von Jürgen vom 08.11.2003 11:42:23
  • funktioniert nicht !! warum? - von Jürgen am 08.11.2003 13:52:53
    • AW: funktioniert nicht !! warum? - von Nepumuk am 08.11.2003 15:28:52

Betrifft: wenn dann in makro
von: Jürgen
Geschrieben am: 08.11.2003 11:42:23
habe ein mit dem makro rekorder aufgezeichnetes makro
an einer stelle kopiert es aus blatt xy aus zelle xy einen wert ( der wert in dieser zelle ist das ergebnis einer funktion, es ist eine zahl, die zelle ist als zahl formatiert )
nun möchte ich händisch in den vba code genau nach diesem kopieren ein prüfung eingeben

wenn dieser kopierte wert gleich null ist
soll sich das makro automatisch beenden
wenn nein soll das makro weiterlaufen


lösung aus frage am 6.11.2003 21.24 uhr funktioniert nicht

Betrifft: AW: wenn dann in makro
von: PeterW
Geschrieben am: 08.11.2003 11:47:12
Hallo Jürgen,

ein Link zu deinem Beitrag wäre schon hilfreich gewesen. :-)
Füge die Zeile ein:
If Wert = 0 then Exit Sub
wobei Wert dein kopierter Wert ist.

Gruß
Peter

Betrifft: funktioniert nicht !! warum?
von: Jürgen
Geschrieben am: 08.11.2003 13:52:53
1. das makro beendet nicht wenn der kopierte wert null ist






Sheets("Tabelle2").Select
Range("E2").Select
Selection.Copy

If E2 = 0 Then Exit Sub

Sheets("Tabelle1").Select
Range("M6:N7").Select
ActiveSheet.Paste
Application.CutCopyMode = False
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("Tabelle2").Select
Range("F2").Select
Selection.Copy

If F2 = 0 Then Exit Sub

usw.

Betrifft: AW: funktioniert nicht !! warum?
von: Nepumuk
Geschrieben am: 08.11.2003 15:28:52
Hallo Jürgen,

If Range("E2") = 0 Then Exit Sub

Gruß
Nepumuk