[Lacy1]

Idézet: Delila - Dátum: 2010. 05. 15. 15:32

Lacy1

Vegyük, hogy mint legutóbb, most is az 5. sorban kezdődnek az adataid.
E5-be: =ÉV(C5)&JOBB("0"&WEEKNUM(C5;2);2)
F5-be: =HA(DARABTELI($E$5:$E5;E5)=1;SZUMHA(E:E;E5;D:D)/DARABTELI(INDIREKT("$E$5:$E"&DARAB2(E:E)+4);E5);"")
.......

Köszönöm szépen, ismét sikerrel jártam a jóvoltadból Delila!!!

[Delila]

Lacy1

Szívesen.

[A. Mosely]

Sziasztok!

A következő probléma megoldásában kérném a segítségeteket.
Van egy EXCEL táblám, amiből bizonyos sorokat szeretnék átmásolni egy másik táblába. Ehhez írtam is egy makrót, ami kiszűri a másolandó sorokat és át is másolja. Azonban most arra lenne szükségem, hogy ezeknek a soroknak csak bizonyos celláit másolja át. (pl. csak a 2., 5. és 6. cellát).
Nem nagyon értek a makró íráshoz, így lehet banális a kérdésem, de kérem, hogy aki tudja a választ, írja meg.

Köszönöm mindenkinek!

Szerkesztette: A. Mosely 2010. 05. 18. 08:41 -kor

[Delila]

A. Mosely

Sub Másol()
Sheets("Másolandó_lap").Select
Range("A1:F1").Select
Selection.AutoFilter field:=1, Criteria1:="valami"
Range("B:B,E:F").Copy
Sheets("Másolt_lap").Select
Range("B1").Select
ActiveSheet.Paste
End Sub

A kritériumnál a "valami" helyett írd be a keresett értéket, a Másolt_lapon a Range("B1").Select helyett add meg, hova másolja a szűrt értékeket.

Ha nem az A oszlopot akarod szűrni, a Selection.AutoFilter field:=1, Criteria1:="valami" sorban a field értékeként az oszlopod számát add meg a jelenlegi 1 helyett.

Szerkesztette: Delila 2010. 05. 18. 13:13 -kor

[A. Mosely]

Köszi a segítséget Delila! Amint lesz időm azonnal kipróbálom (és megírom az eredményt).

[e-lias]

Sziasztok!

Rögtön egy kérdéssel nyitok. Hogy lehet a cellékban a több sorba tördelést megszüntetni? Hiába állítom át a formátumot, mivel gondolom benne van a karakter, ezért nem teszi egysorba. Mondjuk még a trim függvényt nem próbáltam.

Szóval ötlet?

Tisztít fgv megoldotta

Szerkesztette: e-lias 2010. 05. 19. 07:52 -kor

[PoHoS]

Sziasztok!

Lenne egy viszonylag statikus excel táblázatom, amit több nyelven is elérhetővé kellene tennem.
Jelenlegi tudásom alapján lenyíló menüben megadtam a választható nyelveket, és ezt figyelve HA képlettel szedi a hozzá tartozó adatot egy segéd munkalapról. Ha a képletezést el lehet rejteni (csak a kapott szöveget lássák), akkor nekem ez sem lenne rossz megoldás.
Sejtem, hogy makróval ezt szebben meg lehet oldani de kellene hozzá egy kis lökés miként kell hozzákezdeni.
google-t próbáltam rávenni minta állomány keresésére de nem hozott sikert.

Előre is köszi

[Delila]

PoHoS

A cellaformázásnál (Védelem fül) a képletet tartalmazó celláknál jelöld be a "Rejtett" négyzetet. A láthatóság csak a lapvédelem indítása után szűnik meg.

[PoHoS]

Lapvédelmet próbáltam, de a cellaformázás / rejtett opció részig már nem jutottam el. /me láma

Köszönöm még egyszer.

[hkpk]

töröltem...

Szerkesztette: hkpk 2010. 05. 26. 14:59 -kor

[Delila]

PoHoS

Nincs mit.

[hkpk]

Idézet: hkpk - Dátum: 2010. 05. 26. 15:51

töröltem...

Szóval, akkor elölről...
Erről van szó
Makrózott Excel tábla, nyitott makrókkal, szabad belekukkolni,
önös érdekeket kielégítendő felhasználni, inspirálódni, lesni,
átkozni, lenyúlni, belekötni, átírni, fikázni, ésatöbbi.

Ha úgy érzed, segített nyerni, és nagyot nyersz, akkor adj belőle egy kicsit.
(amúgy nem segít, csak ámít)

Jó szórakozást. (Ja, a TXT fájlban van a használati utasítás)
//nincs benne károkozó, kisdobos becsszóra//

Szerkesztette: hkpk 2010. 05. 26. 18:58 -kor

[rianka]

Hali!
Lenne egy kérdésem... Van egy táblázat, amibe minden nap új adatok kerülnek.
Van arra lehetőség, hogy megtudjam, hogy egy bizonyos sort, vagy cellát mikor módosítottak utoljára?
előre is köszönöm a segítséget!

[hkpk]

Idézet: rianka - Dátum: 2010. 05. 27. 21:48

Hali!
Lenne egy kérdésem... Van egy táblázat, amibe minden nap új adatok kerülnek.
Van arra lehetőség, hogy megtudjam, hogy egy bizonyos sort, vagy cellát mikor módosítottak utoljára?
előre is köszönöm a segítséget!

Csak úgy, ha módosításkor odajegyzi a módosító a sor végére a tényt, vagy megcsinálja helyette egy beépített makró.

[Delila]

rianka

Egy egyszerű kis makrót kell rendelned a kérdéses lapodhoz.
A lapfülön jobb klikk, a 'Kód megjelenítése' pontot választva bejutsz a makró szerkesztőbe. A jobb oldalon kapott üres lapra másold be:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 1 Then
        Cells(Target.Row, 8) = Date     'dátum a H oszlopba
        Cells(Target.Row, 9) = Now()    'idő az I oszlopba
    End If
End Sub

Ez a makró az A oszlop változását figyeli (If Target.Column = 1 Then). Ha másikat akarsz figyeltetni, az 1-et írd át az oszlop sorszámára.
Úgy írtam meg, hogy a dátumot a H (8.)oszlopba írja az A oszlop változásakor, az időt az I (9.)-be. Ha nincs szükséged az időpont letárolására, a Cells(Target.Row, 9) = Now() sort töröld ki. A H oszlop formátumát dátumra-, az I-ét időre állítottam be. Ezeknél is a 8 és a 9 átírásával határozhatod meg, melyik oszlopban tárolja a dátumot és az időt. A tárolt oszlopokat el is rejtheted.

A kód itt nagyon színes lett, bemásolva normálisabb lesz.

[bodil]

Távoli (csak olvasható) excel 2003 táblázatot szeretnék megnyitni, frissitgetni ugy, hogy annak 3 [G-H-I ]
oszlopában előforduló szavak kiemelten jelenjenek meg, ha megtalálhatóak egy nálam összeállított
és (Excel2003) tárolt szólistában.

Bonyolitja a gondomat hogy a távoli mfüzet '0' '1' ... '23' munkalapokból áll.
Megoldható ez? Köszönöm segitségedet!

[Delila]

bodil

Mivel a feltételes formázás csak azonos lapon lévő adatokkal hajtható végre, a távoli füzetben kell létrehozni segédoszlopokat. (hogy csinálod, mikor csak olvasásra nyithatod meg?!)
Jelöld ki a 23 lapot a távoli füzetben úgy, hogy az első lapon állsz, és a Shift lenyomása mellett rákattintasz az utolsó fülre. Így egyszerre tudod végrehajtani az összes lapon a változtatásokat.

