-
Fototrend
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
-
gycs02
aktív tag
válasz
Fferi50
#53858
üzenetére
Szia!
Kicsit felületes volt a hibaelhárítás.
Ugyanis így nem bizonyítható, hogy a bővítmény miatt volt a hiba. Benne kellett volna hagyni, s csak csmód alatt elmenteni, s akkor lett volna biztos.
Remélem, nem kell sok fájloddal végigcsinálni a "tisztogatást".
Sajnos összetettebb a probléma.
Most már nincs bekapcsolt bővítmény, megnyitom a fájlt csmódban, majd elmentem. Ha ezután normál módban megnyitom, feldobja a frissítés ablakot. Megnyitom, majd mentés másként, az így létrejött új fájl ugyan úgy nem frissít, az alapfájl igen. Ha az alapfájlt másolom, a másolt nem frissít, az alap igen. Ha az alapfájlt helyben átnevezem, nem frissül, de ha visszanevezem igen. Több variációt nem akarok kipróbálni.
S az a gond, hogy az alapfájlból vagy átnevezéssel vagy mentés másként-l minden hónapban új fájlt kell készítenem.
Talán be kellene jelenteni hibaként a MS-nek.
Biztos kellene nekik a fájl, de az szupertitkos, s aki belenéz az így jár: [link]
-
gycs02
aktív tag
válasz
Fferi50
#53835
üzenetére
Szia!
Beleástam magam egy kicsit, lehet így kellett volna kezdeni, s nem egyből a könnyebb utat választani. Elvileg megtaláltam a megoldást:
[link]
De azt tapasztalom, hogy hiába kapcsoltam ki az egyetlen engedélyezett bővítményt, csak azon fájloknál szűnik meg a hiba, amiket előtte csökkentett módban megnyitok.
Esetleg ennek kiküszöbölésére valami ötlet? -
gycs02
aktív tag
válasz
Fferi50
#53817
üzenetére
Szia!
Még mindig nem sikerült úgy leírnom, hogy megérthető legyek.
. A videó lenne jó, de hátha egy kép is megteszi. Jobboldali táblázat "b" oszlopban láthatók az "a" oszlop képletei, természetesen = jel nélkül. Ha meg van nyitva mindkét táblázat, akkor természetesen ha átírom a baloldali táblázat "a" oszlopában az értékeket frissül a jobboldali táblázat. Ha csak baloldali van megnyitva, módosítok benne, majd "rányitom" a jobboldalit frissül. Ha módosítok a baloldaliban, mentem és bezárom, majd megnyitom a jobboldalit, akkor amíg rendesen működött feljött egy ablak, hogy a táblázat csatolásokat tartalmaz, szeretné frissíteni? Na ez az, amit nem dob fel, s nem is frissülnek fel az adatok, újraszámolásra sem. Csak akkor frissül, ha az "a1"-ben lévő képletet végigmásolom "a15"-ig.
[kép] -
gycs02
aktív tag
válasz
Fferi50
#53812
üzenetére
Szia!
Szokás szerint nem voltam egyértelmű. Azt szeretném, hogy rákérdezzen, de bárhogy állítom, rákérdezni se kérdez rá, s nem is frissülnek le az adatok, nem csinál semmit az újraszámolásra, a munkalap kiszámításra. S azt tapasztalom, hogy azoknál a tábláimnál történik ez, ahol az előzményekben leírt módszerrel aktualizáltam a csatolásokat. Két esetben frissülnek la az adatok, vagy kijelölöm az első cellát az oszlopban és végig másolom a képletet, vagy ha van makró a táblában futtatom azt.
Update!
Közben csak elkezdtem még tesztelni, s meg is dőlt az elméletem a hivatkozás frissítésről. Nyitottam 2 új munkafüzetet, az egyikben az első sorba írtam adatokat pár oszlopba, a másik első sorába pedig csak egy sima A1=a másik munkafüzet A1-l képletet. Ha mind a kettő meg van nyitva és töltöm fel az első sort adatokkal frissül a másik tábla. Ha bővítem az adatokkal feltöltött cellát, hiába van a másikban ott a hivatkozás, magnyitás után csak akkor frissülnek az adatok, ha a képleteket újramásolom. S itt nem volt hivatkozás csere. -
gycs02
aktív tag
Sziasztok!
Jó régen jártam erre. Búék mindenkinek!
Valamikor régen kérdeztem ezt:Próbáltam megoldani, hogy ne dobja fel a vírus veszély üzenetet, ha makróval indítok excelből egy fájlt, s azóta megnyitáskor nem adja fel a frissítés ablakot a csatolásokhoz., csak akkor frissül, ha elindítok benne egy makrót (vagy végigmásolom újra a képletet). Valahol mintha beírtam volna, hogy az ebben a mappában lévő fájlok biztonságosak, de az üzenet még így is jön. Érdekesség, hogy az ugyanitt található régebbi biztonsági másolatom meg feldobja, hogy frissítsen-e.
Nem nagyon volt rá ötletetek, most úgy gondolom rájöttem mi okozza a gondot, s így hátha tudjátok a megoldást. A frissítésre rákérdezés és a frissítés akkor szűnik meg, amikor egy szintén itt ajánlott segítség alapján kicserélem a fájlban a hivatkozásokat (Adatok-hivatkozások menü). Az volt az eredeti gondom, hogy van egy összesítő táblázatom, ami minden évben a rendre évhó.xlsx fájlokból gyűjti az adatokat. Azért kértem a segítséget, hogy ne az legyen, hogy a hivatkozásokban manuálisan javítom a évszámot. Az ajánlás tökéletesen működik, de viszont ha ezt használom jön elő a fenti probléma. A számolási beállítások automatán vannak, a hivatkozások fül pedig így néz ki:
Hátha így van valami ötletetek.
Mit állítsak be, hogy automatikusan frissítsen, vagy dobja, fel, hogy a fájl csatolásokat tartalmaz.....Köszi gycs
-
gycs02
aktív tag
válasz
Fferi50
#53252
üzenetére
Köszi!
Szuper! Annyi, hogy régebbi az excel, így a darabha-t darabteli-re cseréltem. Hasonló az enyém is, csak, ha egy függvénnyé akartam összegyúrni körkörös hiba lett. A hatöbbel nem tudtam zöldágra vergődni, így az egyenlőség mindkét oldalán darabtelit használtam. A hatöbb helyett először meghatároztam a hol.van függvénnyel a "tartomyány" első és utolsó sorát, ami a névhez tartozik. Lett két számom. Ez a két szám került egy-egy d& indirekt függvénnyel a másik oldali a darabtelibe.
A Tied nem csak egyszerűbb, de a pontos tartomány megadása nélkül pl. C:C nem számít az adatmennyiség, s nem kell, hogy sorrendbe legyenek a nevek. -
gycs02
aktív tag
Sziasztok!
Van megoldásom, de hátha meglehet segédoszlopok nélkül is oldani, én nem tudok rájönni. Az lenne a feladat, hogy a B oszlopba kerüljön 1-es, azon A oszlopban szereplő nevek mellé, ahol a C-D tartományban a név mellett nem csak igen szerepel. Vagyis a barack, körte rendben van, a többi mellé kell az 1-es.
Köszönöm a segítséget!
-
gycs02
aktív tag
Sziasztok!
De nagy a csend, mindenki nyaral?
Ennek az elejére valami tipp? [link]
Addig eljutottam, hogy a frissítést kérő és a nem kérő fájlok beállításaiban a védelem részt összehasonlítottam (itt adtam meg a biztonságos könyvtárat), minden egyezik. Merre nézelődjek még?Köszi előre is!
-
gycs02
aktív tag
válasz
Fferi50
#52892
üzenetére
Sziasztok!
Három szűrt sorból csak az elsőbe tette be az X-t.
A próba után, a leírásod alapján rájöttem, hogy jó lehet a Delila féle első makró, s egy kis igazítással meg is oldotta a problémát, tökéletesen működik. Remélem a mindennapos használat is ezt fogja igazolni.
"türelmünk akár a tenger"
Jó Nektek, hová jártok tanfolyamra?
Szép napot!
-
gycs02
aktív tag
válasz
Delila_1
#52889
üzenetére
Szia!
Most már rájöttem, hogy nem véletlenül kértek mintát arról. hogy mit szeretnénk.
Átgondoltam, s rájöttem, hogy amit legelőször írtál, az kell nekem. Ha csak 1 sor van, akkor nem megy, de a többi esetben úgy néz ki, hogy jó. Az egysoros javítást meg megpróbálom beleügyeskedni a későbbi makróid alapján.
Sikerült is a javítás, egyelőre a teszteken át ment, szerintem jó lesz.
Csak hogy átlássátok mi a folyamat.
Tehát a lényeg. Érkeznek összevissza sorrendbe az áruk. Megszűröm az A oszlopot almára, ha megtörtént a bevételezés, az almák mellé menne az x. Majd jön másik meló, legközelebb már először B-re szűrök, mert ami nem üres, azzal nem kell foglalkoznom. Amit bevételeztem, azok bizonylatát ki kell nyomtatni. Szűrés X-re a B oszlopban és C-ben üresre. Ha megtörtént a nyomtatás mehet a C-be az x. Ami nyomtatva van, azt könyvelni kell C x, D üres amivel foglalkoznom kell. Persze, ha van lehetőség mindet folyamatában csinálni, akkor nincs erre szükség.Ismét köszönet a segítségért és a Türelemért!
#52886Fferi50
Neked is!
Nem megy. -
gycs02
aktív tag
Sziasztok!
Így már egyértelmű. Akartam válaszolni Delilának, hogy csak akkor működik az övé, ha nem üres ahová írni kell. Csak már nem fért bele, a meló helyen. Sajnos nem volt egyértelműen leírva a folyamat, hogy mit csinálok, s hogy mit szeretnék. Az egyik oszlopban szűrök, a szűrő bekapcsolása után itt minden cella töltött. Ugyanezen soroknál kell az x-t írni az üres cj oszlopba. A szűrt sorok száma bármennyi lehet, s lehetnek egymás után következők, s szétszórva is. Csak holnap tudom próbálni, majd jelentkezem.További szép napot Nektek!
-
gycs02
aktív tag
válasz
Delila_1
#52883
üzenetére
Valamit nagyon félremagyarázhattam, hogy ez jött le.
Nem kell x helyett is x, az kell amit írtál elsőtől utolsóig.
Az 52880-ban ott van "makróm", ami elvileg csak annyiban különbözik a tiedtől, hogy átírtam az oszlopokat és a cellákat. Viszont ezt így futtatva nem csak a szűrt cellákba ír hanem a "fejlécbe is". Mint írtam, mintha tegnap jó lett volna, megpróbálom a tegnapi felállást előidézni, hátha rá jövök valamire. -
gycs02
aktív tag
válasz
Delila_1
#52881
üzenetére
Próbálgattam a Tieddel variálni, de nem jutottam előrébb. Abban az esetben nem tölti az előzőekben említett cellákat, ha itt Range("cj" & elso) = "x" a cj helyett cj13-at írok, igaz így kitölti azt amit szeretnék, de kitölti az összes ezalatt látható sort is.
A Tieddel felfelé tölti a látható sorokat, az én kontárkodásommal meg lefelé. -
gycs02
aktív tag
válasz
Fferi50
#52879
üzenetére
Szia!
Így már érthető, hogy mindegy mit írok oda, ugyanis olyan nincs hogy aw13-ban van adat, ba 13-ban meg nincs. Vagyis ha bármelyik sorba írok, akkor az a sor ba-ig töltve van.Viszont a látható-val csak gondjaim vannak, a Tiéd azt csinálja, hogy a szűrt tartomány helyett csak az első cellákba (összevont 1-4 és az 5.) tesz x-t. Ezek látható cellák, de a szűrt tartományon kívül esnek, a nem látható 6-12 cellákat figyelmen kívül hagyja.
Az átírt makró:
Dim elso As Integer, utolso As Integer, srng As Range, cl As Range
elso = 13 ' Ide azt a számot írd, ahol a szűrés kezdődik
utolso = Range("cj" & Rows.Count).End(xlUp).Row
Set srng = Range("cj" & elso & ":cj" & utolso) ' ha nem összefüggő a szűrt terület, cellánként kell végigmenni sajnos.
For Each cl In srng.Columns(1).SpecialCells(xlCellTypeVisible).Cells
cl.Value = "x"
Next#52876Delila_1
Szia!
Azt nem értem, hogy miért nem vettem észre tegnap, hogy a Tiéd is azt csinálja, mint a fenti, annyi különbséggel, hogy ez beírja oda is ahová kell.
Annyi történt tegnap óta, hogy 3 oszlopban alkalmazom a beírást, s amikor próbáltam a működést, még csak az egyik gombhoz rendelt makrót javítottam, ma pedig aktualizáltam mind a hármat.
Amit a Tiedből készítettem makrót:
Dim elso As Integer, utolso As Integer
elso = Range("cj13:cj1145").SpecialCells(xlCellTypeVisible).Row
utolso = Range("cj" & Rows.Count).End(xlUp).Row
If elso = utolso Then
Range("cj" & elso) = "x"
Else
Range("cj" & elso & ":cj" & utolso).SpecialCells(xlCellTypeVisible) = "x"
End If -
gycs02
aktív tag
válasz
Delila_1
#52876
üzenetére
Szia!
Tesztelgettem.
Az első így tökéletes.
A második akkor nem jó, ha egy szűrt sor van vagy ha a szűrt sorok egymás utániak.#52877Fferi50
Szia!
Mivel a Delila megoldása jó lett az elsőt nem próbáltam, a második viszont működik.
Így néz ki a munkalapomra aktualizált makro:
Dim elso As Integer, utolso As Integer, srng As Range
elso = 13
utolso = Range("AW" & Rows.Count).End(xlUp).Row
Set srng = Range("AW13:BA" & utolso)
srng.SpecialCells(xlCellTypeVisible).Copy
With Sheets("VJsegéd").Range("A1")
.PasteSpecial Paste:=xlPasteColumnWidths
.PasteSpecial Paste:=xlPasteValuesAndNumberFormats
End With
Application.CutCopyMode = False
A tartománynak, amit szűrök az első sora a 13, az utolsó a 1145, az első oszlop "AW" az utolsó "BA".
Jó így az aktualizálás?
Ennél a résznél: utolso = Range("AW" ha "BA"-t írok akkor is ugyan úgy működik, melyik a helyes? Nagy-nagy köszönet Mindkettőtöknek. -
gycs02
aktív tag
válasz
Delila_1
#52873
üzenetére
Szia!
Köszönöm!
A második az jó, átalakítottam a táblázatomnak megfelelően.
Az elsővel két "gondom" van.
Lehet nem voltam egyértelmű, abba az oszlopba kellene írni, ami szűrve van. Ebben az esetben a RANGE után ha a B-k helyett A-t írsz, akkor az a jó megoldás?
A másik a melléírással van, ezt is aktualizáltam a táblázatom szerint, de elég kaotikusan működik. Van amikor jó, ha csak 1 szűrt sor van, akkor memóriahibába fut, s end után teleírja x-l a munkalapot, van amikor csak a kívánt oszlopba ír x-t, de szűrés törlés+x-re szűrés után kiderül, hogy több helyre is betette az x-t az oszlopba. Az nem lehet gond, hogy csak a 13. sortól indul a szűrt tartomány? -
gycs02
aktív tag
Sziasztok!
Nekem is előjött egy kis működési gond. Próbáltam megoldani, hogy ne dobja fel a vírus veszély üzenetet, ha makróval indítok excelből egy fájlt, s azóta megnyitáskor nem adja fel a frissítés ablakot a csatolásokhoz., csak akkor frissül, ha elindítok benne egy makrót. Valahol mintha beírtam volna, hogy az ebben a mappában lévő fájlok biztonságosak, de az üzenet még így is jön. Érdekesség, hogy az ugyanitt található régebbi biztonsági másolatom meg feldobja, hogy frissítsen-e.
Lenne még egy makrós kérdésem is. Felvettem egy makrót, s azt próbáltam átalakítgatni, de néha megáll valami miatt, end-l megállítva, s újra indítva meg lefut. Amit szerettem volna, egy többszörösen szűrt táblázat egyik oszlopába egy meghatározott cellában lévő szöveg beszúrása. Tehát bármennyi szűrő is van bekapcsolva, ha az adott oszlopban 2 cella látszik, akkor 2-be, ha 10 akkor 10-be írja be ezt a szöveget. Ezt hoztam össze, de mint írtam néha rakoncátlankodik és a beillesztésnél megáll:
ActiveSheet.Unprotect
Range("$Cj$5").Copy
Range("av13:av1145").Select
ActiveSheet.Paste Link:=True
Application.CutCopyMode = False
Range("$av$5").Select
ActiveSheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:= _
False, AllowFormattingCells:=True, AllowFormattingColumns:=True, _
AllowFormattingRows:=True, AllowSorting:=True, AllowFiltering:=TrueAzért a cella csatolást használtam, mert akár hogy próbáltam minden más esetben több helyre is beillesztette a kijelölt cella szövegét. Az is jó lenne, ha a makróban megadnám, hogy pl. az "AV" oszlop látható celláiba írjon egy x-t. Ennek a felvételét nem tudtam produkálni. Nem sokszor áll le, de ha van valami javaslat, ami biztos(abb)an működik megköszönöm!
Ha már így belejöttem a kérdezésbe még egy dolog eszembe jutott. Sokat gugliztam, de nem jutottam előrébb, nem nagyon tudtam értelmezni az ajánlásokat. Azt szeretném megoldani, hogy egy szűrt tartományt kijelöljek és vágólapra másoljak. A kijelölendő tartomány ha nincs szűrés aw13:ba1145. Szűrés után ebből szeretném vágólapra másolni a szűrt, látható tartományt, ami eléggé változó. lehet pl. aw25:ba25, de azis előfordul, hogy a 13, 45, 57, 1100 sor látható a szűrés után. próbáltam felvenni, de mivel a kezdő és záró sor folyamatosan változik nem jutok előrébb.
Köszi, ha szántok rám egy kis időt, s ebben is tudtok segíteni.S elnézést, hogyha esetleg telhetetlen vagyok!
-
gycs02
aktív tag
válasz
Fferi50
#52801
üzenetére
Szia!
Köszi! Próbálom értelmezni.
#52799Guitar14
3 részegységre emlékeztem, de átalakítható 4-re is.
Lehet nem a legprofibb megoldás, de elvileg működik.
Majd a nagyok megmondják van-e buktatója.
Képlet a H1ben:
=+HA(ÉS(NINCS(FKERES(G1;A:B;2;HAMIS));NINCS(FKERES(G1;C:D;2;HAMIS)));FKERES(G1;E:F;2;HAMIS);HA(ÉS(NINCS(FKERES(G1;A:B;2;HAMIS));NINCS(FKERES(G1;E:F;2;HAMIS)));FKERES(G1;C:D;2;HAMIS);HA(ÉS(NINCS(FKERES(G1;E:F;2;HAMIS));NINCS(FKERES(G1;C:D;2;HAMIS)));FKERES(G1;A:B;2;HAMIS)))) -
gycs02
aktív tag
válasz
Fferi50
#52739
üzenetére
Szia!
Köszönöm a választ!
Keresgettem az ajánlásod alapján, de sajnos nem jutottam előrébb. Nem vagyok képben a makró világában, csak amit megtalálok a neten azokat próbálom több-kevesebb sikerrel felhasználni, s minimálisan módosítgatni.
Ez így most működik:Dim utvonal As String
utvonal = "c:\Dokumentumok\01\1.xlsx"
On Error GoTo 1
ActiveWorkbook.FollowHyperlink utvonal, NewWindow:=True
Exit Sub
1: MsgBox Err.DescriptionHogy mi miért van benne nem tudom, egyedül az útvonal ami számomra mond valamit.
Az elérési út az alkönyvtár kivételével minden esetben ua, a fájlnév sem változik. Azt szeretném elérni, hogyha az a fájl ami a makrót futtatja a 01-es mappában van, akkor az abban lévő 1.xls-t nyissa meg, ha a 02-ben van, akkor az abban lévőt stb.
Lehet így érthetőbb is a kérdésem, ha megoldható kijavítanád ezek alapján?Az excel-ben az összes makró engedélyezve van, és pipálva a VBA projekt objektumok is.
Az a tiltás feloldása rész nálam nincs vagy nem jó helyen keresem vagy le van tiltva. [kép]Köszi gycs!
-
gycs02
aktív tag
Sziasztok!
Kezdek belejönni, persze csak ha a gugli segít.
Ha nem akkor jönnek ide a kérdések.
Van egy fájl, aminek az egyik cellájában a =+CELLA("filename") képlet kiírja a megfelelő információkat. Betudom valahogy helyettesíteni ezen cella tartalmának alapján ezt az elérési utat: utvonal = "c:\Dokumentumok\1.xlsx". Több fájlom van, az utvonal fájlnevét eddig manuálisan átírtam, mikor másnéven mentettem. Azt szeretném, hogy a makróval elvégzendő parancsot mindig a megnyitott fájlon hajtsa végre. Remélem érthetően sikerült leírnom.
Még egy kérdés. néha előfordul, hogy olyan fájlra hivatkozom, amire az office feldobja, hogy néhány fájl vírust tartalmazhat.... , ez le lehet okézni valamilyen makró paranccsal?Köszi előre is!!!
. A videó lenne jó, de hátha egy kép is megteszi. Jobboldali táblázat "b" oszlopban láthatók az "a" oszlop képletei, természetesen = jel nélkül. Ha meg van nyitva mindkét táblázat, akkor természetesen ha átírom a baloldali táblázat "a" oszlopában az értékeket frissül a jobboldali táblázat. Ha csak baloldali van megnyitva, módosítok benne, majd "rányitom" a jobboldalit frissül. Ha módosítok a baloldaliban, mentem és bezárom, majd megnyitom a jobboldalit, akkor amíg rendesen működött feljött egy ablak, hogy a táblázat csatolásokat tartalmaz, szeretné frissíteni? Na ez az, amit nem dob fel, s nem is frissülnek fel az adatok, újraszámolásra sem. Csak akkor frissül, ha az "a1"-ben lévő képletet végigmásolom "a15"-ig.
A Tieddel felfelé tölti a látható sorokat, az én kontárkodásommal meg lefelé. 
Majd a nagyok megmondják van-e buktatója.Új hozzászólás Aktív témák
- exHWSW - Értünk mindenhez IS
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Bittorrent topik
- Bambu Lab 3D nyomtatók
- Mesterséges intelligencia topik
- PlayStation 3
- Eredeti játékok OFF topik
- Akciófigyelő: Jelentős kedvezményekkel veheted meg a Xiaomi 17-eket
- Warhammer 40,000: Boltgun II – Slaanesh is beszáll a folytatásba
- Windows 10
- További aktív témák...
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Game Pass Ultimate előfizetések 1 - 36 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- MEGA AKCIÓ! - Jogtiszta Windows - Office & Autodesk & CorelDRAW - Azonnal - Számlával - Garanciával
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- AKCIÓ! Sosemhasznált! HP OmniBook 5 i3-1315U 8GB 1TB 16" FHD+ Gar.: 1 év
- ÁRGARANCIA!Épített KomPhone Ryzen 5 7600X 32/64GB RAM RTX 5070 12GB GAMER PC termékbeszámítással
- Macbook Pro M3 Max 14" - 36 GB/1TB/ 27% ÁFÁS! - 0360AB
- 15,6" Dell Latitude laptopok: E5550, E5570, 5590, 5500, 5501, 5510, 5520 / SZÁMLA + GARANCIA
- BESZÁMÍTÁS! Asus B365M i5 9400F 16GB DDR4 512GB SSD GTX 1660 Super 6GB Kolink Citadel FSP 500W
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest