Podaj wynik działania makra:
Sub Makro()
Dim A, B As Integer
Const A1 = 150
Const B1 = 120
If B1 < 150 Then
A = A1 * 0.5
ElseIf B1 > 100 Then
A = A1 + 25
ElseIf B1 < A1 Then
A = A1 + 200
Else
A1 = A1 + B1
End If
Range(2, 3).Value = A1
End Sub
Sub Makro()
Dim A, B As Integer
Const A1 = 150
Const B1 = 120
If B1 < 150 Then
A = A1 * 0.5
ElseIf B1 > 100 Then
A = A1 + 25
ElseIf B1 < A1 Then
A = A1 + 200
Else
A1 = A1 + B1
End If
Range(2, 3).Value = A1
End Sub
More Questions From This User See All
Recommend Questions
mkaminski185
October 2020 | 0 Replies
1. Jakie zagadnienia (trzy elementy) obejmuje technologia informacyjna?2. Jakie elementy znajdują się na płycie głównej komputera – opisz krótko ich funkcje:• procesor:• pamięć RAM:• chipset:• karty rozszerzeń lub kontrolery zintegrowane z płytą główną:• pamięć ROM:3. Jakie urządzenia, obok płyty głównej, mogą znajdować się wewnątrz obudowy komputera?4. Wymień urządzenia zewnętrzne (peryferyjne).5. Co to jest system operacyjny i jak nazywają się najpopularniejsze systemy operacyjne?6. Opisz system plików w systemie Windows.7. Jakie to pliki (formaty plików):• *.exe:• *.pdf:• *.txt:• *.doc:• *.xls:• *.jpg:• *.png:• *.doc:• *.mp3:• *.mp4:
laurasleczka2009
October 2020 | 0 Replies
Ważne. Posłuchajcie mam problem zawsze jak włączam firefox to włącza mi się ta sama strona. Czyli ( Dajmy na to że pisze sobie coś na wordzie i chce poszukąć coś w firefoxie no go odpalam i patrze pierwsza strona jaka mi się otworzy to yt) I nie wiem czego tak się dzieje proszę pomocy.
laurasleczka2009
October 2020 | 0 Replies
Ważne. Posłuchajcie mam problem zawsze jak włączam firefox to włącza mi się ta sama strona. Czyli ( Dajmy na to że pisze sobie coś na wordzie i chce poszukąć coś w firefoxie no go odpalam i patrze pierwsza strona jaka mi się otworzy to yt) I nie wiem czego tak się dzieje proszę pomocy.
piszemy albo:
a) Range("C2").Value = A1
albo
b) Cells(2,3).Value = A1
A teraz przeanalizujmy procedurę If:
Czy B1 (=120) jest mniejsze od 150?
Tak, zatem A=A1*0,5=150*0,5=75
Następne kroki procedury If zostaną pominęte.
Zatem wartość A zostanie ustawiona na 75 (tego nie zobaczymy w arkuszu)
A wartość komórki C2 (3 kolumna, 2.wiersz) zostanie ustawiona na 150, jeśli zmienimy błędny kod w przedostatniej linijce.