-
Fototrend
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
#48745
Fire/SOUL/CD
félisten
Eagl3
#48743
Ide másold a kódot
Private Sub Worksheet_Change(ByVal Target As Range)
Dim MySrcRange As Range
Set MySrcRange = Range("P12")
If Not Intersect(Target, MySrcRange) Is Nothing Then
If UCase(MySrcRange.Value) = "X" Then
If IsNumeric(Range("T12").Value) = True And IsNumeric(Range("U12").Value) = True Then
Range("T12").Value = Range("T12").Value + 2
Range("U12").Value = Range("U12").Value + 2
Else
MsgBox "A(z) T12 és/vagy U12 cella nem számot tartalmaz!"
End If
End If
End If
End Sub -
jerry311
nagyúr
Jó, de az Excel úgy működik, hogy az egyik cellába írsz valamit, a másik cellában lévő képlet pedig kiszámol valamit.
Tehát az utóbbiban kell úgy kialakítani a képletet, hogy valahonnan (mondjuk A1) veszi az alap értéket, amihez hozzá kell adni kettőt, és utána a képlet második fele megnézi, hogy a feltételt tartalmazó cellában (mondjuk B1) van-e X, és ha igen, akkor az értéke 2, ha nem, akkor 0.A1: 12
B1: X
C1:=A1+IF(B1="X",2,0) -
jerry311
nagyúr
Ha jól értem, akkor számolja meg, hogy egy cellában vagy tartományban van-e X és utána a darabszám dupláját írja be számként.
Mondjuk az A1 cellába beírod X, a B1 és B2 cellába meg berakod hogy=countif(A1,"X")*2Ha mondjuk az A oszlopban kell számolni, akkor:
=countif(A:A,"X")*2
Új hozzászólás Aktív témák
Fferi50- Asus ROG Zephyrus G14 - 14"2.8K OLED 120Hz - Ryzen 9 8945HS - 16GB - 1TB - RTX 4060 -2,5 év garancia
- ÁRGARANCIA!Épített KomPhone Ryzen 5 7600X 32/64GB RAM RX 9070 16GB GAMER PC termékbeszámítással
- Samsung Galaxy A33 5G 128GB, Kártyafüggetlen, 1 Év Garanciával
- Huawei Quidway S5324TP-SI-AC - 24G, 4SFP, L2, managed switch
- BESZÁMÍTÁS! Intel Core i9 14900KF 24 mag 32 szál processzor garanciával hibátlan működéssel
Állásajánlatok
Cég: NetGo.hu Kft.
Város: Gödöllő
Cég: Promenade Publishing House Kft.
Város: Budapest