Hozzászólások
-
SzerzőBejegyzés
-
Szia!
Igen igazad van a 3 másolat az eredeti táblázatomban kell majd, de a példában csak kettőre csináltam meg.
A különbség köztük annyi, hogy amikor a Proba 1 vagy 2-re kattintok akkor lecseréli a címeket hónapokat és átnevezi a lapfület, és ezekből csinálnék másolatokat.
Ma már meg is csináltam ezt a részét működik is, a probléma továbbra is a másolat mentéssel lenne. Később derült ki amit nem vettem észre, hogy amit Titok írt sem működik nálam, mert ezzel amikor rákattintok a másolat készítésére, bezárja az eredeti táblát és a másolatot nyitja meg amit nagy örömömre csak órákkal később vettem észre, hogy a másolatból csináltam a másolatokat.Inkább mutatom a kódot ez nem a csatolt példa makrója, és egy modulban van benne:
Sub masolat_mentese() FN = Worksheets(4).Range("C9").Value 'Fájlnév ChDir "C:\Users\Asztal" ActiveWorkbook.SaveAs Filename:="C:\Users\Asztal" & FN & ".xlsm", _ FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False End Sub
Kipróbáltamn a Workbook.SaveCopyAs-t is amit írtál (Ezt cseréltem le rá: ActiveWorkbook.SaveAs) de nem tudom, hogy a többi részén kell-e változtatni, mert hibát ír.
A fájlnév amit pedig még kérdeztél, az excelben több cella adatait összefűztem egybe ami a fájlnév lesz és erre az egy cellára hivatkoztam fájlnévnek.
Ez változik éppen milyen hónapot választottam ki.Gyors válasz a válaszomra, hogy sikerült a mentés kérdést megoldanom, majd lehet délutánra kiderül, hogy milyen hibák jönnek elő.
-
A hozzászólás módosításra került: 5 years, 3 months telt el-
tasmatta.
Szia
Köszönöm szépen, majdnem jól csináltam, csak nekem egy sorral fentebb a tiéden kívül ez is benne volt: ActiveWorkbook.Sheets.Copy
Remélem valaki a másik két dologban is tud valamilyen megoldást találni.
Szia Imre!
Egyszerű és nagyszerű!
Eszembe sem jutott volna.Köszönöm szépen a gyors segítséget, és a későbbiekben is hasznos cikket!
Első reakció: Úristen!
Második reakció jobban megnézve: Ez nekem miért nem jutott eszembe? 😀Tökéletesen működik.
Ezzel a függvénnyel már szinte késznek mondható, és használhatóvá vált a táblázatom.
Nem mondom, hogy végleg eltűnök innen, főleg ha elkezdem tanulni a makró programozást, de valószínűleg már új topikban folytatom.Nélküled ez nem sikerült volna, szeretném megköszönni a türelmedet, és minden eddigi segítséged.
További szép napot, és minden jót kívánok!
A jelenlegi táblázatban már sajnos olyan adatok és információk vannak amit nyilvánosan nem oszthatok meg, csatoltam egy korábbit ami erre megfelel, mert ugyanezt a képletet használtam itt is.
Attachments:
You must be logged in to view attached files.Közben rájöttem akkor adná ki a #HIÁNYZIK értéket ha a Dátum mező üres ami jó is, de arra van megoldás, hogy ha a dátum is ki van töltve, de nincs mindegyik cellában adat akkor is kitöltse „-” karakterrel?
Egyenlőre hanyagolom a makró részét, mert ahogy haladok előre folyamatosan jönnek az ötletek, és minimális makró tudás hiányában elég nehéz, és sosem jutnék a végére.
A táblázattal képletezésében szeretnék újabb segítséget kérni, itt az lenne a gond, ha a cella üres, akkor nullát ír be ami a méréses adatoknál elég problémás, pedig a HAHIBA függvénynél be van állíva, hogy „-” karakter jelenjen meg.
Próbáltam HA illetve ÜRES függvényt használni, egyenlőre nem sok sikerrel.
Ha kivettem belőle a HAHIBA függvényt akkor sem írja ki a #hiányzik értéket, pedig ezekbe a sorokba még soha nem vittem fel adatokat.Ez a képlet már nem az itteni táblázatból van hanem a készülőben lévőből:
=HAHIBA(INDEX(adatok;HOL.VAN(results!$A$7;results!$A$9:$A$132;0);OSZLOP()-7);”-„)
Jaj úgy látom pont egyszerre írtuk a hozzászólást 🙂
Azt hiszem megtaláltam azt a makrót ami nekem tökéletes lenne, átalakítottam az én verziómra, szeretném ha pár dologban segítenél kiegészíteni, és elmagyarázni mit takar.
Ebben nem tudom, hogyan lehet továbbra is egy meghatározott mappáig ugrani. Ezt gondolom ki kell egészíteni.
A MsgBox („A dokumentumot nem mentetted”) üzenet mikor jön elő? Ha a mentést kihagyom a A mérés nem lett PDF-ben mentve! üzenetet kapom ami pont jó.
Az excel fáj mentése után egy üzenetet kapok mindig hogy: Legyen óvatos! A dokumentum egyes részei, olyan személyes információkat tartalmazhatnak, amelyeket a Dokumentumfelügyelő nem tud eltávolítani.
Ezt ki lehet kapcsolni benne?Sub gombPDF_Click() Dim sPath As String Dim sFile As Variant Dim ws As Worksheet On Error GoTo ErrHandle sPath = ThisWorkbook.Path & "\" & "Meres_" & Me.Range("g7") sFile = Application.GetSaveAsFilename _ (InitialFileName:=sPath, _ FileFilter:="PDF Files (*.pdf), *.pdf", _ Title:="Válaszd ki a mentés helyét") If sFile = "False" Then MsgBox ("A mérés nem lett PDF-ben mentve!") Exit Sub End If Me.ExportAsFixedFormat _ Type:=xlTypePDF, _ Quality:=xplQualityStandard, _ IncludeDocProperties:=True, _ IgnorePrintAreas:=False, _ OpenAfterPublish:=True Exit Sub ErrHandle: MsgBox ("A dokumentumot nem mentetted") End Sub
Délelőtt sikerült „megvilágosodnom” ahhoz hogy megnyissa a PDF fájlt egyszerűen csak át kell írnom a OpenAfterPublish:=False-ról True-ra 🙂
Köszönöm az új képletezést, ezt már annyira nem zavart össze mint a makrók 🙂 Gondolom az első verzió képletei is működnének vele, csak lehet így is? Nincs összefüggésben ezzel a makróval?
Ez a makró működik benne csak nem minden fent leírt folyamattal, amit nem tudom keresnem kell-e a makróban.
Az első, hogy nem egy meghatározott mappáig ugrik.
Bemásoltam az elérési utat ebbe a sorba: utvonal = utvonal & „ide szúrtam be\” de nem oda ugrik.
A másik pedig hogy amint menti a pdf fájlt, azt meg is nyitja.Szóval megelőzve az újabb kérdezősködést próbáltam magamtól megcsinálni, egy tutorial segítségével, ami sikerült is, csak ebben a videóban nem a pdf mentésen volt a fókusz amit pedig nem tudom, hogy tudok a te makróddal összegyúrni.
Ez volt a videós segítség. Ezt egy teljesen új munkafüzetben csináltam.
https://www.youtube.com/watch?v=V-TBTZvdDkUA makrója:
Option Explicit Sub SaveAsDialog() With Application.FileDialog(msoFileDialogSaveAs) .Title = " Válaszd ki a mappát " .ButtonName = "Product mentése" .InitialFileName = "C:\Users\Otthoni\Desktop\makros\" & Range("C5").Value & "_Checklista" If .Show = 0 Then MsgBox " A mérés nem lett PDF-ben mentve! ", vbCritical Exit Sub End If .Execute End With End Sub
Szóval a folyamat szerint:
– Kattintok a gombra
– Felugrik a mentés másként ablak, ami tartalmazza a mentendő fájl nevét
– Egy meghatározott mappaszerkezetig ugrik
– Onnan én választom ki a végleges helyét
– Mentés PDF-ben majd a mentett fájl automatikusan megnyílikPróbáltam úgy megírni hogy csak a PDF választásig mert makró nélkül normál esetben automatikusan megnyitja, ha ki van pipálva, de az én tutorialos makrómmal el sem menti, mert gondolom nem határoztam meg a pdf paramétereit, amit a tiédből másoltam volna, valószínű még valamit hozzá kellett volna írni.
Te egy varázsló vagy a szó legjobb értelmében 🙂
Igen a tervem ez lenne, hogy egy gomb által mentse.
Sajnos ez a napi 4 időpont elég kötött tehát a fájlnévben muszáj, hogy benne legyen ez a makró pedig a mentés időpontját adja hozzá. (Napi apró sikerélményem, de a múltkori makrót nem tudtam elindítani, most ezt igen, és a gombbal is össze tudtam kapcsolni)
Keresgéltem én is sokat, és láttam, hogy táblázatból lehet egy adott cella tartalmát is beírni. Nekem erre tökéletes lenne a Munka2 H1-es cellája (2019.10.28 2:00), ez új adatkor mindig változtatja az időt is, csak az a probléma vele, hogy ugye fájlnevet nem tudok kettősponttal menteni. Erre van valamilyen lehetőség?Amiket láttam videós tutorialokat azok mindig egy meghatározott mappába mentik amit én nem szeretnék.
A ötlet az lenne hogy a mentés helyét én választhassam ki, tehát rákattintok a gombra és akkor már egy adott mappáig (pl.2019 mérések) tallózza és azon belül én választom már ki melyik hónap mappájába mentse. Borzasztó hosszú a mappaszerkezetünk ezért érdekelne van-e ilyen lehetőség. Amint a mentés megtörtént, ezt a pdf fájlt meg is nyissa, mert a digitális aláírást utólag lehet rátenni.A fájl nevének pedig szeretnék más nevet adni mint az eredeti pl Csekklista_+dátum+idő
Tehát 1 nap fájlnevei így néznének ki:
Csekklista_2019.11.01_02_00.pdf
Csekklista_2019.11.01_10_00.pdf
Csekklista_2019.11.01_14_00.pdf
Csekklista_2019.11.01_22_00.pdf
Ha ez a H1-es cella alapján történő azonosítás járható út, itt ugye a nap és az óra között van egy szóköz amit itt kicseréltem alsóvonalra, de ha erre nincs opció különösképpen nem zavar.Az a baj hogy hosszú távon nem marad meg mert nem minden nap használom. 3 éve horvimi videóiból nagyon sokat tanultam, de nem használom napi szinten így manapság, sokszor az alap dolgokon is gondolkodni kell.
Most megint megjött a kedvem, úgyhogy már egy excel makró könyvet is beszereztem.Igen teljesen érthető, elkezdtem csinálni nulláról a leendő táblázatot és sikerült is minden képletet szinte „puskázás” nélkül megírni.
Szeretném megcsinálni a dátum oszlopot úgy, hogy minden hónapban előre ki legyen töltve, de a gyorskitöltés nem tudja értelmezni azt hogy, 4 ugyanaz napi dátum utána egyel több, újra 4 nap ugyanaz és egyel több. Ez kb. 120 sor lenne minden hónapban.
Meg tudom csinálni úgy hogy az egyik oszlopban a hónap első napja végig kitöltve, egy másik oszlopban az 1,1,1,1,2,2,2,2 stb. majd ezeket összeadom, de ha lenne erre valami spécibb megoldás akkor érdekelne.Van még egy másik dolog, amit te tettél bele extraként a táblázatba, és nagyon tetszett az pedig, hogy mentéskor automatikusan pdf-be és az aznapi dátummal menti.
Ez azért nem működne nekem, mert ugye napi 4 pdf készül majd különböző időpontokban. Ez már tudom, hogy inkább makró programozás, úgyhogy kifejtsem egy új fórumban? Talán másoknak is segítség lehet, a kezdeti fórum témától már így is teljesen elkanyarodtunk.-
A hozzászólás módosításra került: 5 years, 4 months telt el-
tasmatta.
Nagyon jó lett a táblázat, nem tudom eléggé megköszönni neked.
Sajnos a mesét még egy utolsó fejezettel szeretném ha kiegészítenéd.
Én az alap függvényeken kívül ilyen bonyolultságút nem használtam soha, le sem merem írni hány órát szántam rá amióta megkaptam tőled a táblázatot, hogy utánaolvassak melyik függvényt mire használjuk úgy általában.
A leírásod teljesen érthető, átlátható, és logikus viszont 1 dolgot nem értek, mégpedig ha a Munka2 lapon meg szeretném változtatni a pozíciókat.
Az első amit kiemeltem a -1 ezt ha átírtam mondjuk -2-re akkor fentebb ugrott egy sorral. De ez mit funkcionál a táblázatban?
A nagyobb kérdőjel pedig a második kiemelés a +2. Nem értem mi a 0 pont ahonnan ezt számolja. Illetve csak sejtésem van, mert ha az OSZLOP() függvénybe nem írok számot akkor azt az oszlop számot adja vissza amelyikbe írtam, de ha a cellát „elhúzom” oldalra a függvény a mellette lévőben is ugyanezzel a képlettel dolgozik és szépen adja a mellette lévő értékeket.3 sor van 3 ugyanolyan függvény amiben csak annyi a különbség hogy a +5 és +9
Ha ez nekem tiszta, ebből már meg tudom csinálni a rendes táblázatot is de ez egy elég fontos része ami még ködös.
=HAHIBA(INDEX(Táblázat1;HOL.VAN($H$1;Munka1!$L:$L;0)-1;OSZLOP()+2);””)
Köszönöm szépen örülök, hogy meg lehet oldani képletekkel is, és a táblázat működik.
Sajnos 3 órája időzök azzal, hogyan tudnám ezt kiterjeszteni, több napra és mérési paraméterre, az én excel tudásom szerint rengeteg idő lenne, és ha később változtatni kellene rajta ami elég gyakori akkor szintén.
Ha jól látom egyszerre több HA függvény feltételéhez van kötve, és azt olvastam, hogy egy képletnél ez is csak korlátozott mennyiségig használható.
Csatoltam a táblázatot 2 újabb lapfüllel, körülbelül így nézne ki a valóságban, mert a mentendő oldalon is nem egymás mellett vannak az értékek.
Van erre valamilyen lehetőség, hogy a leendő kb 120 választógombra legyen valamilyen képlet?Attachments:
You must be logged in to view attached files.Közben eszembe jutott még más is.
A napi 4 mérés körülbelül egyenként 30 mérési paramétert foglal magában.
Ebből változó okokból nem mindegyik mérést tudjuk elvégezni, ezért van olyan hogy csak kettőt lehet.
Tehát ha pont az utolsó mérés adatát nem tudom mérni, akkor a táblázat már nem adja át ezeket az adatokat a checklist fülre.
Ha jól értem akkor a választógombok ebben a makróban nem is funkcionálnak semmit ugye?Szia Kati!
Először is szeretném megköszönni a segítséget.
Sajnos makróval soha nem dolgoztam, nem ismerem ennek a működését, pedig próbáltam még a válaszod után keresgélni.
A leírásod szerint csináltam mindent, lementve ugyanazon néven makróbarát verzióként, de a táblázatban nem történik semmi. Olvasgattam, keresgéltem, sok helyen látom, amikor megnyomják az F5 gombot akkor elindítható az a makró. Jó helyen keresgélek?Nem tartottam tegnap fontosnak, gondolván majd átalakítom, de egy nap 4-szer történik a mérés, tehát egy dátumhoz 4 sornyi adatsorra lenne szükségem.
Tegnap azt gondoltam ez képletekkel megoldható, de ilyet nem használtam. Segítenél benne?
Bocsánat pedig konkrétan emlékszem rá mikor betallóztam.
Attachments:
You must be logged in to view attached files.Azt láttam hogy a videó ezzel az oldallal kapcsolatos de azt nem hogy te csináltad.
Sajnos aminél ezt használni szeretném elég valószínű hogy két ugyanolyan érték fog szerepelni így marad majd a szemmel való keresgélés.De nagyon szépen köszönöm a segítségedet!
Amit linkeltem videót abban működött, csak az volt a gond hogy az összesen oszlopban már ugye volt írva rá egy függvény hogy számolja össze az értékeket így amikor a top5-re vonatkozó függvényt írtam rá rossz volt az eredmény, mivel 2 függvény volt írva rá.
Arra esetleg valami megoldás hogy az értékek mellé hogy kerüljön oda a neve is?Feltöltöttem egy fájlt. Ebben az összesen oszlopban megadtam hogy ha 4-nél nagyobb az érték akkor piros legyen és automatikusán számolja össze a beírt értékeket.
A top 5 oszlopba szeretném azt hogy az első 5 legmagasabb értéket írja be automatikusan de ne csak a számot hanem a gyümölcs nevét és hogy melyik gyümölcs melyik értékhez tartozik.
Ha megoldható úgy lenne a legjobb ha az érték eléri az 5-öt akkor írja be. 5-nél kisebb érték nem számít.Attachments:
You must be logged in to view attached files. -
A hozzászólás módosításra került: 5 years, 3 months telt el-
-
SzerzőBejegyzés