Hirdetés
- Doky586: SecureBoot kulcsok frissítése (2026 nyara)
- Luck Dragon: Asszociációs játék. :)
- f(x)=exp(x): A laposföld elmebaj: Vissza a jövőbe!
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Gurulunk, WAZE?!
- sziku69: Fűzzük össze a szavakat :)
- ricsi99: 6. Genes alaplap tündöklése kontra MS/Zintel korlátozásai
- Graphics: Telefonvásárlási kálváriám....avagy clickbait cím: Horror a hardveraprón
- Parci: Milyen mosógépet vegyek?
- Luck Dragon: Alza kuponok – aktuális kedvezmények, tippek és tapasztalatok (külön igényre)
-
LOGOUT
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
-
-
Lehdog
csendes tag
Hálózati meghajtóról próbálod megnyitni a file-t?
Mert ha igen, és a hálózati meghajtóhoz nincs teljes hozzáférésed (csak a meghajtó bizonyos szegmense van bemap-elve), az okozhat ilyen problémát.
Illetve nézd meg az intézőben az eszközök/mappa beállítások menüben a fájltipusok fülben hogy be van e jegyezve az .xls tipus.Leh
-
-
Ögödej
csendes tag
Ááh, ezer köszönet a segítségért mindkettőtöknek!
Nem lett volna gond, ha extra cellák is felhasználásra kerülnek, de dokar megoldása remek
, csak ki kellett javítani a vesszőket pontosvesszőre és a vastagított részen hiányzott az 1-es elől, hogy ''A2=''
=HA(B1=8,HA(A2=1,8,4),HA(B1=4,HA(1,8,2),
HA(B1=2,HA(A2=1,4,1),HA(B1=1,HA(A2=1,2,1),
''ROSSZ KEZDŐ SZÁM''))))
Tehát végül így néz ki, az én celláimra aktualizálva:
=HA(J7=8;HA(G8=1;8;4);HA(J7=4;HA(G8=1;8;2);HA(J7=2;HA(G8=1;4;1);HA(J7=1;HA(G8=1;2;1);''ROSSZ KEZDŐ SZÁM''))))
Azt nem tudtam én, hogy a HA-kat hogyan kell megfelelően egymásba ágyazni... Meg persze még nagyon sok mást sem tudok.
Még egyszer köszönöm a segítséget! ...és segítőkészségetekkel visszaélve
lehet, hogy nemsokára újra segítséget kérek, egy nehezebb feladatban, amiről eddig azt hittem, hogy nem fog menni a megvalósítása excel-ben, de most felcsillant a remény. 
-
-
lapa
veterán
hát ez ilyen ''hoztam is meg nem is'' jellegű lesz, de nemtok rájönni mi a hányás baja van.
talán valaki más...
röviden: képlettel nekem nem jött össze, gondoltam írok egy fv-t rá.![[kép]](http://lapanet.hu/div/xls/false.JPG "[kép]")
először meg kell adni az értékek tartományát, utána a nevek tartományát, utána a kritériumot (ez az aktuális sorban lévő név), legvégül meg az aktuális sorban lévő magasságot (bár ezt valami ofszet fv-nyel kimazsizhattam volna).
működése (pontosabban nem-működése):
berakja a két tartományt tömbbe, majd végigmegy a tömb sorain. eközben nézi, hogy egyezik-e az éppen látott név az aktuális sorban lévővel. ha igen, akkor egy átmeneti változóba elmenti az addigi maximumot. legvégül pedig megnézi, egyezik-e az aktuális sorban lévő magasság a maximummal. ha igen, akkor TRUE, egyébként FALSE.
szóval ez szép és jó, de a rohadésk nem akar elindulni. biztos csak bénázok, mert kisebb részei működtek a teszt során (példál a bla nevű csoda)...
kicsit kuszák a változók, bocs.
Option Base 1
Dim mimakszarraj, tevagyearraj As Variant
Dim megyek As Long
Dim maksz As Long
Function pistievagy(ByRef mimaksz As Range, ByRef tevagye As Range, ByVal hanyasvagy As String, ByVal paszuly As Long) As Boolean
mimakszarraj = mimaksz
tevagyearraj = tevagye
For megyek = 1 To 9 'UBound(mimaxarraj)
If tevagyearraj(megyek, 1) = hanyasvagy Then
maksz = Max(mimakszarraj(megyek, 1), maksz)
End If
Next megyek
If paszuly = maksz Then
pistievagy = True
Else
pistevagy = False
End If
End Function
'---------------------------------------------------------
Option Base 1
Dim bluraj As Variant
Function bla(ByVal ble As Long, ByRef blu As Range) As Long
bluraj = blu
For i = 1 To blu.Cells.Count
bla = bla + bluraj(i, 1)
Next i
End Function
, csak ki kellett javítani a vesszőket pontosvesszőre és a vastagított részen hiányzott az 1-es elől, hogy ''A2=''
lehet, hogy nemsokára újra segítséget kérek, egy nehezebb feladatban, amiről eddig azt hittem, hogy nem fog menni a megvalósítása excel-ben, de most felcsillant a remény. 
Új hozzászólás Aktív témák
Hirdetés
Fferi50- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem.
- The Elder Scrolls Online Imperial Collector s Edition
- PC Szervizeket, Gépépítőket keresek B2B szoftver partnerségre (E-számlával)
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Játékkulcsok ! : PC Steam, EA App, Ubisoft, Windows és egyéb játékok
- Lenovo ThinkPad X1 Carbon Gen 10 - 27% ÁFÁS (0332)
- Prémium PC házak akár 20-40% kedvezménnyel nagy választékban garanciával/számlával! Upd. 04.27
- Samsung Galaxy A70 / 6/128GB / Kártyafüggetlen / 12Hó Garancia
- Felsőkategóriás Gamer PC-Számítógép! Csere-Beszámítás! Z790 / I5 14600KF / 4070Ti Super / 32GB DDR5
- HIBÁTLAN iPhone 15 128GB Pink-1 ÉV GARANCIA - Kártyafüggetlen, MS4635
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest