- sziku69: Fűzzük össze a szavakat :)
- bitpork: Augusztus 2- szombat jelen állás szerint.
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Luck Dragon: Asszociációs játék. :)
- sh4d0w: Csak a profit - emberélet nem számít
- Kempingezés és sátrazás
- sziku69: Szólánc.
- Gurulunk, WAZE?!
- zebra_hun: Hűthető e kulturáltan a Raptor Lake léghűtővel a kánikulában?
- eBay-es kütyük kis pénzért
-
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
-
Delila_1
veterán
Régebbi hozzászólásokból tallóztam össze.
Private Declare Function PlaySound Lib "winmm.dll" _
Alias "PlaySoundA" (ByVal lpszName As String, _
ByVal hModule As Long, ByVal dwFlags As Long) As Long
Const SND_SYNC = &H0
Const SND_ASYNC = &H1
Const SND_FILENAME = &H20000
Sub PlayWAV()
utvonal = "E:\Utvonal\" 'Itt módosíts
WAVFile = utvonal & "\" & "Fáljnév.wav" 'meg itt is
Call PlaySound(WAVFile, 0&, SND_SYNC Or SND_FILENAME)
End SubA most PlayWAV rutin sorait eseményvezéreltként vidd be.
-
ThaBoss
senior tag
válasz
Delila_1
#13590
üzenetére
Találtam már egy képletgyűjteményt, az egész jól elmagyarázza, hogy mikor mit érdemes használni és mindenhez van egy példa is.
Csak most kicsit továbbmennék a makrók felé.
Ha esetleg tudsz olyat, ami hasonló módon példákkal operál, azt szívesen veszem.
bugizozi: ha minden kötél szakad, ez a legjobb mindig!
-
ThaBoss
senior tag
válasz
Delila_1
#13586
üzenetére
Köszönöm szépen ismét!
Lemásoltam a táblát, a másolatban már javítva van %-os változó, gondoltam azt majd akkor veszem elő, ha szükséges. Abban is átírtam.
Amúgy nem tudsz valami jó szakirodalmat vagy blogot a makrózásról, amiből tanulgathatnék? Természetesen 0-ról indulok...
-
-
ThaBoss
senior tag
válasz
Delila_1
#13580
üzenetére
Egyelőre még a régi makrót használom (integer-es), mert most valószínűleg nem lesz dolgom óriási adathalmazokkal, így nincs szükség a módosítottra.
Viszont belefutottam egy apróságba:
Ha A és B oszlop eleme ugyanaz, akkor meghal a makró. Ezen lehet változtatni valahogyan, hogy ilyenkor is rendben legyen?
Töltöm fel a táblát: [link] -
Delila_1
veterán
Ez a makró megcsinálja. Előbb új lapokra másolja az egyes sorokat, mindegyiket olyan nevű lapra, amilyen adatot tartalmaz az adott sor első (A) cellája.
Ezután az egyes lapokat áthelyezi 1-1 új fájlba, aminek a neve a lapnév + "_adott adat".Az utvonal = "E:\Eadat\" sorban írd át az útvonalat a sajátodra, a végén is legyen \ jel, mint itt.
A nev$ = utvonal & Sheets(1).Name & "_adott adat.xls" sor végén az .xls helyett írj .xlsx-et, ha 2003-asnál magasabb verziót alkalmazol.Címsort feltételezek, ezért az első ciklust (sorok másolása másik lapokra) a 2. sortól kezdtem a For sor% = 2 To usor% sorban. Címsor nélkül legyen ez a sor For sor% = 1 To usor%.
Sub Ujak()
Dim sor%, usor%, usor_1%, nev$, WS1 As Worksheet
Dim utvonal$, lap%
Application.ScreenUpdating = False
Application.DisplayAlerts = False
utvonal = "E:\Eadat\" 'Itt írd be a saját útvonaladat ehelyett
usor% = Cells(Rows.Count, "A").End(xlUp).Row
Set WS1 = Sheets("Kezdőlap")
For sor% = 2 To usor%
nev$ = WS1.Cells(sor%, "A")
On Error GoTo Uj_lap
usor_1% = Sheets(nev$).Cells(Rows.Count, "A").End(xlUp).Row + 1
WS1.Rows(sor%).Copy Sheets(nev$).Cells(usor_1%, "A")
Next
For lap% = 1 To Sheets.Count - 1
nev$ = utvonal & Sheets(1).Name & "_adott adat.xls"
Sheets(1).Move
ActiveWorkbook.SaveAs Filename:=nev$, FileFormat:=xlNormal _
, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
ActiveWindow.Close
Next
Application.ScreenUpdating = True
Application.DisplayAlerts = True
MsgBox "Kész"
Exit Sub
Uj_lap:
If Err = 9 Then
Worksheets.Add.Name = nev$
Resume 0
Else
Error Err
End If
End Sub -
Delila_1
veterán
válasz
ThaBoss
#13577
üzenetére
Ha milliós sorszámod van, módosítani kell a makrón. A % jelet vedd le a változók végéről, és a Dim kezdetű sorokban így add meg: Dim sor As Double.
A % jellel a végén azonos a Dim sor As Integer-rel, de ez csak -32.768 és 32.767 közötti értékekre jó, ezen a tartományon kívül hibára futna.
-
BlackGu
csendes tag
Sziasztok!
Lehet kezdő a kérdés, de fontos lenne a megoldás.
Annyit szeretnék, hogy egy legördülő menüben elhelyezett nevekhez, pl (alma,körte,barack) egy másik cellában csak az adott névhez megfelelő legördülő lista elemk jelenjenek meg. Ha az almát választom akkor zöld, piros. Ha a körtét akkor sárga , vilmos. Persze ezek is legördülő listák lennének. Megoldható ez programozás nélkül? Esetleg tippek, hol találok hasonló példát, de ha kapok megoldást annak nagyon örülnék. -
-
psg5
veterán
Excel fájlban vonalkódok,melyek egy függvénnyel egy helyre mutatnak,gépre vonalkód olvasó kötve, amikor a vonalkódólvasó talál egy olyan vonalkódot, mely szerepel az excel vonalkódjai közt, akkor az excel kijelzi, hogy itt van tessék. A kérdésem, hogy hangjelzést lehet-e rendelni az excelben ahhoz, hogy a találatnál zenéljen, kürtöljön vagy bármilyen hangot adjon?
-
Delila_1
veterán
válasz
ThaBoss
#13565
üzenetére
Itt az inverze.
Sub Valami_3()
Dim sor%, sor1%, ucso%, WS1 As Worksheet, WS2 As Worksheet
Dim kezd, vég
Set WS1 = Sheets(1)
Set WS2 = Sheets(2)
sor1% = 1
ucso% = WS1.Cells(Rows.Count, "A").End(xlUp).Row
For sor% = 2 To ucso%
kezd = WS1.Cells(sor%, "A")
vég = WS1.Cells(sor%, "B")
Do
sor1% = sor1% + 1
If WS1.Cells(sor%, "B") > WS1.Cells(sor%, "A") Then
WS2.Cells(sor1%, "A") = kezd
WS2.Cells(sor1%, "B") = kezd
WS2.Cells(sor1%, "C") = WS1.Cells(sor%, "C")
WS2.Cells(sor1%, "D") = WS1.Cells(sor%, "D")
kezd = kezd + 1
End If
Loop While vég >= kezd
Next
End Sub -
#13569
m.zmrzlina
senior tag
Delila_1
#13566
m.zmrzlina
senior tag
válasz
Delila_1
#13566
üzenetére
Amint írtam az adatbázis és a form is bonyolultabb a kép csak illusztráció.
Arra gondoltam, hogy nem lehetne-e bevezetni változót minden adatra (ami akár 50-nél több különböző változót jelentene) Ezt viszonylag könnyen fel lehet tölteni ciklussal, aztán kiirogatni megfelelő helyre a formra.
Nincsen ötletem. -
#13566
Delila_1
veterán
m.zmrzlina
#13563
Delila_1
veterán
válasz
m.zmrzlina
#13563
üzenetére
Az adat_3:adat_7, és az adat_10:adat_15-öt (esetleg az adat_18:adat_19-et is) ciklusban íratnám be. Akkor csak az adat_1 és adat_2 van szólóban.
sor = 1
For oszlop = 4 To 8
Cells(oszlop + 13, 3) = Cells(sor, oszlop)
NextFejreálltam a próbánál. Indítottam, és nem csinált semmit. Aztán rájöttem, hogy a belinkelt képedet néztem, az nem változott.
-
#13563
m.zmrzlina
senior tag
Delila_1
#13561
m.zmrzlina
senior tag
válasz
Delila_1
#13561
üzenetére
Itt egy végletekig leegyszerűsített illusztráció:
A felső öt sor az adatbázis. A valóságban természetesen sokkal nagyobb sor és oszlop irányban is. A bekeretezett rész a form amit ki kell tölteni. A valóságban külön munkalapon vannak.
A harmadik munkalapon van egy lista ami részhalmaza a az A oszlopban lévő számoknak(azonosítók). MATCH()-csel megkeresem a lista első elemét az adatbázisban majd a hozzá tartozó adatokat beírom a formba majd mentem a formot egy új munkafüzetbe.
Ezután form törlése, a lista második elemének keresése, form kitöltés, mentés stb... amíg van a listában elem.A keresés és a mentés nem gond csak a form kitöltésére keresek egy elegánsabb megoldést mit hogy a:
Worksheets("lista").Range("A" & sor).Copy Worksheets("űrlap").Range("A2")
sort leírjam 50-szer néha többször (természetesen megfelelő cellahivatkozásokkal) a makróba. (a hivatkozásokat ne nézd nem illenek az képhez)
-
#13561
Delila_1
veterán
m.zmrzlina
#13559
Delila_1
veterán
válasz
m.zmrzlina
#13559
üzenetére
Nem látom a rendszert, pedig a programok erre épülnek.
-
-
#13559
m.zmrzlina
senior tag
m.zmrzlina
senior tag
Adott egy táblázat:
"A" oszlopban azonosító számok, B oszloptól kezdődően egy sorban az azonosító számokhoz tartozó adatok (kb 50) Ebből a szerkezetből van mondjuk 200 sor.Másik munkalapon egy form amit fel kell tölteni egy adott azonosítóhoz tartozó adatokkal természetesen nem sorban.
Hirtelen nem nagyon látok más módszert mint egyenként másolni a cellákat
egyik!A1--->másik!B5
egyik!B1--->másik!B26
egyik!C1--->másik!C5
.
.
.
egyik!AJ1--->másik!P27Van-e valami elegánsabb módszer ennél? Mire érdemes guglizni?
-
Delila_1
veterán
válasz
ThaBoss
#13556
üzenetére
Óhajod parancs.
Sub Valami_1()
Dim sor%, sor1%, WS1 As Worksheet, WS2 As Worksheet
Dim info, képlet, usor, kezd
Set WS1 = Sheets(1): Set WS2 = Sheets(2)
sor% = 2: sor1% = 2
usor = WS1.Cells(sor%, "A").SpecialCells(xlLastCell).Row
info = WS1.Cells(sor%, "C"): képlet = WS1.Cells(sor%, "D")
kezd = WS1.Cells(sor%, "A")
For sor% = 2 To usor
If WS1.Cells(sor% + 1, "D") <> képlet Then
WS2.Cells(sor1%, "A") = kezd
WS2.Cells(sor1%, "B") = WS1.Cells(sor%, "B")
WS2.Cells(sor1%, "C") = WS1.Cells(sor%, "C")
WS2.Cells(sor1%, "D") = WS1.Cells(sor%, "D")
sor1% = sor1% + 1
kezd = WS1.Cells(sor% + 1, "A")
képlet = WS1.Cells(sor% + 1, "D")
End If
Next
End Sub -
ThaBoss
senior tag
Sziasztok!
Visszatértem egy kis segítséget kérni! Volt nemrég ez a gondom: [link], amit Delila_1 segítségével sikerült megoldani. Azóta is tökéletesen üzemel a makró:
Sub Valami()
Dim sor%, sor1%, WS1 As Worksheet, WS2 As Worksheet
Set WS1 = Sheets(1)
Set WS2 = Sheets(2)sor% = 2: sor1% = 2
WS2.Cells(sor1%, "A") = WS1.Cells(sor%, "A")
WS2.Cells(sor1%, "B") = WS1.Cells(sor%, "A")Do While WS1.Cells(sor%, "A") <> ""
If WS2.Cells(sor1%, "A") < WS1.Cells(sor%, "B") Then
WS2.Cells(sor1% + 1, "A") = WS2.Cells(sor1%, "A") + 1
WS2.Cells(sor1% + 1, "B") = WS2.Cells(sor1%, "A") + 1
sor1% = sor1% + 1
Else
sor1% = sor1% + 1: sor% = sor% + 1
WS2.Cells(sor1%, "A") = WS1.Cells(sor%, "A")
WS2.Cells(sor1%, "B") = WS1.Cells(sor%, "A")
End If
Loop
End SubSzeretnék beiktatni egy C és D oszlopot is. A és B változatlanul maradna és a makró feladata is. Viszont minden sor C és D oszlopában szerepelne valami információ szöveg vagy képlet (sima számítás pl: =2*1000+3*500+100). Ezeket pedig szeretném kilistázni minden egyes sorba a második fülre az eredmény (azaz A és B oszlop cellái) után úgy, hogy csak addig írja ki ezeket, amíg az első lap A és B tartománya tart.
Kissé bonyolult így de adok képet is hozzá! Tehát így néz ki a táblám első füle:
és azt szeretném, ha a fenti makró valami ilyet csinálna belőle:
Előre is köszi!
-
#13554
thee
csendes tag
Fire/SOUL/CD
#13552
thee
csendes tag
válasz
Fire/SOUL/CD
#13552
üzenetére
Köszönöm!
-
#13552
Fire/SOUL/CD
félisten
thee
#13551
-
thee
csendes tag
Megint "elakadtam"..
Ezt az excel-es parancsot szeretném VB-es környezet alatt megírni:=SOKSZOR("kiskutya";5)
Eddig nekem ezt sikerült összehoznom:
Dim Counter, Piece As Integer
Dim Text, Text1 As String
Piece = 5
Counter = 0
Text = "kiskutya"
Do While (Counter < Piece)
Text1 = Text1 & Text
Counter = Counter + 1
Loop
Worksheets("Munka1").Cells(11, 2) = Text1Tudtok ajánlani ennél egy egyszerűbb megoldást?
-
Delila_1
veterán
válasz
motinka
#13549
üzenetére
Van 5 db számod: 1; 2; 3; 3; 3. A Nagy(tartomány;1) függvény megadja a legnagyobbat, ez a 3.
A Nagy(tartomány;2) a második legnagyobbat, 3-at ad.
A Nagy(tartomány;3) a harmadik legnagyobbat, szintén 3-at.
A Nagy(tartomány;4) eredménye 2, végül a Nagy(tartomány;5)-é 1.A C oszlopodban 171-szer szerepelt az iad hibakód. Az E oszlop darabteli függvénye pontosan ennyiszer hozza ki a 171-es eredményt. Ez azt jelenti, hogy a 171 után második legnagyobb számot, a 136-ot majd csak a Nagy(tartomány,172) függvény tudná produkálni.
-
motinka
tag
válasz
Delila_1
#13543
üzenetére
köszönöm Delila, megértettem már akkor is, csak tetszett ez az általam eddig nem ismert függvény és elkezdtem vele próbálkozni, hát nem működött nekem sem.
A feladatot úgy oldottam meg ahogy azt tanácsoltad, sikerült is, nagyon jó lett, még egyszer köszönet érte.Akkor sem hagy nyugodni ez a NAGY függvény
-
#13547
Fire/SOUL/CD
félisten
Delila_1
#13546
válasz
Delila_1
#13546
üzenetére
Abban a munkafüzetben úgy is kell, hogy működjön, mivel 1167 rekord van. A =NAGY(E:E,1168) dobna hibát...
Lehet kimaradt valami/nem követtem az eseményeket, csak nem világos, hogy "Meg lehetne oldani makróval, csak kissé lassú lenne a futása, és Neked nem lenne semmi dolgod.", szóval mihez kellene a makró, amikor látszólag jól működik minden.
Szerk
visszaolvastam, már világos mihez kellene makró.
-
#13546
Delila_1
veterán
Fire/SOUL/CD
#13545
Delila_1
veterán
válasz
Fire/SOUL/CD
#13545
üzenetére
Nézd meg a 13534-es hsz-t, abban van a füzet.
Ráérsz, csak este leszek újra monitor előtt.
-
#13545
Fire/SOUL/CD
félisten
Delila_1
#13543
-
zhari
csendes tag
Sziasztok!
Szükségem lenne egy makróra, ami a következőt csinálja. Van egy Excel táblám (kb 20 oszlop és 3000 sor) amit új különböző táblákká kellene vágnia az A oszlop szerint. A fejlécen kívül mondjuk 30 féle adatot tartalmaz az A oszlop, ebből csináljon 30 db új filét ami csak az adott adat sorait tartalmazza és nevezze úgy el, hogy az eredeti név + "_adott adat").
Mentheti ugyanabban a mappába mint ahol az eredeti dokumentum volt.
Segítséget előre is köszönöm. -
Delila_1
veterán
válasz
motinka
#13537
üzenetére
Írtam a csatolt fájlban, hogy a nagy(E:E, 2), sőt a nagy(E:E, 171) is 171-et ad eredményül, mert az első 171 db szám mindegyike "legnagyobb". Leírtam, hogyan kerestem ki a szűrő segítségével az ez alatti legnagyobbat.
Meg lehetne oldani makróval, csak kissé lassú lenne a futása, és Neked nem lenne semmi dolgod.
-
#13542
thee
csendes tag
Fire/SOUL/CD
#13541
thee
csendes tag
válasz
Fire/SOUL/CD
#13541
üzenetére
köszönöm a gyors választ, működik, így utólag már logikusnak is tűnik a megoldás...
-
#13541
Fire/SOUL/CD
félisten
thee
#13540
-
thee
csendes tag
nekem is lenne egy kérdésem:
a következő részt szeretném átfaragni:
Range("B11:K11").Select
Selection.AutoFill Destination:=Range("B11:K5010"), Type:=xlFillDefaultaz "5010"-es fix érték helyett ezt a számot egy integer-el szeretném megadni
hogy kéne szerintetek ezt megadni?
-
bajor14
csendes tag
Sziasztok!
A melóhelyen outlook 2010-et használunk és ebből kéne vmi statot csinálnom.
A lényeg, hogy vannak közös fiókjaink és abból kell összedzednem, hogy kihez mennyi mail jött/nap. Jelenleg számolgatással
történik a riportálás. Bármilyen ötletet/segítséget megköszönnék! -
motinka
tag
válasz
motinka
#13532
üzenetére
tehát először is meg kellene állapítani, azaz felállítani egy erő sorrendet, mind a hibakód, mind a lezárókód tekintetében, hogy melyikből mennyi van ( előbb a legtöbb alatta a kevesebb és így tovább).
aztán ha ez megvan akkor az első "nyerő" 4-et kellene heti bontásban darab vagy/és százalékosan megjeleníteni számszerűleg és grafikusan is
-
motinka
tag
válasz
Delila_1
#13527
üzenetére
köszönöm Delila, jó felé jársz, az alap adat tábla úgy néz ki mint ahogy megcsináltad, de először is azt nem értem, hogy a C oszlopból hogyan veszed ki bárhová a legtöbbször szereplő kódot, majd alá az következő és így tovább...
Ezt persze lehetne gy másik fülre is rakni mellé hogy abból a fajtából hány darab van összesen majd megvizsgálni 1-2-3-... hetekre -
Delila_1
veterán
válasz
motinka
#13525
üzenetére
Én sem értem teljesen, de úgy gondolom, hogy az "adott időszak" az adott hét lehet.
Heti bontásban készítettem egy táblázatot az egyes hibakódoknak megfelelő százalékos eloszlásról. Hogy ebből hogy lesz grafikon, azt még nem tudom, de a kérdés sem egészen fehér.
Az F oszlopba a C-ből speciális szűréssel (Adatok | Rendezés és szűrés | Speciális) írattam át az egyedi értékeket.
A G2 képlete:
=HAHIBA(DARABHATÖBB($A:$A;G$1;$C:$C;$F2)/DARABHATÖBB($C:$C;$F2);0)Ezt másolhatod jobbra, és le.
Ugyanígy készíthetsz összefoglaló táblázatot a Hibakód 2-ről. -
#13526
Fire/SOUL/CD
félisten
motinka
#13525
válasz
motinka
#13525
üzenetére
"a feladat első körben, állapítsam meg melyik az az első 4 hibakód ami az adott időszakban legtöbbször szerepel."
Eddig értem a feladatot.
A függvény a NAGY() névre hallgat"miután ez megvan e 4 illetve az összes többi (mint egyéb) heti bontásban a az adott hét összes százalékában..."
Na itt elvesztettem a fonalat, szóval készíts egy táblázatot manuálisan, tetszőleges adatokkal és arról egy képet, hogy hogy is kellene ennek kinéznie. Az A/B/C/D oszlopok kamu adatokat is tartalmazhatnak, csak azon adatokból minek kellene lenni az eredménynek, azt add meg, akkor érthetőbb lesz (számomra legalábbis) -
motinka
tag
Sziasztok, kaptam egy feladatot főnökeimtől, és lövetem nincs hogy álljak neki. Odáig elértem hogy legyűjtöttem egy csomó adatból azokat amikkel dolgozni kell. Ez a következő:
"A" oszlopban a hét számmal
"B" oszlopban a naptári nap
"C" oszlopban az ehhez a munkalaphoz tartozó hibakód 3 betűs kódja
"D"' oszlopban az ehhez a munkalaphoz tartozó lezáró kód 3 betűs kódjaa feladat első körben, állapítsam meg melyik az az első 4 hibakód ami az adott időszakban legtöbbször szerepel.
miután ez megvan e 4 illetve az összes többi (mint egyéb) heti bontásban a az adott hét összes százalékában és mindez egy grafikonban ábrázolva ahol a víizszintes tengelyen a hetek a hetekben a 4+1 tétel adatai.A másik ugyanez csak a lezárókódra vonatkoztatva.
Ha valaki tudna ebben segíteni nagyon hálás lennék
előre is köszönök bármi segítséget -
Delila_1
veterán
válasz
Z-Tom-ee
#13523
üzenetére
Írtam rá egy függvény Sarga_Osszeg néven.
Function Sarga_Osszeg(Tartomány As Range) As Double
Dim CV, ossz As Double
For Each CV In Tartomány
If CV.Interior.ColorIndex = 6 Then ossz = ossz + CV
Next
Sarga_Osszeg = ossz
End FunctionAz összegző cellába beírod: =sarga_osszeg(A1:G50), ahol az A1:G50 helyett a saját összegzendő tartományod kerül (egérrel is kijelölhető, mint minden más függvénynél). Adhatsz rövidebb nevet, két helyen kell átírnod a makróban.
Ezt a sárga hátteret veszi figyelembe, ennek a színkódja 6.
-
Z-Tom-ee
csendes tag
Sziasztok!
Egy kiegészítésre lenne szükségem. Van egy táblázat, amit makró formáz, bizonyos sorokat sárgára színez. Egy másik makró a sárga cellákat összeadja. Ez rendben is van, de a táblázat mindig más adatokat tartalmaz, így más lesz a sorok/sárga sorok száma is és mindig kézzel kell beállítani, hogy mettől meddig tartson a vizsgált tartomány (ahol a sárga cellákat keresi) és hogy hova írja az összeget. Ki szeretném bővíteni a keresési tartományt. A tartomány ugyan át tudom írni, teszem azt 400 sor helyett vizsgáljon 600-at, abban biztos benne lesz minden, de az összeget nem a 601. sorba kellene írnia, hanem a táblázat végére. Az utolsó teli cella keresésének elve nem jó, mert a táblán belül is vannak üres sorok, viszont a végösszeg sora más színű. Hogy tudom megmondani azt, hogy az "X" (mondjuk narancs, vagy piros) sorba írja az összegzést? Esetleg eggyel utána... (ez még kérdéses)
Előre is köszönöm.
-
#13522
bandus
veterán
Fire/SOUL/CD
#13521
válasz
Fire/SOUL/CD
#13521
üzenetére
tudom, hogy nem erre szolgál, csak ez áll hozzá a legközelebb
de nemhiszem el, hogy ne lehetne megoldani valahogy -
#13521
Fire/SOUL/CD
félisten
bandus
#13520
-
sziasztok!
az lenn a kérdésem, hogy ilyesmi: [link] lépcsős függvényeket hogyan lehetséges excelben ábrázolni? az alakja szépen megvan ha pontdiagramban ábrázolom, csak az lenne jó, ha például össze tudnám kötni az ugyanazon x értékhez tartozó 2 db y értéket egy függőleges vonallal, illetve az ugyanazon y értékhez tartozó x értékeket is. remélem érthető a kérdésem
köszi előre is -
Delila_1
veterán
válasz
Lestat777
#13504
üzenetére
Feltettem ide a fájlt, ha már Fire megígérte, nem hazudtolom meg.
A dátumokat egyenként kell majd beírni, mert ha képlettel van (pl. C4-ben =A4+1), akkor nem találja meg.
A makró minden indításnál az előző napon be nem fejezett feladatokat átviszi a következő napra, az előző napiakból törli. Ha nem kell törölni, a makróban (ThisWorkbook-hoz rendelve) a megjegyzést tartalmazó sort töröld ki.
-
#13516
Lestat777
csendes tag
Fire/SOUL/CD
#13515
Lestat777
csendes tag
válasz
Fire/SOUL/CD
#13515
üzenetére
Köszönöm ez eddigi segítséget. Ránézek erre a Calendárra.
-
#13515
Fire/SOUL/CD
félisten
Lestat777
#13513
válasz
Lestat777
#13513
üzenetére
Abban sajnos nem tudok segíteni, mert ugyan kivitelezhető, de relative összetett feladat jól kivitelezni, én meg nem mindig vagyok elérhető. Persze Delila_1 és mások biztos tudnak segíteni.
UI: A Windows Live Naptár-t is megpróbálhatod (ha eddig nem tetted esetleg), hasonló a Goggle Calendar-hoz, ugyanúgy megoszthatóak a naptárak, hátha az nem omlik össze... [link]
-
#13514
Boglya
senior tag
Fire/SOUL/CD
#13512
Boglya
senior tag
válasz
Fire/SOUL/CD
#13512
üzenetére
Ez megoldotta a problémát, köszönöm!
-
#13513
Lestat777
csendes tag
Fire/SOUL/CD
#13512
Lestat777
csendes tag
válasz
Fire/SOUL/CD
#13512
üzenetére
Értem
. Gondolkodunk a SharePoint által igénybe vehető intraneten, de nem tudom, hogy ott lehetséges-e mindenkinek külön Calendárt létrehozni, majd 1 személy által mindent ellenőrizni. Ezért lett volna kiváló az Excel ebben a formában. -
#13512
Fire/SOUL/CD
félisten
Boglya
#13509
válasz
Boglya
#13509
üzenetére
Nem fejtetted ki, mert több lehetőséget is takarhat a "Excelből szeretnék beolvasni számokat wordbe" lehetőség... De mindegy, most hogy írtad, hogy körlevélről van szó, akkor 2. pont (A körlevélben az ALT+F9-el jelenítheted meg a mezőkódokat)
Lestat777
Értem. Sajnos Excel-ben összetett feladat a kivitelezése... -
#13511
Lestat777
csendes tag
Fire/SOUL/CD
#13510
Lestat777
csendes tag
válasz
Fire/SOUL/CD
#13510
üzenetére
Szia.
Sajnos tesztelve volt annó és teljesen összeomlott szegényke. Ez egy egyszerű de használható változat lenne. + Örülünk ha Excelbe betudják írni, hogy állnak a teendőkkel.
Üdv.
-
#13510
Fire/SOUL/CD
félisten
Lestat777
#13508
válasz
Lestat777
#13508
üzenetére
Első körben azt tudom javasolni, hogy a Google Calendar-t nézd meg, hátha megfelel a célra. Sok funkciója van, magyar nyelvű és megoszthatod nyilvánosan csoport avagy konkrét felhasználó számára is(engedélyekkel), aki elérheti és belenézhet. Nem biztos, hogy mindenre megfelel, amit szeretnél, de azért nézz rá, hátha.
Alapfeltétel, hogy kell egy Google fiókot létrehozni, itt meg találsz leírást: [link] -
#13509
Boglya
senior tag
Fire/SOUL/CD
#13507
Boglya
senior tag
válasz
Fire/SOUL/CD
#13507
üzenetére
Ezt kifelejtettem, körlevél adatmezőként olvastatom be a cellákat.
-
#13508
Lestat777
csendes tag
Fire/SOUL/CD
#13505
Lestat777
csendes tag
válasz
Fire/SOUL/CD
#13505
üzenetére
Szia.
Sajnos minden gépre rá kellene raknom (mindenkinek egyéni Calendar), úgy hogy a főnök távolról is megtudja nyitni, hogy ki - mit csinált, hogy haladt a munkával. Sajnos nem ismerek más erre alkalmas programot
-
#13507
Fire/SOUL/CD
félisten
Boglya
#13506
-
Boglya
senior tag
Sziasztok!
Excelből szeretnék beolvasni számokat wordbe úgy, hogy két tizedesjegyig kerekítve legyenek kiírva. A KEREKÍTÉS függvény végzi is a dolgát, amíg számjegynek 0 van beírva nincs gond, csak egész számot olvas be a word. Azonban ha 2-t adok meg tizedesjegynek, ugyan az excelben tényleg 0-k a további tizedesek, akárhányat is jelenítsek meg, a wordben ellenben kiír egy hosszú tizedessort (14et összesen) és az utolsó számjegy 0-tól eltérő.
Ez most valami hiba? Hogyan küszöbölhető ki? -
#13505
Fire/SOUL/CD
félisten
Lestat777
#13504
válasz
Lestat777
#13504
üzenetére
Biztos, hogy ezt Excelben akarod kivitelezni? Mert erre vannak külön alkalmazások, ingyenes is és akár magyar nyelvűre is rá lehet akadni. (Ha használsz Outlook-ot abban is van)
Delila_1
Hajnali 9-kor az internetszolgáltató felébresztett, mert gond volt a hálózattal...
Igen, a -1 biztosan rossz megoldás, én sem értem (pedig megvolt az első kávé is) -
Lestat777
csendes tag
Sziasztok!
Segítségre lennem szükségem egy Exceles naptárat szeretnék létrehozni.
Amibe napi teendőket szeretnék beleírni, majd egy állapot oszlopban jelölni, hogy sikeresen teljesítve lett-e. Ide szeretnék egy feltétel írni: Amennyiben nem teljesült a feladat a következő napra tegye át automatikusan. Létrehoztam egy logika oszlopot is: oda kerülne a képlet( és őt ellehetne rejteni). Belinkelem hogy miről lenne szó.
Köszönöm.
-
#13503
m.zmrzlina
senior tag
Delila_1
#13499
m.zmrzlina
senior tag
válasz
Delila_1
#13499
üzenetére
Fire és Delila köszönöm a megoldást. Működik.
Eredetileg ugyan nem így (makróval) terveztem hanem a Hivatkozás beszúrása> Dokumentum adott pontja menüpont segítségével de azzal a módszerrel a hivatkozott cella a "kliensterület" jobb alsó sarkába került (vagy máshová de nem a bal felsőbe). Gondolom a trükk a Scroll:=True-ban van de ezt nem lehet közvetlenül használni a munkalapon.
-
Delila_1
veterán
Fire még biztosan alszik a fél 1-es vacsorája után, ezért én válaszolok.
Az ÖSSZEFŰZ(">";D2) azonos értékű az ($E$2:E2;">" & D2)-vel. Az első megoldás is a D2 értékét fűzi hozzá a relációs jelhez.
Az =összefűz("alma";"fa") és az ="alma" & "fa" egyenlő eredményt ad.A -1-et nem értem, hiszen a feladatban az szerepelt, hogy a most érkező kocsival is kell számolni, elvégre az is várakozó helyre kerül.
-
csdm
senior tag
=HA(D2=MIN($D$2:$D$31);1;DARABHATÖBB($E$2:E2;">" & D2))-1 --> így már tényleg jó
Hivatalos megoldás:
=DARABTELI($E$2:E2;ÖSSZEFŰZ(">";D2))-1összefűz-zel mit érek el?
mind a két megoldásban szerepel a ">" . miért nem hiányzik előle és mögüle cella/érték, amit összehasonlítunk? nem tudtam, hogy így "csupaszon" is szerepelhet..
amúgy 2007 Excel-t használok, szóval a 2010 tökéletes!
amúgy ez a feladat, amin ennyit szenvedtetek 2 nyomorúságos pontot ér, azt hiszem, ezt simán elengedtem volna a 150-ből.Köszi mindkettőtöknek!
![;]](http://cdn.rios.hu/dl/s/v1.gif)
Nincsen ötletem.
)
. Gondolkodunk a SharePoint által igénybe vehető intraneten, de nem tudom, hogy ott lehetséges-e mindenkinek külön Calendárt létrehozni, majd 1 személy által mindent ellenőrizni. Ezért lett volna kiváló az Excel ebben a formában.
Új hozzászólás Aktív témák
Hirdetés
Fferi50- Kerékpárosok, bringások ide!
- Macron betiltatná az EU-ban a közösségi médiát a 15 év alattiaknak
- Melyik tápegységet vegyem?
- iPhone-t használók OFF topikja
- Nyíregyháza és környéke adok-veszek-beszélgetek
- Counter-Strike: Global Offensive (CS:GO) / Counter-Strike 2 (CS2)
- Torrent meghívó kunyeráló
- Milyen egeret válasszak?
- Milyen légkondit a lakásba?
- Linux kezdőknek
- További aktív témák...
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - NYÁRI AKCIÓ!
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Eladó steam/ubisoft/EA/stb. kulcsok Bank/Revolut/Wise (EUR, USD, crypto OK)
- Antivírus szoftverek, VPN
- AKCIÓ! Apple Macbook Pro 16" 2019 i9 9980HK 64GB 500GB Radeon Pro 5500M hibátlan működéssel
- ÁRGARANCIA!Épített KomPhone Ryzen 7 9800X3D 32/64GB RAM RTX 5070Ti 16GB GAMER PC termékbeszámítással
- Gamer Laptop, Gamer Monitor és Konzol Felvásárlás Magas Áron, Gyorsan és Egyszerűen!
- DOKKOLÓ BAZÁR! Lenovo, HP, DELL és egyéb más dokkolók (TELJES SZETTEK)
- 125 - Lenovo Legion Pro 5 (16ARX8) - AMD Ryzen 9 7945HX, RTX 4070
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: CAMERA-PRO Hungary Kft
Város: Budapest