-
Fototrend
Fototrend
Új hozzászólás Aktív témák
-
Wyll
őstag
Mit értesz az alapcellán és a viszonyítási alapon? Mmint mi a különbség?
Szerintem pont ez a marha jó a relatív nevekben, hogy dinamikusan, bárhol használhatók!
Épp a múlt héten kellett írnom két elég nagy többszörösen összetett függvényt, és 1000x könnyebb volt benne tájékozódni nevekkel, mint cellahivatkozásokkal. Sőt, előre meg tudtam írni notepad-ban, nem kellett a cellákkal foglalkoznom. De egy csomó tutorial is van a neten relatív nevekkel. Nem hinném, hogy ellenjavallt lenne.Szerintem VBA-ban annyi lesz a gond, hogy a Range() csak így simán object qualifier nélkül az ActiveSheet-re vonatkozik, aminek a bal felső cellája (a viszonyítási pontja) pont az A1. Éppen ezért lehet megadni neki pl ("B3")-at, ami így tényleg a B3-as cellát fogja jelenteni.
De ha "balra mutató" (negatív offset) relatív nevet akarok használni, akkor meg kell adnom, hogy mihez képest.. Mindjárt megnézem. (vagy majd holanp
) -
Wyll
őstag
Az előző képet még a melóban csináltam. De nyugodtan elhiheted, hogy ott is csak két név volt
Viszont az azért ezen is látható, hogy az E3:F10 cellákban, de legalábbis a képen az F7 cellában proba (aosz-szal azonos) van, és helyesen az A7 értékét adja (illetve E3:F10-en belül A-nak azonos sorában lévő cella értékét adja) eredményül.
És azt gondolom, hogy a VBA Range("proba").Address -nek is ugyanezt kéne visszaadnia, ha ugyanazon a cellán állva futtatom. Az MSDN szerint ez teljesen legális használat. ("Similarly, you can use a named cell instead of A1..."). Bár relatív hivatkozásra ott sincs példa.
Btw. sajnos nem lehet egyszerre láttatni a névjegyzéket, a VBA szerkesztőt meg a messagebox-ot is.
-
Fire/SOUL/CD
félisten
Ez egy teljesen új kép... Annak jobban örültem volna, ha a korábbi állapotban(amiről a korábbi képet beraktad) készült névjegyzéket láttam volna, mert itt az újnál már aosz sincs stb...
Maradva akkor ennél az új állapotnál, ha elmented a táblázatot, majd (biztos, ami biztos) nyomsz egy F9-t, azt követően a makró nem írhatja ki az $A$1-t, hanem az $A$7-t, mint a proba tartomány címét.
(Amúgy itt már helyes a címzés, mert az F7 cellában valóban a próba tartomány (ami az A7) értéke jelenik meg, nem mint korábban) -
Wyll
őstag
De nincs semmilyen átfedés:
Itt ugyanúgy $A$1 lesz a végeredmény....
-
Fire/SOUL/CD
félisten
-
Wyll
őstag
-
Fire/SOUL/CD
félisten
-
Wyll
őstag
Az, hogy aosz egy relatív (részben $ nélküli) cellahivatkozás. (A oszlop azonos sorban lévő cellája.)
És cellákban használva jól működik, ahogy az látható is,
viszont VBA-ból szemmel láthatóan más címre oldódik fel, mint a worksheet celláiban. $A7-et kellett volna kapni végeredményül $A$1 helyett.De mondd, hogy elnézek valamit
-
Wyll
őstag
Pont így gondoltam én is! Örülök, hogy sikerült!
-
Mutt
senior tag
-
LordVader80
őstag
Közben felhasználtam az általad javasoltat, és szuperül működik.
Annyit módosítottam, hogy negyedéves ciklust kell nézni, ezért a nyolcból 6, a 4-ből pedig 3 lett. A másik színt, hogy azt is én határozzam meg, ugyanazzal a képlettel, de ellentétes relációval, plusz mellé egy egyenlőség jellel oldottam meg.
=MARADÉK(T23;6)>=3 ez lett az egyik szín
=MARADÉK(T23;6)<3 ez lett a másik színSzuperül működik, köszönöm még egyszer
-
Wyll
őstag
Pedig az MSDN-en is ott van az egyértelmű példa, mégsem megy:
Én már ezt nem értem...
Lehet hogy az a baj, hogy relatív a hivatkozás? -
LordVader80
őstag
ja ez priv akart lenni
-
LordVader80
őstag
öÖö ezt most hirtelen nem látom át, pláne miután bevittem az 50 feltételt
hogy működik ez?egyébként ha a háttér is érdekel: adott 4 havi munkaidőkeret, amit a belépés napjától kell megjeleníteni.
A sorok a jövő évi naptári napok egymás alatt, az értékek képlettel kerekítve az az érték, ahány hónapja itt dolgozik az illető, és ehhez kell, hogy 4 havonként lássuk (a belépés dátumához igazodva, ami változhat, ha valaki kilép és új kerül a táblába a helyére), mikor telik le az aktuális munkaidőkeret. -
Wyll
őstag
[link]: "Természetesen elég két szín összesen, csak egymás után négyesével különüljenek el."
Természetesen lehetséges hogy létre kell hozni még egy - komplementer - feltételt is az előbb említett módon, ha nem jó az alap fehér:
=MARADÉK(V17;8)>=4Bár elkülönülni enélkül is elkülönül.
megj: Amióta a neveknél felfedeztem, hogy milyen oltári szuper, hogy lehetnek relatívak, azóta már mindenre ezt gondolom, és lám, tényleg
-
Wyll
őstag
Mégis meg lehet csinálni egyetlen szabállyal!!!!!!!!
Egy cellára megcsinálod a szabályt, figyelve hogy az önhivatkozás relaítv legyen (tehát $-ek nélkül), leokézod, majd a formátummásolóval továbbviszed a többi cellára is.
Ahogy te is mondod, a formázáskezelő a bal felsőre vonatkozót fogja mutatni, de mégis működik:
Elnézést, a sorok számai lemaradtak, az 1-es a 17-esben van, az alsó 16-os pedig a 32-esben.
Meg még dupla is lett. -
Wyll
őstag
Én meg ezen gondolkozom itt nagy erőkkel, hogy vajon a feltételes formázás hogyan lesz relatív a létrehozás helyéhez?!
Vagy miért csak a cellaértéken tud alapulni, miért nem tud a cellaértékre alkalmazott függvény eredményén alapulni?A feltételt már ki is találtam: =MARADÉK(<önmaga>;8)<4
(cella értékének 8-cal vett maradéka kisebb négynél)LordVader: nem fogalmaztál rosszul, én már elsőre is értettem
-
m.zmrzlina
senior tag
-
Delila_1
veterán
-
LordVader80
őstag
Ettől féltem
de nagyon köszönöm a segítséget -
Delila_1
veterán
Rossz hírem van, egyenként kell bevinned az 50 formátumot. Könnyebbség, hogy beírod az elsőt, Ctrl+c-vel másolod a képletet, ezután fogadtatod el a formátumot.
Új szabály, a képletet bemásolod Ctrl+v-vel, átírod a 2 számot, és mehet tovább.
-
LordVader80
őstag
-
m.zmrzlina
senior tag
Ha folyamatos a táblázatod (egyenként növekednek a számok) ahogy a kérdésben írod akkor nem kell feltételes formázással bajlódnod.
Formázás táblázatként>Új táblázatstílus előhozza a képen lévő ablakot és itt beállíthatod a kívánt stílust.
Az első és második sorsávnál 4-re állítod a sávméretet a formátumnál megadod a színt.Aztán kijelölöd a táblázatodat majd Formázás táblázatként és a legfelső sorban az Egyéni közt ott lesz az előbb létrehozott stílusod.
Ez a megoldás nem lesz tekintettel a cellaértékekre mint a feltételes formázás.
-
LordVader80
őstag
Sziasztok!
Hogyan tudom feltételesen formázni egy oszlop celláit, aminek értékei számok, növekvő sorrendben: a 0-3 közötti számokat szeretném egyfajta színre festeni, míg a 4-7-ig a következőre, és így tovább, négyesével. Természetesen elég két szín összesen, csak egymás után négyesével különüljenek el.
1-3 kék
4-7 zöld
8-11 kék
12-15 zöld
16-19 kékstb stb...
-
Wyll
őstag
A Munka1-be beszúrnék legfelülre egy új üres sort, és ide a B, C, D stb oszlopokba beírnám rendre az 1, 2, 3 stb számokat annak megfelelően, hogy hány periódus van. Így kialakulna egy olyan táblázat, aminek a baloldalán a keresett dátum található, a tetején meg a keresett periódus (Munka2-beli) sora. A többit a vizsgálófüggvény teszi hozzá, a következőképpen:
A táblázat B2 cellájába a következő függvényt írnám:
=HA(ÉS(INDIREKT("Munka2!A"&B$1)<=$A2;$A2<=INDIREKT("Munka2!B"&B$1));INDIREKT("Munka2!C"&B$1);"")
És ezt kitolnám a teljes táblázatra. Így szépen fel lesz írva egy dátum mellé, hogy mely periódusokba esik bele.
Tehát így:
Ez a megoldás viszont nem igazodik automatikusan a periódusok számához.
-
m.zmrzlina
senior tag
Grat...
-
ritterkrisz
tag
Siker
-
m.zmrzlina
senior tag
-
ritterkrisz
tag
-
ritterkrisz
tag
Köszönöm a segítséget mindkettőtöknek
-
m.zmrzlina
senior tag
Próbáld az ÖSSZEFŰZ() fv-t (angolban CONCATENATE())
Vagy egyszerűen a & karaktert
Ha ettől bonyolultabb a dolog akkor adj egy kicsit több részletet!
-
Wyll
őstag
-
ritterkrisz
tag
-
m.zmrzlina
senior tag
Szivesen
-
lacy86
addikt
Bazz ....
Koszonom szepen!
-
m.zmrzlina
senior tag
-
lacy86
addikt
Sziasztok!
Segitseget szeretnek kerni!
Jovoevi szabi riportot szeretnek csinalni es egyszeruen nem tudok rajonni milyen fuggvennyel csinaljam meg!
Az eves szabibol vonja ki azokat amiket en beirok. ( ahogy a kepen is latszik )( Szegyellem magam mert 5 evig tanultam az excelt de annyira regen hasznaltam hogy nem jut eszembe
)Elore is koszonom a segitseget!
-
m.zmrzlina
senior tag
-
tgumis
tag
-
Delila_1
veterán
-
Axe Miskolc
tag
-
m.zmrzlina
senior tag
Úgy látszik már késő van (vagy már korán)
Set eredmeny = ThisWorkbook.Worksheets("eredmeny")
eredmeny.Range("A1:D" & j).Value = Application.Transpose(tomb)Helyesen:
Vagy minden eredmeny-t átírsz a munkalapod nevére vagy csak az idézőjelben lévőt.
Vagy csinálsz egy eredmeny nevű munkalapot és hagyod az egész makrót a fenébe úgy ahogy van. -
m.zmrzlina
senior tag
Na szóval:Itt is kijavítod az "eredmeny"-t a munkalap nevére és ha nem az A:D tartományba akarod kiiratni az eredményt azt is megváltoztathatod (lényeg, hogy 4 oszlopnyi tartományt adj meg)
eredmeny.Range("A1:D" & j).Value = Application.Transpose(tomb) -
m.zmrzlina
senior tag
Ennél a sornál az idézőjelbe annak a munkalapnak a nevét írod amelyikre az eredményt másolni szeretnéd.
Set eredmeny = ThisWorkbook.Worksheets("eredmeny")Itt is kijavítod az eredmeny-t a munkalap nevére és ha nem az A
tartományba akarod kiiratni az eredményt azt is megváltoztathatod (lényeg, hogy 4 oszlopnyi tartományt adj meg)
eredmeny.Range("A1:D" & j).Value = Application.Transpose(tomb)Option Base 1
Sub nagyobbnulla()
Dim tomb()
ReDim tomb(4, 1)
Set eredmeny = ThisWorkbook.Worksheets("eredmeny")
j = 1
For Each ws In Worksheets
For Each cella In ws.Range("AO1:AO49")
If cella.Value > 0 Then
For i = 1 To 4
tomb(i, j) = ws.Cells(cella.Row, cella.Column - (4 - i)).Value
Next
ReDim Preserve tomb(4, j + 1)
j = j + 1
End If
Next
Next
eredmeny.Range("A1:D" & j).Value = Application.Transpose(tomb)
End Sub -
Delila_1
veterán
A képletet tartalmazó cella jobb alján lévő kis fekete négyzetre duplán kattintasz, és kész.
-
Axe Miskolc
tag
Üdv!
Excel 2010-ben hogyan lehet egész oszlopra érvényes képletet a leggyorsabban beírni?
Új nagyker táblázat jön(gyakran) és a szorzásokat eddig lehúzással másoltam át,de már nagyon unom,nagy a termékszám,hosszadalmas (pl.: C1=A1*X, a megoldás után a C55000 is be legyen szorozva X-el).
Lehet,hogy ez banális kérdés de nem leltem barátra a googleben erre
)
Ez egy teljesen új kép... Annak jobban örültem volna, ha a korábbi állapotban(amiről a korábbi képet beraktad) készült névjegyzéket láttam volna, mert itt az újnál már aosz sincs stb...
Na szóval:
Új hozzászólás Aktív témák
- iPhone 15 Pro Max 256GB 100% (1év Garancia)- ÚJ EREDETI AKKUMULÁTOR - AKCIÓ
- Samsung 870 QVO 8TB Sata 2.5 SSD
- HP ProDesk 600 G2 MT, DVD-RW , i5-6500 CPU félkonfig
- 27% - ASUS VY279HGR IPS Monitor! 1920x1080 / 120Hz / 1ms / FreeSync
- ÚJ Lenovo ThinkBook Intel Core i9-14900HX, 32GB, 1TB, RTX 4060(8GB) IPS 60Hz
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest