- Xiaomi 13 - felnőni nehéz
- Xiaomi 15 Ultra - kamera, telefon
- Mobil flották
- iPhone topik
- Motorola Razr 60 Ultra - ez a kagyló könnyen megfő
- Erős specifikáció, kompakt formában
- Samsung Galaxy A54 - türelemjáték
- Galaxy Z Fold6-hoz viszonyítva mutatják, mennyivel lesz vékonyabb a Z Fold7
- Milyen okostelefont vegyek?
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
-
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
-
föccer
nagyúr
válasz
Fferi50 #35939 üzenetére
Hol hangzik, remelem boldogulok vele holnap.
Az auto szuro beallitasait milyen objektumon erem el? Ezt suma ertekadassal tudom modositani?
Illetve vektor tipust ismer a wba? Tehat definialni egy vekror adattombot valamilyen tipusbol? Monsjuk array of integer vagy valami ilyesmi.
Szepen lassan jonnek elo a regi emlekek... asszem holnap is jot fogok szorakozni...
-
föccer
nagyúr
válasz
Fferi50 #35937 üzenetére
A makrórögzítésekkel eleddig mindig csak a bajom volt, de ha van rá reális esély, hogy valahogy kiszedjem belőle az infót, akkor megéri szenvednem vele.
Egyébként este hazafelé kigondoltam egy viszonylag gyors algoritmust, ami járható út. A nagy adattáblából leszűröm a szükséges adatpárokat, majd gombnyomásra kimásolom őket egy külön lapra, csoportosítva egymás mellé, gyorsan egymás után, végig szaladok azon a 30-40 paraméteren pár perc alatt. A kérdéses lapon pedig választéklistából, indirekttel 1 kattintással tudom frissíteni a teljes diagrammot, leírom a 2 paramétert és már vissza is adja nekem a szükséges számokat. Ha másképpen nem megy, ez lesz a megoldás.
Ha szövegesen megkapom az egyenletet az jó, mert azt már szét tudom szedni függvényekkel és át tudom konvertálni számokká. Király lenne.
-
föccer
nagyúr
válasz
Fferi50 #35934 üzenetére
Valamikor megdicsőült gyermekkoromban foglalkoztam objektum orientált programozással, szóval nem teljesen idegen számomra ennek a lelki világa. Leginkább a programnyelv ismerete (legyen az bármennyire is egyszerű), illetve az objektumok és funkciók ismerete hiányzik.
Köszi, ezzel a szamárvezetővel már szerintem el fogok holnap boldogulni, sokat segítettél, köszönöm szépen.
üdv, föccer
-
Apollo17hu
őstag
válasz
Fferi50 #35906 üzenetére
Szia!
A szövegből oszlopoknál a mező típusának beállítása jó ötlet volt. Hagyhattam "Általános" típusban, mert van egy külön opció arra, hogy milyen karakter jelölje az ezres csoportosítást és a tizedeshelyeket. Ezt kellett vesszőről pontra módosítani. Így működik, köszönöm!
-
Illusion1010
senior tag
-
Delila_1
veterán
-
föccer
nagyúr
válasz
Fferi50 #35862 üzenetére
A keresett értéket ismerem, de nem tudom/akarom kézzel begépelni.
Tehát leszűrük egy több feltétel szerint egy adattáblát, és a szűrt táblázat első érvényes sorában szereplő, szöveg értékeket akarom kinyerni. A szám adatokkal megbírkózok az összesít függvénnyel el tudom végezni az elemzést, illetve átlagolással ki tudom nyerni az infót. A szöveggel van bajom.
Tehát a leszüt lista első sorából kellene a felső részre átpaterolni az adatokat, ahonnan egy mozdulattal tovább tudom tolni érték másolással.
Köszi
-
-
-
NemszakiTomi
csendes újonc
válasz
Fferi50 #35741 üzenetére
Szia!
Köszi, megnéztem.
0 értéket adott vissza, de azok a cellák is, amiknél amúgy azt egérkurzor mutatóujjá változik (és kiírja a "mailto:emailcím - egy kattintásra követi" tooltippet).
Megnéztem a makrókat is a munkafüzetnél, nem sorolt fel egyet sem, hogy lenne.
A fájl mérete alapján kell lennie benne adatnak, de egyszerűen nem tudom, hogy sikerült ez a manőver, hogy semmi sem látszik...
-
RAiN91
őstag
válasz
Fferi50 #35729 üzenetére
Nem biztos, hogy jól el tudom magyarázni, de azért megpróbálom.
Az a probléma, hogy a törlés parancsom ugyan akkor törlődik ki, mint amikor bekerül az XYZ a cellába, és ez problémát okoz. Én azt hittem, párhuzamosan adja ki ilyenkor a parancsot, de akkor viszont csak annyi a gond, hogy túl gyors a program
Időzítővel kell megoldani, de eddig nem találtam jó időzítőt, mert közben az excelem online frissítése leáll. -
Acustic
újonc
válasz
Fferi50 #35715 üzenetére
Sub névminta()
'
' névminta Makró
' ctrl+n a neveket előbb besárgítja, majd kereső funkcióra áll, megtalálja az első nevet.
'
' Billentyűparancs: Ctrl+n
'
Range("H1").Select
Selection.Copy
Range("I1").Select
Application.ReplaceFormat.Clear
Application.ReplaceFormat.NumberFormat = "General"
With Application.ReplaceFormat
.HorizontalAlignment = xlRight
.VerticalAlignment = xlTop
.WrapText = False
.Orientation = 0
.AddIndent = False
.ShrinkToFit = False
End With
With Application.ReplaceFormat.Font
.Name = "Arial"
.FontStyle = "Normál"
.Size = 12
.Strikethrough = False
.Superscript = False
.Subscript = False
.ThemeColor = 2
.TintAndShade = 0
.ThemeFont = xlThemeFontNone
End With
Application.ReplaceFormat.Borders(xlLeft).LineStyle = xlNone
Application.ReplaceFormat.Borders(xlRight).LineStyle = xlNone
Application.ReplaceFormat.Borders(xlBottom).LineStyle = xlNone
Application.ReplaceFormat.Borders(xlDiagonalDown).LineStyle = xlNone
Application.ReplaceFormat.Borders(xlDiagonalUp).LineStyle = xlNone
With Application.ReplaceFormat.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 65535
.TintAndShade = 0
.PatternTintAndShade = 0
End With
Application.ReplaceFormat.Locked = True
Application.ReplaceFormat.FormulaHidden = False
Columns("A:A").Select
Selection.Replace What:="John", Replacement:="John", LookAt:=xlWhole, _
SearchOrder:=xlByColumns, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=True
Application.ReplaceFormat.NumberFormat = "General"
Range("I2").Select
Application.ReplaceFormat.Clear
Application.ReplaceFormat.NumberFormat = "General"
With Application.ReplaceFormat
.HorizontalAlignment = xlLeft
.VerticalAlignment = xlTop
.WrapText = False
.Orientation = 0
.AddIndent = False
.ShrinkToFit = False
End With
With Application.ReplaceFormat.Font
.Name = "Arial"
.FontStyle = "Normál"
.Size = 12
.Strikethrough = False
.Superscript = False
.Subscript = False
.Color = -16776961
.TintAndShade = 0
.ThemeFont = xlThemeFontNone
End With
Application.ReplaceFormat.Borders(xlLeft).LineStyle = xlNone
Application.ReplaceFormat.Borders(xlRight).LineStyle = xlNone
Application.ReplaceFormat.Borders(xlBottom).LineStyle = xlNone
Application.ReplaceFormat.Borders(xlDiagonalDown).LineStyle = xlNone
Application.ReplaceFormat.Borders(xlDiagonalUp).LineStyle = xlNone
With Application.ReplaceFormat.Interior
.Pattern = xlNone
.TintAndShade = 0
.PatternTintAndShade = 0
End With
Application.ReplaceFormat.Locked = True
Application.ReplaceFormat.FormulaHidden = False
Range("A1").Select
Cells.Find(What:="John", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase _
:=False, SearchFormat:=False).Activate
End SubA keresés Mindig a H1 ben lévo szóra indulna el, ami változik, hiszen a "h" oszlopban szereplo nevek érkezési sorrendben változnak. Hogy értheto legyen ....... Szinkront rendezek. Jon egy színész, és azt mondom, hogy van egy John nevu karaktere. Besárgítom neki az összes John-t, hogy jobban átláthato legyen számára. Amikor pedig felvettük azt a sort, akkor átváltozik pirosra a név. ebbbol tudom, hogy már fölvettuk azt a szereplot. De mivel egy nap 60 szor kell ezt megcsinálni, az már fáraszto.
Minden munkafolyamatra van már kész makro-m ....de ez már naggyon megakasztott
) köszönöm a segítségedet ......az is nagy dolog, ha legalább azt meg tudod mondani, hogy merre induljak el. MÁr az angol oldalakat is végignéztem, de valószínuleg nem látom át a lehetoségeket. .....
-
nagyzoliph
csendes tag
válasz
Fferi50 #35710 üzenetére
Szia! Ahogy te írtad a képletet úgy is próbáltam és '-' ír ki( tehát hibát dob ki gondolom a hahiba képlet miatt. Ebben a cellában az eredményem ha nem bántom a képletet -8, tehát ha jól sikerülne megirnom a ha függvényt akkor kikéne dobnia a 0 eredményt. De mindig a hahiba feltétele miatti '-' jelet irja a cellába.
-
lenkei83
tag
válasz
Fferi50 #35656 üzenetére
Szia!
De van, közben rájöttem mi a gond, de a megoldást még nem találtam ki.
Combobox change-hez van hozzárendelve a színezés, viszont amikor kiválasztok a comboboxban egy másik értéket, az csak end sub után lesz aktív point. Vagyis amíg nem fut le teljesen a chang event, addig a diagram előző point értékeit veszi figyelembe és ez alapján színez. Viszont az előző dián lévő point az új combo választás szerint szerepelhet teljesen más helyen a diában és így teljesen bután néz ki a dia.Érthető ez így?
üdv:
P. -
bb.bocs
őstag
válasz
Fferi50 #35495 üzenetére
hivakozások vannak. de végül úgy oldottam meg hogy egyben kimásoltam a linkeket,igy a sorrend is megmaradt(átnéztem utána) éééés egy külön prugival leszedtem az urleken lévő képeket. mappába tette és kész
ez a makrós dolog micsoda? ez nekem új
köszi a segítséget
objektumokra nem talál semmit. a linkek nem kékek! (már ugye megoldottam de egy próbát megér hogy ha legközelebb iylenbe futok hátha könnyebben is megoldhatombár a végleges megoldás is fényévekkel könnyebb mint egyenként leszedni.a makró sem talált semmit
-
Cicero
őstag
válasz
Fferi50 #35445 üzenetére
A hszem másodszori elolvasásra valóban nem sikerült valami érthetőre. A cellatartomány (a cellák száma) változik a min-max által határolt intervallumban, amit egy lépésközzel osztanék fel. Azt szeretném elérni, hogy az oszlopot ne manuálisan kelljen "lehúzni", hanem min-től indulva húzza le magának az excel, a lépésközzel mindig inkrementálva a következő cellát. Ez az automatizálás miatt lenne fontos.
-
csferke
senior tag
válasz
Fferi50 #35434 üzenetére
=IF(SUM(akármi)=0,"",SUM(akármi))
Ezzel megoldódott az A és B oszlopban a feltételes formázás/színezésDe mivel az A és B oszlopban tömbképlettel kapott adatokkal tovább kell számolnom az E oszlopban
=A52-B52
a következő vizsgálatot is el kell végezni az E oszlopban=IF(ISTEXT(A52);"";(A52-B52))
eddig OK
de hogyan lehet egyszerre vizsgálni azA52:B52
tartományt, mert mindkettő lehet szám vagy üres is de az E oszlopban a megfelelő érték kell, hogy legyen szám # üres -
butch3r
senior tag
válasz
Fferi50 #35340 üzenetére
Szia
A cél az volna, hogy relatív dinamikus legyen a tábla. Frissítem a háttérben az értékesítési adatokat, és azon a sheeten amire kérem a képletet oda csak beillesztem a termékek egyedi azonosítóit, beírom, mely dátumok közotti időszak érdekel és kiköpi az adott időszakra összesített adatokat, amiket csak a másik fileomba amiben dolgozom velük be kell illesztenem.
Kimutatásnál ki kéne választgatnom a termékeket, ami modnjuk 70dbnál túl sok idő.
üdv
-
norbika84
csendes tag
válasz
Fferi50 #35239 üzenetére
Grafikon beszúrásánál új munkalapra tettem egyből, és ezt másoltam át másik munkalapra, de így is csinálta azt, hogy nem maradtak meg a formázások. Illetve azt is csinálta még az eredeti grafikon, hogy ahol nem volt érték (mert a képlet szerint nem kellett), akkor oda 0 vett értéknek, nem pedig semmit (pont grafikonnál), ezért onnan ki kellett törölnöm a képletet. Erre valami megoldás lenne?
-
Zimmy88
tag
válasz
Fferi50 #35144 üzenetére
Szia!
Egyféle költségről van csak szó, mindig csak tárgyhavi adatokkal, a 10 oszlop csak részletezés (hány db, milyen méret, milyen egységár), de nekem csak az összeg a lényeg a telephelyenként. A felosztási % éves szinten fix. Úgy képzelem, hogy valahogy meg lehetne adni a pivotban, hogy a gödi telephelyek összesített költségét 2 sorban mutassa, egy előre beírt arány alapján bontva.
A számított mezőt eddig csak arra használtam, ahol a pivot minden soránál ugyanazt a műveletet kellett elvégezni, pl eredeti összeg nettóját akartam látni, vagy éves összeget átlagolni munkanapokra (elosztva 250-nel). De itt úgy lenne az igazi (csak nem tudom, meg lehet-e valósítani a pivotban), ha a gödi, budapesti, stb adatok esetében nem egy plusz oszlop lenne, hanem egy (kettő, három, stb) plusz sor, ahányfelé bontani kell. -
Zimmy88
tag
válasz
Fferi50 #35142 üzenetére
Azért gondoltam a számított mezőre, mert meg lehet adni képletet (csak azt nem tudom, hogy ennek milyen korlátai vannak, pl ha-függvényt használhatok-e).
Alaptábla: külső forrásból származik, 10 oszlop és kb ezer sor, minden hónapban megkapom. Ebből kell készítenem egy listát, hogy melyik telephelyen mennyi költség merült fel az adott hónapban.
A probléma, hogy egy településen lehet több telephely is, és az alaptábla csak település bontású. Ahol több telephely van egy településen, ott adott egy felosztási %, ami alapján az adott teleülésen felmerült költségeket osztanom kell. Eddig "manuálisan" csináltam a bontást, tehát ahol nem kellett arányosítani ott a pivotbeli értéket másoltam a végleges táblába, ahol pedig osztani kellett, ott a pivot értékét 3-6felé bontottam a megadott %-ok alapján, és így került a végleges táblába.
Ezen szeretnék egyszerűsíteni, ha lehet.
Ja és '13-as excelt használok. -
Zimmy88
tag
válasz
Fferi50 #35139 üzenetére
Az a baj, hogy az alaptábla közel 1000 sor, és több olyan település is van, ahol bontani kellene, van ahol 5-6felé. Így elég körülményes minden hónapban végignézni az alaptáblát, hogy melyik az a sor amelyik bontandó, és beszurkálni alá a bontásokat. Ezért gondoltam, hogy a pivot számított mezőit csak 1x kell megcsinálni, utána már minden további hónapban számol magától a pivot frissítésével.
-
Dilikutya
félisten
válasz
Fferi50 #35102 üzenetére
Hello! Ez tökéletes! Először nem értettem, minek az osztás bele, de világos, hogy autokitöltéssel csak így fog működni, mivel a két képletet felváltva írja be az Excel, és a szám páronként növekszik. Szükség szerint csak az OSZLOP() utáni értéket kell módosítani, ha nem az első oszlopból indul a számolás.
-
BullZeye
veterán
válasz
Fferi50 #35070 üzenetére
Köszönöm, érthető, viszont ezzel az a bajom, hogy kiírja azokat is, amikkel semmi baj nincs. (Alma, Eper)
És most csak 1000 soros a tábla, de lesz amikor 10ezer soros, és az elétérések száma csak 2 lesz, és lesz 7000 féle termék, de végig kell nézni az összeset, ami több órás művelet, és emberi hibából nem 100%-os.szerk.:
Hmm, végül is lehet egy HA fügvényt is odarakni, hogy, HA $M1=N$1, akkor nincs változás, ha nem, akkor van. és erre lehet szűrni.Köszi a tippet, most használom.
-
BullZeye
veterán
válasz
Fferi50 #35067 üzenetére
Bocsi, egy picit már befáradtam, szememig alig látok, ha van pár perced, megtudnád mutatni, hogy hogy gondolod? Mert esküszöm nem értem. :\
Itt egy példa XLS, amiben minden oké, csak a narancs értéke hibás.
Most kis szünet, pár órán belül visszatérek rá sajnos közbejött még valami -_-, éljen a munka ünnepe
-
Mentavirág
újonc
válasz
Fferi50 #35026 üzenetére
Köszönöm a választ! Sajnos nincs konkrét dátum, csak adott napok, és annyit tudni, hogy az 1. nap hétfő volt. Maga a munkalap így néz ki:
Ebben szeretném kicserélni a számokat arra, hogy hétfő, kedd stb.
A másik táblázat, amit készítettem hozzá, így néz ki (az eleje):Arra gondoltam, hogy valahogy ez alapján szeretném kicserélni tömegesen a számokat a másik munkalapon, de nem tudom, hogy erre van-e lehetőségem Excelben?
-
Traxx
őstag
válasz
Fferi50 #34992 üzenetére
Az a baj, hogy kevésbé van benne logika
Három 1-5ig terjedő szám összeszorzásából kapom meg azt, ami nekem kell - viszont épp ez a metódus jelenti a gondot. Általánosságban annyi, hogy a szorzótagok között ha van 4-es, akkor sárga a szín (de ez sem mindig igaz), viszont ha 5-ös is van, akkor még 1x1x5 esetében sem lehet zöld. Ezért színezem manuálisan a cellákat, mert nincs egyértelmű megfeleltetés. Az exceles logika hiánya miatt gondoltam én is arra, hogy itt a makró lehetne esetleg a megoldás, ahhoz viszont sügér vagyok még mindig sajna
Illetve a jövőbeni változtatásokhoz is jó lehet, mert elő fog fordulni, hogy az egyik cella színe a "kedvező" értékek miatt zöld (tehát nem kell beletennem az átlagba), az a következő alkalommal sárga vagy piros lesz.
Kb. így néz ki, és a G oszlop végére kerülne az átlagolt érték.
-
Doki16
addikt
válasz
Fferi50 #34994 üzenetére
Köszi. Ez jól működik. Azt még meg lehet oldani, hogy amikor lehúzom és az első cellában nincs érték akkor a második cellába ne automatikusan a segédtábla legelső értékét írja be? Az lenne jó ha csak simán üres maradna és csak akkor tenne bele értéket ha már hozzá van adva az RSL* stb. szöveg.
-
Bjørgersson
félisten
válasz
Fferi50 #34976 üzenetére
Ez viszont egyszerűen csak lecseréli az adott cellában a tollat valami másra, nem?
Ah, egyre nagyobb a kavarodás.
Tehát az adott cellákban nagyon hosszú terméknevek vannak, amiben az utolsó előtt szó a toll, az utolsó pedig egy hétjegyű cikkszám. A cikkszámot már sikerült megoldani, most viszont arra vagyok kíváncsi, hogy az utolsó előtt négybetűs szót ki lehet-e onnan vágni valahogy egy másik cellába. Tegyük fel, hogy nem mindegyik cellában toll az utolsó előtti szó, viszont minden esetben négybetűs.
-
ZaiKo
csendes tag
válasz
Fferi50 #34613 üzenetére
Szia!
Köszönöm a választ!
Azt hogy tudom automatizálni, hogy a második ilyen sémát hányadik karaktertől keresse?
Ugye a két számlaszámnak a pozíciója totál változó lehet. Lehet hogy azonnal egymás után vannak, lehet hogy az első előtt van még 10 karakternyi valami, lehet a kettő között 10 karakternyi valami (a 10 itt most egy random szám). -
HREH
senior tag
válasz
Fferi50 #34611 üzenetére
Köszi!
A frissítő rutin kifejezést nem értem pontosan, ugyanis automatikusan frissít percenként (így van megadva a külső adatok átvételénél), nem én csinálom manuálisan.
Átírni pedig nem szeretném pontra, jobban szeretem a vesszőt elválasztóként.
Most próbáltam úgy is, hogy egy makróba beteszem a dolgokat, a rögzítéssel rögzítettem is, de abszolút nem azt csinálja, amit kellene neki(adatok frissítése, majd cseréje)
na mindegy, még elszórakozok vele egy kicsit(#34610) pigster: Ez bevált, nagyon köszönöm
-
bsh
addikt
válasz
Fferi50 #34466 üzenetére
tudom hogy kell elmenteni egy fájlt. ez szándékosan van így csinálva, hogy más néven is lehessen menteni, ha nem akarja a user felülírni a fix nevű fájlt. ha nem menti el a user, akkor a mégse-re kattintva megjeleníti az excelt. és nyilván a show-val mutatom meg a dialogot. a kérdés az, miért a háttérben jelenik meg, és hogy tudom előtérbe hozni. appactivate-tel nem megy.
-
lenkei83
tag
válasz
Fferi50 #34421 üzenetére
Közben megtaláltam.
Ribbon meghívásnál száll el a CopyMemory sornál.
#If VBA7 Then
Function GetRibbon(ByVal lRibbonPointer As LongPtr) As Object
#Else
Function GetRibbon(ByVal lRibbonPointer As Long) As Object
#End If
Dim objRibbon As Object
CopyMemory objRibbon, lRibbonPointer, LenB(lRibbonPointer)
Set GetRibbon = objRibbon
Set objRibbon = Nothing
End Function
Új hozzászólás Aktív témák
Hirdetés
- Xiaomi 13 - felnőni nehéz
- Mielőbb díjat rakatnának a görögök az olcsó csomagokra az EU-ban
- OTP Bank topic
- E-roller topik
- Elképesztő mértékben tömörítenék be a nagy nyelvi modelleket
- Foxpost
- WoW avagy World of Warcraft -=MMORPG=-
- Xiaomi 15 Ultra - kamera, telefon
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Milyen légkondit a lakásba?
- További aktív témák...
- Windows 10/11 Home/Pro , Office 2024 kulcsok
- Kaspersky, McAfee, Norton, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem, Most kedvező áron!
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - NYÁRI AKCIÓ!
- Vírusirtó, Antivirus, VPN kulcsok
- ÁRGARANCIA!Épített KomPhone Ryzen 7 9800X3D 32/64GB RAM RTX 5070Ti 16GB GAMER PC termékbeszámítással
- DELL Precision 7540 - Intel Core i9-9980HK, RTX 3000 (nagyon erős GPU-val)
- Microsoft Windows, Office & Vírusirtók: Akciók, Azonnali Szállítás, Garantált Minőség, Garancia!
- 2db Dell PowerEdge R740 2U Rack Szerver és 3db Netapp FAS2040 NAS
- ÁRGARANCIA! Épített KomPhone Ryzen 5 9600X 32/64GB RTX 5070 12GB GAMER PC termékbeszámítással
Állásajánlatok
Cég: CAMERA-PRO Hungary Kft
Város: Budapest
Cég: PC Trade Systems Kft.
Város: Szeged