- Motorola Edge 50 Neo - az egyensúly gyengesége
- Fenntartható, tartós kiegészítőket mutatott be a Fairphone
- Xiaomi 14T Pro - teljes a család?
- Zeiss triplakamera az új Vivo V60-ban
- Erős hardverrel érkezik a Honor 10 000 mAh-s mobilja
- Samsung Galaxy S24 Ultra - ha működik, ne változtass!
- Samsung Galaxy Z Fold7 - ezt vártuk, de…
- Samsung Galaxy Watch7 - kötelező kör
- Honor Magic V5 - méret a kamera mögött
- Jimmy Choo felel a Magic V Flip 2 dizájnjáért
Hirdetés
-
Mobilarena
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
-
picsu
csendes tag
válasz
loszerafin #2155 üzenetére
Érdekes felvetés, hogy nincs köze az excelhez a kérdésemnek...
Akkor bizonyára tudod azt mihez van köze...nemde?
Egyébként talán excel-el lesz a legkönnyebb úgynéz ki. -
loszerafin
senior tag
válasz
loszerafin #2151 üzenetére
Ez az eredménye:
1 a 1 f 1 a f
3 b 2 g #N/A #N/A
5 c 5 h 5 c h
11 d 6 j #N/A #N/A -
amargo
addikt
válasz
loszerafin #1518 üzenetére
Tehát,
Van A oszlopban
''kicsike''
''nagyocska'' (ezt csak a példa kedvéért raktam ide)
.. stb
B oszlopban
''kicsikemi''
''kicsikemio''
''kicsiarr''
.. stb
Nos, ha az FKERES-t hazsnáljuk itt és HAMIS ra teszem, akkor ugye nem talál helyes lehetőséget, ha az A oszlopban van a keresendő érték a ''kicsike''.
Ezért kellene nekem egy olyan lehetőség, hogy pl.: a ''kicsike'' karaktereit megszámolva (7) a Boszlopban az első 7 karakter egyezőségét figyelné és akár az első lehetőséget is veheti.. Mert így kihozná, hogy a B oszlopból a ''kicsikemi'' áll hozzá a legközelebb. És a ''kicsihööh'' nincs benne.. mert ha FKERES-nél az IGAZ-t tenném, akkor ezt hozná ki abc miatt.
Ha van egy jobb módszer, amivel akár több egyezőt is feltud sorolni az is jó.
Sajna maga a kérésem elég fura (de ezt kérték tőlem, is..) mert nem adja ki lehetőségként a ''kicsikemio'' -t is az eredmény, ugyanakkor az is jó lehetne.
Köszönöm a segítséget, remélem valamivel érthetőbb voltam.
üdv
amargo -
ibike
csendes tag
válasz
loszerafin #1511 üzenetére
no, kicsi olvasgatás és megoldottam:
keres/cserél --- kittörültem az - ME *, - sorok tartalmát az első oszlopba
azután az első oszlopra: szürő - autoszürő - ENM ÜRES opcio eldugott minden nemkivánatost
és kösz loszerafin (habá nem tom mit jelent)
idáig orás unalmas melo volt az oszlop törülgetés
sött mégegyszerübb:
autoszürö - egyéni - kezdete ARTICOL* és Kezdete TOTAL ARTIKOL*
sakko OK
[Szerkesztve] -
loszerafin
senior tag
válasz
loszerafin #1508 üzenetére
(Windowsban nem egyszerű az ember élete)
DOS ablakból:
grep ''ARTICOL'' fajlod.lst >eredmenyfajl.lst
Sajnos, az eredményfájl minden sora elé beszúrja a ''fajlod.lst:'' szöveget, de ezt már ki lehet törölni egyszerűen.
Biztos van vmi kapcsolója, de nem jöttem rá mi az. (ami eltünteti ezt a fájlnév beszúrást)
[Szerkesztve] -
ibike
csendes tag
válasz
loszerafin #1506 üzenetére
www.fprima.ro/File/Minta.xls
itt a minta
leszedtem ezt is, de csak egy DOS os ablak villan
akko is ha megadom hogz win98 alkalmazásként fusson
[Szerkesztve] -
ibike
csendes tag
válasz
loszerafin #1503 üzenetére
hali, most már értem, és ha az egész menetet megfelelő szélességü wordba nyitom meg akko is tartja a formáját,
csak a wordot sem tudom rávenni, hogy az ARTICOL és TOTAL ARTIKOL nevü sorokat tartsa meg, sa többi sor mehet
azt a Grep nevü progit is probáltam, de nem megy NTFS + XP és meloba csak e van..... -
ibike
csendes tag
válasz
loszerafin #1501 üzenetére
sajna nekem *.xls formátum kö, ha lehet, me onnan egy excelbe megcsinált-meglévő fügvényhez rendelem, ami tovább dolgozik belőle
és ez amit bemásoltam az csak az első oszlop, ott hátrafele van még 3 oszlop....
amugy a kiterjesztés: *.LST
hogy normálisan lássam a saját formátumába csak Totalcommander F4, az F3 má esszekavarja -
loszerafin
senior tag
válasz
loszerafin #1500 üzenetére
Ezer bocs, de wordben úgy látom a wildcards-ok nem reguláris kifejezések, szóval kissé utánaolvastam, és inkább ezt kell írni a Find-ba:
(*ARTICOL*^13)
(Jobb lenne, ha ki tudnám próbálni, de hát nincs wordom)
[Szerkesztve] -
loszerafin
senior tag
válasz
loszerafin #1499 üzenetére
Még eszembe jutott, hogy a Word is kezel reguláris kifelyezéseket (sajnos nekem nincs wordom, de ha lenne, így próbálnám
:
1. megnyitnám a csv fájlt
2. Find and replace-ben bekapcsolnám a Wildcards-okat (vagy vmi ilyesmi)
Find: ^.*ARTICOL.*$
Replace : ide semmit se írnék
Replace all gomb
Ez azért lehet kényelmesebb, mint a grep, mert nem kell semmit telepíteni.(Kivéve a Word-öt)
Az persze lehet, hogy a Word nem érti a $ jelet, akkor ilyen kellene helyette : \r\n
Az elején a '^.'-ot talán el lehet hagyni. -
Pongii
csendes tag
válasz
loszerafin #1490 üzenetére
Természetesen próbáltam, de nem vezetett sehová.
Megtudtam, hogy csak az A1 cellátol lehet kijelölni, hogy ez miért így van arra csak a tm.
MS. szakemberek tudnának válaszolni.
A megoldást leírom, hátha valakinek szüksége lesz rá.
Tehát: a kijelölt tartományt át kell másolni egy új munkalap A1-el kezdődő tartományába és onnét kell elküldeni. ( Köszönet Józsefnek a megoldásért ). -
matekmatika
tag
válasz
loszerafin #1494 üzenetére
Kedves loszerafin!
Mint írtam, én sem vagyok zsonglőr a VBScriptben, ezért nem is jöttem rá egyből, hogy amit találtam kódrészletet a neten az ilyen környezetben íródott. Sajnos csak így, egy részlet volt semmi több, ha nagyon érdekel elküldhetem neked a linket. Időközben rájöttem, hogy ez az, és hogy ezt nem lehet beilleszteni sehogy sem az excel makrójába. Innen kezdve teljesen mindegy mi volt a hibaüzenet, és mivel már rég nem itt tartok, hanem másféle megoldásokat keresek a problémára, hát gőzöm nincs pontosan mi volt a hibaüzenet. De miért érdekes ez a fentiek tükrében??? Logikus hogy nem tudja értelmezni, hogy pontosan miért nem, hát... engem nem érdekel, de ha ez minden vágyad, írd meg és összerakom megint, csak a te kedvedért.
Hogy milyen környezetben futtatom? Mint írtam Xp op.rendszeren office2003 alatt, és mivel ez az excel fórum, hát nem adobe photoshopban az hót ziher. Vagy mire vagy még kíváncsi esik az eső 13 fok van erős szél. Így jó? Ja és nem a szabad ég alatt.
''Mert majdnem sírva fakadtam az előbb''.
Azért ennyire ne vedd a lelkedre, nem feltétlenül kell segíteni, ha nem akarsz.
Azért köszi, hogy ennyi dőt szakítottál rámIgazán megtisztelő
Tisztelettel: matek
[Szerkesztve] -
matekmatika
tag
válasz
loszerafin #1492 üzenetére
Már rájöttem hogy nem igazán illeszthetem ezt excel makróba, hiszen ez VBScript. Maga a script tökéletesen működik csak el kell indítani (katt2-t a vbs kiterjesztésű fájlra). Ilyennel még nem foglalkoztam (VBScript) és először azt hittem simán beilleszthetem, hiszen nagyon hasonló.
Viszont még mindíg adott a probléma, mer excelből nem tudom sem elindítani ezt a *.vbs fájlt sem beágyazni nem tudom. Olvastam róla hogy htm-be be lehet, de nem működik úgy sem.
Bár itt biztos azért mert nem értek hozzá. Csak olyan mintákat találtam ahol beírják a VBscript kódokat, olyannal nem ahol magára a fájlra van hivatkozás. Én meg hiába illesztem htm-be, asp-be, hta-ba sehogy sem működik.
A hibát egyébként a ''Set objWSch = Wscript.CreateObject(''Wscript.Shell'')'' sornál jelzi, már nem emlékszem valami hiányzó object valamit ír ki.
Ja, xp és office2003.
[Szerkesztve] -
Pongii
csendes tag
válasz
loszerafin #1486 üzenetére
Pontosítva: azt szeretném, hogy rákattintok egy gombra az excel táblán, akkor küldjön el automatikusan egy előre definiált tartományt email-ban a címzett részére.
A problema az, hogy a tartomány amit el szeretnék küldeni nem A1-es cellától kezdődik és ezáltal nem működik a küldés.
A kódot beírom újra, bár csak az arcocska nem odaillő, nem tudom, hogy került oda.
Sub SendSelection()
' alapparaméterek
email_to = ''valaki@t-online.hu''
email_cc = ''mas@freemail.hu''
email_subject = ''Heti aktuális''
' A küldendő rész a A110 tartomány ' Csak akkor működik, ha az A1 cellától van a
' kijelölés
Range(''A110'').Select
' Fájl/Küldés/levél címzettje menü kiválasztás
SendKeys ''%flz''
' Visszaállás az első email mezőre
SendKeys ''+{TAB}+{TAB}+{TAB}''
' email mezők feltöltése
SendKeys email_to
SendKeys ''{TAB}''
SendKeys email_cc
SendKeys ''{TAB}''
SendKeys email_subject
SendKeys ''{TAB}''
' Levél elküldése Alt+é billentyűzetkombinációval
SendKeys ''%é''
End Sub
Bemásolva egy új modulba futni fog, de csak az excel munkalapról indítva fut helyesen a szerkesztőben nem.
Tehát abban segítsetek, hogy-ha Range(''A110'') tartomány helyett Range(''G10:W30'')
szeretnék küldeni, hogy módosítsam a kódot, hogy működjön a küldés -
geniva
csendes tag
válasz
loszerafin #1480 üzenetére
HA(ÉS($B$7<>'''';$B$7=$D$7);1;0)
ez lett a nyerő...de azért tényleg köszönöm -
geniva
csendes tag
válasz
loszerafin #1480 üzenetére
köszönöm szépen...jól jött
-
lapa
veterán
válasz
loszerafin #1480 üzenetére
miért? csak nem ellenség vagy?
-
válasz
loszerafin #1469 üzenetére
A VB.net Express változata jelenleg ingyenes. [link]
Persze annyi ''hátránya'' van, hogy kell hozzá a .net framework 2.0. -
geniva
csendes tag
válasz
loszerafin #1477 üzenetére
köszi, nem, nem házi, csak már iszonyúan régen használtam az excel-t,
HA(ÜRES(a1);'''';ide írd, amit csinálni kell)
igen, ez jó lesz, csak még azt kell elérnem, hogy ha egyenlő az a1-b1, akkor c1-hez adjon egyet...de gondolom, ezt ÉS fv-el meg tudom oldani
nagyon köszönöm -
geniva
csendes tag
válasz
loszerafin #1473 üzenetére
A problámám az, hogy készítek egy táblázatot, ahol pl. a1, és b1 változó értékekkel fog kapni, amit majd mások írnak be, és ahol pl. c1-ben lesz egy ha fv ami meghatározza, hogy ha bizonyos értékek kerülnek beírásra-kézzel-, és ha két cella tartalma egyenlő, akkor adjon hozzá ennyit, és ennyit.....csak a bibi az, hogy a cellába nem írnak semmit, azt nullának veszi! de én csak azt szeretném, hogy akkor vegye nullának, ha nullát írnak be, és ha mindkettő (a1, b1) cella tartalma 0, akkor adjon hozzá pl. 1-et, de ha nem írnak bele semmit, azaz üres, akkor ne csináljon semmit.köszi
-
lapa
veterán
válasz
loszerafin #1469 üzenetére
nahallod... én azzal küzdöttem most, hogy egyátalán a referencbe belemásszon, csak brózolva - ocx-re mutatva ette meg. utána viszont ott voltak a listában, x-elés után ikon is volt, a formra is rá tudtam húzni. esetleg próbálj meg a reference-ben brózzal rámutatni...
ja ez off xp...
[Szerkesztve] -
loszerafin
senior tag
válasz
loszerafin #1467 üzenetére
Hagyjuk, igazából már nem érdekel...
-
maxab
csendes tag
válasz
loszerafin #1464 üzenetére
Megmondom őszintén, hogy megleptél, mert MŰKÖDIK!
Köszönöm szépen, nagyon-nagyon. -
loszerafin
senior tag
válasz
loszerafin #1463 üzenetére
A működéséről:
Végigmegy egy soron, nézi a cellákat, van-e ''|'' jel.
Ha van, beszúr egy új sort (feltéve, hogy még nem szúrt be ebben a menetben)
szétszedi a szöveget: első rész, maradék
Az első részt beteszi a vizsgált cellába, a maradékot meg az alattalevőbe.
A következő menetben a most beszúrt sort vizsgálja, így nem zavarja az algoritmust, ha több ''|'' van egy cellában.
Az r, az a ''row'', azaz a for r-es sor végére kell a 100 helyett 20000.
A c, az a ''column'', azaz a for c-s sor végére a 100 helyett kell 25
Az ''usjor'' változóval jelzem, hogy szúrtam-e már be sort az éppen viszgált után. Ha 0, akkor még nem, ha 1, akkor már igen.
[Szerkesztve]
[Szerkesztve] -
loszerafin
senior tag
válasz
loszerafin #1460 üzenetére
Dim wsData As Worksheet
Set wsData = Worksheets(''Munka1'')
For r = 1 To 100
ujsor = 0
For c = 1 To 100
pos = InStr(wsData.Cells(r, c).Value, ''|'')
If (pos > 0) Then
If (ujsor = 0) Then
wsData.Rows(r + 1).Insert
ujsor = 1
End If
newval = Left(wsData.Cells(r, c).Value, pos - 1)
nextval = Right(wsData.Cells(r, c).Value, Len(wsData.Cells(r, c).Value) - pos)
wsData.Cells(r + 1, c).Value = nextval
wsData.Cells(r, c) = newval
End If
Next c
Next r
[Szerkesztve] -
maxab
csendes tag
válasz
loszerafin #1457 üzenetére
Sajnos azért kell, kedves loszerafin, mert az adatok átkerülnek egy adatbázisba, és az meg olyan, hogy megköveteli ezt a formátumot.
-
válasz
loszerafin #1457 üzenetére
hülye kérdés
nyílván dolgozni is akar az adatokkal, nem csak nézegteni... -
Gh0sT
addikt
válasz
loszerafin #1452 üzenetére
Microsoft Monthview Control nem jó neked? A Maxdate és Mindate tulajdonságokkal állíthatod az időintervallumot.
-
X-COM
nagyúr
válasz
loszerafin #303 üzenetére
xp/2003-ban a protect sheet menüpont alatt tudok kontrolálni ezeket a dolgokat, az autofilter alkalmazás egyértelmű is asszem, viszont a sort-ot csak akkor tudod használni, ha a kérdéses cellák alól leveszed a védelmet, így ez gyakorlatilag nem nagyon használható
-
X-COM
nagyúr
válasz
loszerafin #280 üzenetére
egy pontosvessző után odaírhatod, hogy A1 legyen a friendly name
tehát,
=HYPERLINK(''mailto:''&A1;A1) -
lapa
veterán
válasz
loszerafin #280 üzenetére
és ha kicseréled a ''mailto:'' karaktert semmire? oszlop kijelöl --> ctrl+h
egyébként sztem nem menti az értékeket. pivotnál van ilyen kesselés, sima celláknál nem hiszem... -
X-COM
nagyúr
válasz
loszerafin #250 üzenetére
egy randa ''trükk'' jutott csak eszembe, csinálsz még egy oszlopot
a függvény legyen:
=HYPERLINK(''mailto:''&A1) ahol értelemszerűen A1 az a cella, ahol a mailcímek vannak. -
isapeti
aktív tag
válasz
loszerafin #250 üzenetére
ha jól értem a gondodat, annyi lenne a teendô, hogy hiperhivatkozássá teszed ôket (mindet kijelöl, jobb gomb, hiperhivatkozás).
Új hozzászólás Aktív témák
Hirdetés
- Játékkulcsok a legjobb áron: Steam
- Vírusirtó, Antivirus, VPN kulcsok
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Assassin's Creed Shadows Collector's Edition PC
- Jogtiszta Windows - Office & Vírusirtó licencek- Azonnal - Számlával - Garanciával - Nint.hu
- BESZÁMÍTÁS! ASUS B450M R5 3500X 16GB DDR4 500GB SSD RTX 2060 Super 8GB Zalman N5 Zalmann 600W
- GYÖNYÖRŰ iPhone 13 Pro 128GB Graphite -1 ÉV GARANCIA - Kártyafüggetlen, MS3083
- Bomba ár! Dell Latitude 5495 - Ryzen 5 I 16GB I 256SSD I 14" FHD I HDMI I Radeon I Cam I W10 I Gari
- Olcsó Notebook! Lenovo Ideapad 3! Ryzen 3 3250U / 8GB DDR4 / 128GB SSD
- Azonnali készpénzes INTEL CPU NVIDIA VGA számítógép felvásárlás személyesen / postával korrekt áron
Állásajánlatok
Cég: FOTC
Város: Budapest