Aktywne Wpisy
mirko_anonim +5
✨️ Obserwuj #mirkoanonim
Od 4 lat jestem w związku z dziewczyną teraz vl22, w grudniu się oświadczyłem . Problem polega na tym, że przed oświadczynami mieliśmy takie same podejście do życia - do dzieci, tego że chcemy mieszkać w domu, który postawimy z możliwie najmniejszym kredytem, tego jakie mamy wartości, kompletna zgodność. Niestety po oświadczynach sytuacja się skomplikowała.
Trochę (nie)istotnych rzeczy nas różni - przede wszystkim zarobki (moje 3x większe niż jej),
Od 4 lat jestem w związku z dziewczyną teraz vl22, w grudniu się oświadczyłem . Problem polega na tym, że przed oświadczynami mieliśmy takie same podejście do życia - do dzieci, tego że chcemy mieszkać w domu, który postawimy z możliwie najmniejszym kredytem, tego jakie mamy wartości, kompletna zgodność. Niestety po oświadczynach sytuacja się skomplikowała.
Trochę (nie)istotnych rzeczy nas różni - przede wszystkim zarobki (moje 3x większe niż jej),
Aokx +99
źródło: GJJHq3iWkAAF3IA
Pobierz
Aktywne Znaleziska
Sub PetlaDoWhile()
Do While ActiveCell.Value <> "ZSRR"
If ActiveCell.Value = "ZSRR"
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = "Tak, to jest ZSRR"
ActiveCell.Offset(0, -1).Select
End If
ActiveCell.Offset(1, 0).Select
Loop
End Sub
#vba
Bo masz błąd składniowy.
If ActiveCell.Value = "ZSRR" Then
Że już nie wspomnę o tym, że ten if jest zbędny.
Przecież while Ci już sprawdza ten warunek.
A nawet gorzej. Ten warunek w ifie nigdy nie będzie spełniony.
Sub PetlaDoWhile()
Do While ActiveCell.Value = "ZSRR"
ActiveCell.Value = "ZSRR"
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = "Tak, to jest ZSRR"
ActiveCell.Offset(0, -1).Select
ActiveCell.Offset(1, 0).Select
Loop
ActiveCell.Offset(1, 0).Select
End Sub
ActiveCell.Value = "ZSRR"
Sprawdzasz, czy w komórce jest ZSRR, po czym wpisujesz ZSRR.