Telefonszámunk: 1-472-0679

Időbélyeg és és utána cellavédelem

Kezdőlap Fórumok Excel témák Időbélyeg és és utána cellavédelem

22 bejegyzés megtekintése - 1-22 / 22
  • Szerző
    Bejegyzés
  • #9662
    NIN
    Felhasználó

      Sziasztok!

      Abban szeretném segítségetek kérni, hogy miként tudom megolani az alábbi feladatot

      Pl.: „A1” cellába beviszek egy adatot, akkor a „B1” cellába kiírja az év-hónap-nap óra:perc -et.

      Mindezt úgy, hogy ha „A1” cellát újra kitöltöm, a „b1” cellában az idő nem változik – olyan időbélyeg szerűen.

      Az a variáció is megfelelne, ha „A1” kitoltése után „B1” beíródik és uána „A1” és „B1” írásvédetté válik – csak jelszóval lehet felülírni.

      Előre is köszönöm a segítséget!

      Szép estét: Norbi

      • A témakör módosításra került: 1 year, 10 months telt el-NIN.
      #9665
      horvimi
      Adminisztrátor

        Szia!

        Ezt munkalap eseménykezeléssel lehet megcsinálni, azaz makrós megoldás van csak.
        A munkalap CHANGE eseményének kezelésekor megkapod, hogy melyik cellát változtatták.
        Ha ez az A1, és a B1 még üres, akkor a B1-be beírja az aktuális időt, különben nem történik semmi.

        Ez nem védi a cellákat, tehát a B1 bárki által módosítható vagy törölhető lesz.

        Csak A1 és B1 írásvédetté tétele Excel szinten elég macerás, mert munkalaphoz lehet védelmet rendelni, ami az aktuálisan zárolt cellákat védi. De remélem ezt ismered.

        Ugyanezzel az eseménykezelővel viszont megoldható, hogy ha a B1-et változtatják, vagy törlik, akkor írja vissza az eredeti értékét, majd kérjen esetleg egy jelszót, ha mégis módosítani akarná.

        Csak érzékeltetni szerettem volna a lehetőségeket.
        Az utánanézéshez és a megvalósításhoz a te idődet kell használnod, hacsak nem „delila” megcsinálja neked, nekem most nincs több időm. Az eddigi kérdéseid alapján azt látom, hogy a makró téma nem ismeretlen a számodra.

        Imre

        #9666
        NIN
        Felhasználó

          Szia! Köszönöm szépen a segítséget!

          Sajnos meg kell várnom, hogy „delila” vagy valaki más segítsen, mert tőlem a makró nagyon távol van. – sajnos

          Olyan kezdő szinten haladó vagyok 🙂

          Várakozok és közben keresgélet a neten megoldásokat.

          Norbi

          #9670
          Boxer
          Felhasználó

            Pár éve volt egy ilyen jellegű kérés, és akkor válaszoltam is rá. A mai napig is használom, és jól működik. Igaz, a cellákat nem védi le… 😀

            Ez esetleg megállja a helyét makró nélkül? Persze előtte be kell pipálni a Beállítások-Képletek-Számítási beállítások-Közelítés engedélyezése lehetőséget és a maximális lépésszámot minimumra.
            Nálam ha a C2-be bármilyen változó bekerül, akkor az A2-ben megjelenik a dátum/idő (beállított formátumban), és csak akkor tűnik el, ha törlöm a C2-ből az adatot. Ha a C2-ben nem törlődik hanem csak változik az adat, akkor az A2 megőrzi az elsőre megjelenő dátum értéket.

            Azt viszont nem tudom, hogy a közelítés engedélyezésének megváltoztatása miben, és mennyiben befolyásolja az esetleges többi függvényt…

            =HA(C2<>””;HA(A2=””;MOST();A2);””)

            Norbi

            Ha a Közelítés engedélyezése nincs kipipálva, akkor körkörös hivatkozásra fog hibaüzenetet küldeni.

            • A hozzászólás módosításra került: 1 year, 10 months telt el-Boxer.
            #9673
            delila
            Felhasználó

              Szia!

              Ha már Imre felajánlotta, megírtam a makrót. 😀

              Az A oszlopod ne legyen zárolt.
              A lapodhoz kell rendelned: lapfülön jobb klikk, Kód megjelenítése. A jobb oldalon megjelenő üres felültre másold be a makrót.
              A ActiveSheet.Protect Password:="aaa", UserInterfaceOnly:=True sorban most aaa a lapvédelem jelszava, ezt írd át kedved szerint. Ez a sor teszi lehetővé makróból a zárolt cellák felülírását.

              Private Sub Worksheet_Change(ByVal Target As Range)
                  If Target.Count = 1 Then
                      If Cells(Target.Row, 2) = "" Then
                          Application.EnableEvents = False
                          ActiveSheet.Protect Password:="aaa", UserInterfaceOnly:=True
                          Cells(Target.Row, 2) = Format(Now, "yyyy.mm.dd hh:ss")
                          Application.EnableEvents = True
                      End If
                  End If
              End Sub

              Lehet, hogy a makróban lévő idézőjeleket át kell írnod. Ha piros színnel jelenik meg nálad egy sor, ez a teendő.

              Üdv, Delila

              #9674
              NIN
              Felhasználó

                Sziasztok!

                Boxernek is és delilanak is köszönöm szépen a segítséget!

                Mindkettőt megnézem!

                Üdvözlettel Norbi

                #9676
                NIN
                Felhasználó

                  Kedves Delila!

                  A makró működi!

                  Annyi a problémám vele, hogy az első sornál beírja, a pontos időt.

                  Viszont egy sorral lejjebb bevitt értéknél mr nem érvényesítni ugyan azt a makrófunkciót – nem ad vissza dámot.

                  Ha mégis sikerül, akkor a pontos idő helyett egy előző időt ad meg kb 15-20 perccel ezelöttit.

                  jelszó maradt „aaa”

                  Én szúrok le valamit, vagy a makró nem tudja azt ,amit szeretnék?

                  Még egy kérédsem lenne. A makrót több oszlopra is szeretném futtatni, akkor elég csak annyiszor bemásolni a képletet és átírni az oszlopok számát – Pl.: 3 és 4 es , vagy más makrót igényel, egy összetettebbet?

                  Előre is köszönöm a segítséget!!!

                  Üdvözlettel: Norbi

                  #9677
                  NIN
                  Felhasználó

                    Makrós mintaexcel

                    • A hozzászólás módosításra került: 1 year, 9 months telt el-NIN.
                    • A hozzászólás módosításra került: 1 year, 9 months telt el-NIN.
                    #9680
                    NIN
                    Felhasználó

                      Makró nélkül, mert nem tudom feltölteni zip ként sem

                      Attachments:
                      You must be logged in to view attached files.
                      #9682
                      delila
                      Felhasználó

                        Mese a csatolt fájlban.

                        Attachments:
                        You must be logged in to view attached files.
                        #9684
                        NIN
                        Felhasználó

                          Köszönöm szépen a választés a programmal tültött időd!

                          Egy dolgot nem értek.

                          Kitöltöttem a „páros” cellákat / beviteli mező /

                          Időnek pedig zagyvaságokat ír ki. Mellékelek egy képernyőmentést.

                          Mi lehet a baj? nálam lenne valami rosszul beállítva?

                          Nagyon köszönöm előre is a sok segítséget!

                          Norbi

                          • A hozzászólás módosításra került: 1 year, 9 months telt el-NIN.
                          Attachments:
                          You must be logged in to view attached files.
                          #9688
                          delila
                          Felhasználó

                            Ezt kérted:
                            Pl.: “A1” cellába beviszek egy adatot, akkor a “B1” cellába kiírja az év-hónap-nap óra:perc -et.
                            Véletlenül a perc (minut) helyett másodpercet (seconds) adtam meg a formátumnál. Öreg hiba, mea culpa!

                            A Cells(Target.Row, Target.Column + 1) = Format(Now, "yyyy.mm.dd hh:ss") sorban a formátumot írd át így:
                            Cells(Target.Row, Target.Column + 1) = Format(Now, "yyyy-mm-dd hh:mm")
                            Ennél már az év-hó-nap közötti pontot is átírtam a kérésed szerinti kötőjelre.

                            #9689
                            NIN
                            Felhasználó

                              Köszönömt, TÖKÉLETESEN MŰKÖDIK! 🙂

                              Szerintem nem hibáztál! Inkább egy beépített teszt volt felém, hogy észreveszem e? 🙂

                              Elbuktam! 🙂

                              u.i.: feltűnk az „SS” – nem gondoltam, hogy seconds – , de nem mertem lecserélni, mivel az év „yyyy” után ott van a hónap „mm” .
                              Ezért nem gondoltam rá, hogy hónapként és percként is használható!

                              Lényeg, hogy nagyon szépne köszönöm a segítségedet!

                              Üdvözlettel: Norbi

                              #9690
                              delila
                              Felhasználó

                                Teszt?! 🙂
                                Szívesen.

                                #9698
                                NIN
                                Felhasználó

                                  Kedves „delilia”

                                  Ismét szeretnék kérni egy kis segítséget.

                                  Tökéletesen működik a „makro” amit írtál.

                                  Viszont munkalapok között nem mindig megy át a művelet.

                                  Első lapon „beviteli mezőn” listából kiválasztok.

                                  Majd áthivatkozom az „időbélyeg” munkalapra.
                                  Ott az általad írt makrót futtatom úgy, hogy Pl.: „B3” cella a beviteli – behivatkozott cella – , „C3” cella az pontos időm – időbélyegem.

                                  Következő lépésben az „időbélyeg munkalap aktuális celláját visszahivatkozom a „beviteli mező” „időpont” oszlopába.

                                  Csatolok egy kivonatot a műveletről , amiben elakadam.

                                  Sajnos nem jövök rá a hiba okára.

                                  Meg tudnád szakérteni?

                                  Előre is köszönöma segítséged!

                                  Üdvözlettel : Norbi

                                  u.i.: természetese, „delila”- n kívül mindenkitől szívesen veszem, ha tud segíteni!
                                  Nekik is előre köszönöm!

                                  Sajnos makrobarát munkafüzetet nemenged, ezért alább memásolom a makrót:
                                  Ennke helye az „időbélyeg”- nél van
                                  a jelszó”aaa”

                                  Private Sub Worksheet_Change(ByVal Target As Range)
                                  If Target.Column Mod 2 = 0 And Target.Column <= 26 And _
                                  Cells(Target.Row, Target.Column + 1) = „” Then
                                  Application.EnableEvents = False
                                  ActiveSheet.Protect Password:=”aaa”, UserInterfaceOnly:=True
                                  Cells(Target.Row, Target.Column + 1) = Format(Now, „yyyy-mm-dd hh:mm”)
                                  Application.EnableEvents = True
                                  End If
                                  End Sub

                                  • A hozzászólás módosításra került: 1 year, 9 months telt el-NIN.
                                  • A hozzászólás módosításra került: 1 year, 9 months telt el-NIN.
                                  Attachments:
                                  You must be logged in to view attached files.
                                  #9706
                                  delila
                                  Felhasználó

                                    Szia!

                                    Egyszer már megírtam az Excel-program_v2.xlsm fájlban, hogy ne duplázd az adatokat. Nálad teljesen azonos adatok szerepelnek a két lapon.
                                    Semmi szükség az ide-oda hivatkozásokra.

                                    Az érvényesítéshez szükséges adatokat – mivel összesen 3 van belőlük – a kép szerint is megadhatod, akkor nem lesz a tartomány útban.

                                    Makrót tartalmazó füzetet tömörítve tudsz ide belinkelni.

                                    Attachments:
                                    You must be logged in to view attached files.
                                    #9708
                                    NIN
                                    Felhasználó

                                      Szia!
                                      Értem amit mondasz, de a feldat amire használnám a makródat, kicsit bonyolultabb nekem.

                                      Csatolom a teljes munkafüzetet.

                                      Amit szeretnék:

                                      Munkaszám generátor lap „O” oszlopában kiválasztott lista alapján írjon ki időt a „P” től „AB” oszlopokba aszerint, hogy a kistát léptetem a munkafolyamat szerint.

                                      Ajánlatkérés, Ajánlat kész, ajánlat elküldve stb.

                                      Mindezt úgy , hogy a megjelenő időpont ne legyen törölhető, csak jelszóvak.

                                      Problémám az, hogy az általad írt makró az egész munkalapin blokkolja a páros oszlopokat.

                                      Én azt szeretném, ha csak a „P” től „AB” ig lenne írásvédett, miután időpont gnerálódik oda.

                                      Tudom bocsolult a kérésem, de talán megoldható.

                                      Előre is köszönöm!

                                      Norbi

                                      u.i: a makrót jelenleg a „Kódolt_segéd” tartalmazza

                                      sem .ral-t ,sem .zip-et nem tudok feltölteni

                                      ezért az ürs programot felrakom a makró nélkül, melynek helyét fentebb írtam.

                                      • A hozzászólás módosításra került: 1 year, 9 months telt el-NIN.
                                      • A hozzászólás módosításra került: 1 year, 9 months telt el-NIN.
                                      #9711
                                      NIN
                                      Felhasználó

                                        Munkafüzet csatolása tömörítve nem megy fel 🙁

                                        • A hozzászólás módosításra került: 1 year, 9 months telt el-NIN.
                                        • A hozzászólás módosításra került: 1 year, 9 months telt el-NIN.
                                        Attachments:
                                        You must be logged in to view attached files.
                                        #9715
                                        NIN
                                        Felhasználó

                                          ez már felmegy

                                          • A hozzászólás módosításra került: 1 year, 9 months telt el-NIN.
                                          • A hozzászólás módosításra került: 1 year, 9 months telt el-NIN.
                                          #9719
                                          NIN
                                          Felhasználó

                                            lemaradt

                                            • A hozzászólás módosításra került: 1 year, 9 months telt el-NIN.
                                            • A hozzászólás módosításra került: 1 year, 9 months telt el-NIN.
                                            Attachments:
                                            You must be logged in to view attached files.
                                            #9723
                                            delila
                                            Felhasználó

                                              Mikor az első makrót tettem be ide, ezt írtam: Az A oszlopod ne legyen zárolt.
                                              Neked kell a lap zárolása előtt az írható oszlopok védelmének a megszüntetése.

                                              Átírtam a makrót.
                                              Kérlek, tiszteld meg a fórumot azzal, hogy a hozzászólás elküldése előtt átnézed az írásodat, és csak a hibák kijavítása küldd azt el.
                                              Nem tudok mit kezdeni az ilyen sorokkal: Tudom bocsolult a kérésem, de talán megoldható.

                                              Attachments:
                                              You must be logged in to view attached files.
                                              #9725
                                              NIN
                                              Felhasználó

                                                „Delila” a segítséget köszönöm szépen!

                                                Hibáztam, a jövőben odadigyelek! Mea culpa!

                                                Egyébiránt a problémám gyökere nem az elküldött makro alkalmazásából fakadt – az működik manuálisan kitöltött cellákkal.

                                                Problémaám az, ha a cellát képlet erdményeivel töltöm fel. Pl. „HA függvény eredményeivel töltöm és ezeket szeretném időbélyeggel ellátni.

                                                Mindettől független nagyon köszönöm, hogy foglakoztál a bejegyzésemmel!

                                                Üdvözlettel: Norbi

                                              22 bejegyzés megtekintése - 1-22 / 22
                                              • Be kell jelentkezni a hozzászóláshoz.