Hirdetés
- sziku69: Szólánc.
- gerner1
- Klaus Duran: HP wifi nyomtatás+ win11.
- Luck Dragon: Asszociációs játék. :)
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
- droidic: [Memory Leak] Az agy defragmentálása
- sziku69: Fűzzük össze a szavakat :)
- Brogyi: CTEK akkumulátor töltő és másolatai
- eBay-es kütyük kis pénzért
- Magga: PLEX: multimédia az egész lakásban
-
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
-
#50526
Magnat
veterán
Lasersailing
#50490
Magnat
veterán
válasz
Lasersailing
#50490
üzenetére
Szia,
bakker hogy nem ütötte ki a szememet, nagyon köszi
-
Magnat
veterán
Üdv,
rosszul emléxem, h régebben volt valamelyik Excel verzióban olyan lehetőség, h ha egy oldalra akarok mindent kinyomtatni, akkor szélességben és magasságban is ki tudta maxolni az oldalt úgy, h a szükséges irányba torzította is a nyomtatási területet? Excel 2021-ben kellene ilyet csináljak, de nem találok ilyen opciót sajnos...
-
Magnat
veterán
válasz
Fferi50
#49978
üzenetére
Igen, mondjuk a Text amiatt is necces, h ott mindig azt kapod ami éppen ki van írva, szóval ha össze van nyomva a cella és nem fér ki a valós tartalom, akkor a textben sem lesz benne (meg elég lassú is)... a Value2 annyiban is jobb mint a Value (ez annak a folyománya amit írtál), h az általad is említett currency és date típusoknál adatvesztést is okozhat tizedesek tekintetében, illetve kicsit lassabb is a Value2-nél: [link]
-
Magnat
veterán
válasz
bteebi
#48955
üzenetére
Nmit, arra, h az első cellát még nincs mivel hasonlítsa, így meg az első alkalommal az else ágra fut, átbillenti a Vizsgal-t true-ra és a második cellától kezdve vizsgál mindig az előzővel.
Igazából sztem csak a vba "engedékenységének" köszönhető, h a Vizsgal nélkül nem fut hibára az első körben, hiszen akkor a PreCell-nek még nincs is értéke, szóval vagy Null vagy vmi szemét van benne, szigorúbb nyelvek esetében sztem exceptiont dobna. (Ha meg a ciklus előtt adnál értéket a PreCellnek, pl azt, h PreCell=0, akkor meg az lenne a gond, h ha az első mezőben szintén pont 0 az érték, akkor "Please check"-re fut ok nélkül ... szóval sztem ezért korrekt a Vizsgal változóval) -
Magnat
veterán
válasz
bteebi
#48927
üzenetére
Szia,
Set eredmenyek = ActiveSheet.Range("B2:B10,D2:D10,F2:F10")
Vizsgal = false
For Each cella In eredmenyek
If Vizsgal Then
If Abs(Cella - PreCell) < 1 Then
Application.Speech.Speak "Please check", SpeakAsync:=True
Else: Application.Speech.Speak "OK", SpeakAsync:=True
End If
Else
Vizsgal = true
End If
PreCell = Cella
Next -
Magnat
veterán
válasz
wr6vhwxeq
#48820
üzenetére
Szia,
A Windows és az Office 2 külön termék, előbbiből van Home és Professional... De nem attól nincs rajta Excel és Word mert Home, hanem mert az egyik Windows, a másik meg Office. Gondolom a fizetés nélküli beszerzést legális keretek között értetted, mert egyébként záros határidőn belül moderálnák a posztodat Egyébként itt a HA!-n is találsz aprópénzért legális Office kulcsot.
Egyébként nem akarok a zsebedben turkálni, de elég drágán adhatta az ismerősöd azta kulcsot, ha bármilyen havi fizetés felét kérte érte. -
Magnat
veterán
válasz
_stick_
#48810
üzenetére
Szia,
Vagy ha nem akarsz a feltételes formázással trükközni, akkor a D2-ben azt mondod, hogy =HA(ÉS(A2="nem fizette be";B2="Nem fizette be");"!";""), aztán ezt lehúzod az aljáig és aki egyik évben sem fizetett, annál ott lesz a felkiáltójel a D oszlopban (amire természetesen szűrni is lehet).
-
#48714
Magnat
veterán
Fire/SOUL/CD
#48713
Magnat
veterán
válasz
Fire/SOUL/CD
#48713
üzenetére
Köszi, ezt olvastam és tudtam is, h depricated, most visszakerestem azt a táblát amikor teszteltem Office 2021-ben, ahol ezt adja vissza:
Aztán nekiálltam tesztelgetni és kiderült, hogy a fenti képletet valami példából dobtam át és valami elb@szott kódlap lehetett a weblapon ahonnan másoltam, íme alatta a működő képlet:
Mondjuk kissé félrevezető, hogy nem vmi argumentumhibát dob, hanem olyan mintha magával a fv-vel lenne baja...
-
Magnat
veterán
Sztem alapból nem tudja, de ha megguglizod, vannak Excelben integrálszámításra megoldások ... mondjuk első körben sokat segítene, ha az adott görbét fel tudnád írni függvényként, mert így ahogy leírtad, már ott is probléma fogsz ütközni, hogy az Excel egyáltalán "tudja", h mit kell kiszámolnia.
-
Magnat
veterán
válasz
Magnat
#48568
üzenetére
Meg is van: legyen az eredeti tábla neve "Sorrend", a munkalapja amiről másolunk meg "Munka1", illetve egy másik tábla (neve lényegtelen, mert nem hivatkozzuk meg) eredeti munkalapja pedig "Ori" (ebben vannak a rendezendő adatok), mint original. Az első sorban vannak a mezőnevek, én most 4 mezőt hoztam létre vízszintesen és mindegyik alá 2 sornyi adatot. Nyitsz egy új munkalapot az Ori mellé, A1-be beírod:
=VKERES([sorrend.xlsx]Munka1!A$1;Ori!$A$1:$D$3;SOR(A1))
Aztán ezt jobbra elhúzod addig amennyi oszlopod van (4), lefelé pedig addig amennyi a maximális sorszám (3 -> fejléc + 2 adatsor), és kész is. Értelemszerűen a képletben szereplő "$A$1:$D$3" tartományt mindig akkorára kell venni, amekkora az eredeti tábla.
Szerk.: Ha az eredeti sorrendű táblára nincs szükséged, akkor kijelölöd az egész táblát és érték másolással felülcsapod az Ori fület, ezt meg törlöd.
-
#48503
Magnat
veterán
Fire/SOUL/CD
#48501
Magnat
veterán
válasz
Fire/SOUL/CD
#48501
üzenetére
Poén volt, de úgyis tudod
-
#48500
Magnat
veterán
Fire/SOUL/CD
#48498
Magnat
veterán
válasz
Fire/SOUL/CD
#48498
üzenetére
Még beletehetnéd, h az elválasztást is a helyesírás szabályai alapján csinálja
-
-
Magnat
veterán
Szia,
a html-ben hogy van a táblázat, tr, th, td tagekkel? Ha igen és dinamikusan kell kiolvasni, van rá kimondottan egy objektum vba-ban (fejből nem emléxem, de az otthoni gépemen megvan), ha pedig egyszeri alkalom, akkor van pl ez a konverter, ha bemásolod a html kódot, csinál belőle táblát, amit csak át kell dobni Excelbe.
-
#48255
Magnat
veterán
BigBadPlaYeR
#48254
Magnat
veterán
válasz
BigBadPlaYeR
#48254
üzenetére
Nagyon köszi, próbálom
-
#48248
Magnat
veterán
BigBadPlaYeR
#48246
Magnat
veterán
válasz
BigBadPlaYeR
#48246
üzenetére
Közi előre is, addig meglesem amit küldtél!
-
Magnat
veterán
Szia,
makró rögzítésével csináld meg egy lapra, aztán:
Sub WSLoop()Dim I As IntegerFor I = 1 To Worksheets.CountWorksheets(I).Activate'Ide pedig másold be a generált kódot.NextEnd SubA generált kód meg ilyesmi lesz:
Cells(1,2).locked=false
ActiveSheet.Protect password:="pw", UserInterfaceOnly:=Truefeloldásnál értelemszerűen Unprotect ...
-
Magnat
veterán
válasz
zsolti_20
#45300
üzenetére
Szia
csinálsz egy formot (Userform1), rá egy Listboxot (Listbox1), aztán:
Sub Popup()Dim cel As RangeDim selectedRange As RangeSet selectedRange = Application.SelectionUserForm1.ListBox1.ClearFor Each cel In selectedRange.CellsUserForm1.ListBox1.AddItem (cel.Value2)Next celUserForm1.ShowEnd SubEz a szelektált cellák tartalmát fogja bedobni a Listbox1-be.
Szerk.: Ha legördülő kell, akkor Listbox helyett Combobox kell.
-
Magnat
veterán
válasz
poffsoft
#32844
üzenetére
Köszi azért, átírtam mindenhol len-re, azzal műxik.
Még egy kérdés, nem csak neked
: Az Intellisense működése nem tiszta... pl akarom tudni a Cells metódusait, tulajdonságait, stb. Beírom, h "Cells." és a pont lenyomása után segít az Intellisense - vagy ha nem, akkor Ctrl+J-re biztosan. Akkor is segít, ha ezt írom: "Cells()." - viszont pont úgy, ahogy normálisan használni kell, pl. "Cells(1,1).", nem működik. Hiába nyomkodom a Ctrl+J-t, csak dingel. Miért? -
Magnat
veterán
Üdv,
hogyan lehetséges egy cellára egyszerre igaz, hogy:
IsEmpty:false
Len:0
.Text= semmi
.Value= semmi
WorksheetFunction.IsText=trueTehát elvileg text, nem üres, mégis 0 a hossza és nincs tartalma... Ez egy konzekvens állapot v vmi bug? A tábla egyébként Oracle Forms-ban lett előállítva vmilyen pluginnal, valamit frissítettek az alkalmazáson és azóta ezt csinálja. Régebbi változattal kimentett tábláknál ugyanilyen celláknál az IsEmpty érték true. (Ezen a különbségen szépen el is hasalt a Vba scriptem, ok, át tudtam írni a Len használatával, de azért kíváncsi lennék, mi a szösz ez.)
Új hozzászólás Aktív témák
- Androidos tablet topic
- Milyen házat vegyek?
- Milyen belső merevlemezt vegyek?
- Sorozatok
- Telekom otthoni szolgáltatások (TV, internet, telefon)
- Android alkalmazások - szoftver kibeszélő topik
- Anyagi helyzetek és életutak
- RAM topik
- Otthoni IPTV megvalósítási lehetőségek?
- sziku69: Szólánc.
- További aktív témák...
- 10 Darab ÚJ PC Játékszoftver
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - 15% AKCIÓ
- MS SQL Server 2016, 2017, 2019
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem, Most Ünnepi áron! :)
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- BESZÁMÍTÁS! MSI B450M R5 5600X 16GB DDR4 512GB SSD RX 7700 XT 12GB Lian Li Lancool 217 fehér CM 700W
- Thermalright Assassin X 120 V2
- Apple iPhone 13 / 128GB / Kártyafüggetlen / Akku:87%
- AZONNAL KÉSZLETRŐL! Intel Core i5 14600K 64GB 6000MHz RAM 2TB Gen4 SSD RTX 5060 8GB FSP 750W
- Telefon felvásárlás!! iPhone 14/iPhone 14 Plus/iPhone 14 Pro/iPhone 14 Pro Max
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Laptopszaki Kft.
Város: Budapest