Feltételezve a címsort, a képleteket a 2. sorba írtam. Nálam a füzet, ami a szavaidat tartalmazza, a Munkafüzet3 hangzatos névre hallgat.

A távoli füzet J2 cellájába: =HA(HIBÁS(FKERES(G2;[Munkafüzet3]Munka1!$A:$A;1;0));"";1)
ezt a képletet húzd jobbra az L oszlopig, majd a 3 képletet együtt másold le az utolsó sorodig.

Jelöld ki a G oszlopot. A Formátum/Feltételes formázásnál A képlet értéke: =J1=1. Ezt úgy kell érteni, hogy ha a J1=1, akkor ... Itt megadod a neked tetsző formátumot, leokézod.
Kijelölöd a H oszlopot, ott a képlet =K1=1, az I oszlop képlete =L1=1.

Szüntetsd meg a lapok együttes kijelölést, másként a további műveletek is minden lapon végrehajtódnak.

Szerkesztette: Delila 2010. 05. 28. 17:56 -kor

[bodil]

Kösz a villámgyors segitséget! Bár a forrástábla aszem nem lesz elérhető szerkesztésre... A "...\Application Data\Microsoft\Excel\XLSTART\personal.xls" -be nem menthető vmi megoldás? ami a viselkedést ebből venné az adatokat pedig a távoli táblábol. +nem baj ha minden megnyitott xls-t "szinez" / csak erre használnák a kollégák. (( vagy az csak 1x fut - betöltéskor? )) mégegyszer köszi !

[Delila]

Idézet: bodil - Dátum: 2010. 05. 28. 18:09

Kösz a villámgyors segitséget! Bár a forrástábla aszem nem lesz elérhető szerkesztésre... A "...\Application Data\Microsoft\Excel\XLSTART\personal.xls" -be nem menthető vmi megoldás? ami a viselkedést ebből venné az adatokat pedig a távoli táblábol. +nem baj ha minden megnyitott xls-t "szinez" / csak erre használnák a kollégák. (( vagy az csak 1x fut - betöltéskor? )) mégegyszer köszi !

Gyakorold be a képletek beírását, másolását, utána indíts el egy új makrórögzítést. A makró helye legyen az "Egyéni makró-munkafüzetben". Végezd el a begyakorolt műveleteket. A füzet, amiben a saját szavaid vannak, minden gépen azonos útvonallal, és azonos névvel szerepeljenek. A personalt átmásolhatjátok a többi felhasználó gépére.
Működés: mindkét füzetet nyissátok meg, a távoli legyen az aktuális, indítsátok a personalban lévő makrót.
Mindenki gépén kitehettek hozzá egy ikont a könnyebb használathoz: Testreszabás menü, Parancsok fül, Makrók kategória. Jobb oldalról felhúzod az Eszköztárra (ikonsorra) az Egyedi gombot, a gombon jobb klikk, Makróhozzárendelés. Ugyanitt megváltoztathatod a küllemét, nevet adhatsz neki.
Ha valamiért nem menne, később segítek.

Szerkesztette: Delila 2010. 05. 29. 07:19 -kor

[hkpk]

Adott egy makrózot munkafüzet, ez itt: http://www.fw.hu/ala...n/otoslotto.ZIP
(fentebb is említve)

Excel XP alatt készült javarészt. Megnyitható 2003 és 2007 alatt, de egy emberkének
Excel 2000 van a masináján osz az alatt nem nyílik meg.
Ld. képet.
Azt mondja, ezt az üzenetet dobja megnyitáskor, és rögtön be is csukja.
Tehát, ha az lenne a gond, hogy valami olyan library-ra hivatkozik amit
nincs Excel 2000 alatt, annak sincs esélye, hogy ez a hivatkozást kikapcsolja
az ember. Találkozott valaki ilyennel? Hogyan lehet a problémát megoldani?

Csatolt fájl:

•  untitled.png (52,87K)
  Letöltések:: 11