Makro abbrechen
03.05.2018 15:08:47
Azarmin
ich würde gerne in meinem Programm etwas ergänzen und zwar soll das Makro abbrechen bzw nichts mehr machen sobald in einer bestimmten zeile etwas steht (vom ersten Ablauf. Im zweiten Ablauf soll das Makro dann gestoppt werden)
Mein Code
Dim va As String
Select Case Mpltz
Case 1: va = "MP1"
Case 2: va = "MP2"
Case 3: va = "MP3"
Case 4: va = "MP4"
Case 5: va = "MP5"
End Select
Worksheets("AT700").Activate
If Range("G11") "" Then End
// hier wird in Zeile G11 etwas eingefügt, wenn noch nichts in der Zeile steht
Range("G11").Formula = va
With Range("G11")
.Font.FontStyle = "fett"
.Font.Name = "Arial"
.Font.Size = 11
End With
leider funktioniert das aber nicht :(