Dzisiaj pokażę antypchełkę, czyli jak nie pisać kodu VBA. Żeby zmieścić się w kategorii "Pchełki", tylko sześć linii.

A czemu zagadka?

Proszę powiedzieć co robi poniższy kod 😉

Sub AntyPchelka()
 Dim lf As Long, Switchh As Long, L0ng As String
 lf = 17
 L0ng = "String"
 If lf = Switch(L0ng = "Long", 0, L0ng = "String", 17, True, 19) Then Debug.Print Switch(Switchh = 0, 9, False, True, True, False)
End Sub

I proszę nigdy, przenigdy nie stosować takiego stylu programowania. No chyba że ktoś ma zapędy sadystyczno-masochistyczne...