lscb

het programma werkt prima thanks boys

inderdaad het bestand wordt opgeslagen op een netwerk zoals al mijn bestanden en daar zit ergens iets scheef het lijkt dat mijn netwerk tijdelijk uitvalt en het programma dat dan open staat niet meer werkt gebeurd dit tijdens het opstarten krijg ik de melding dat het programma niet werkt na volledige opstart van de pc werkt alles weer voor zover we nu weten zit dit in het netwerk bij mij of provider welke melding het precies is kan ik zo niet zeggen ben nu niet op de zaak

oke bedankt zover we gaan het testen en bericht je eind van de volgende week

je bedoeld dus wat het nu is wordt het bestand al opgeslagen zoals het normaal zo zijn en als excel zou vast lopen dat bestand kan open en verder kan gaan als dat zo is , is dat prima de laatste optie met de tijden zou natuurlijk oo kunnen maar dat is te over wegen

ik zie dat je je de macro hebt aan gepast maar waar slaat de macro het bestand op dat zie ik nu niet tenzij ik daar overheen kijk

backup lijkt mij het beste

hallo allemaal ik heb een excel sheet voor mijn werk die de hele dag open staat nou dan kan er wel eens fout gaan ik werk er dan ook niet aleen op nu wil ik een bakup van maken via een macro / vba die ik kan instellen om het uur of zoiet een backup maakt de staandaard herstel funktie zoek ik dus niet het zit zo via het netwerk treed er een storing op maar dat is niet te merken in de pc / laptop tot dat men wil afsluiten van de pc hier zijn we al dagen naar opzoek maar er ziet nog geen schot in wie kan mij helpen aan een backup file ik heb al iets gekregen elders maar daar zit dan ook de backup weer in en het beeld knippert wanneer er een backup plaats vind ( is dat normaal ) alle info en voorbeelden zijn welkom het onder staande bestand heb ik elders gekregen klopt dit ?? TESTBESTAND (2).xlsm

lijkt me een simpele oplossing maar ik zie het niet meer zie mijn voorbeeld bestandje voor meer info min 1.xlsx

slot mag erop

GECONTROLEERD VAN DE CODE DIE IK HAD GEKREGEN KLOPT DIT INDERDAAD EN HET WERKT EN IK HEB DE CODE DIE dotchiejack SCHREEF ER NU OPSTAAN EN WERKT PRIMA WAT DE ZE TOPIC BETREFT MAG GESLOTEN WORDEN ALS ER GEEN VRAGEN MEER ZIJN

Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 4 And Target.Count = 1 Then If Target.Value <= 2359 Then Application.EnableEvents = False Target.Value = TimeSerial(Int((Target.Value Mod 10000) / 100), (Target.Value Mod 100), 0) Cells(Target.Row + 1, Target.Column - 1) = Target.Value Application.EnableEvents = True End If End If End Sub DIT IS EEN ANDERE CODE DIE IK GISTEREN HAD GEKREGEN MAAR ALS JE ZIET IS DE EERSTE REGEL HET ZELFDE ALS DIE VAN U NU IS DE VRAAG IS DIT SAMEN TE VOEGEN ZO DAT HET TOCH IEDER ZIJ DING DOET

de regel komt bij nog 1 keer voor is dat aan te passen de code hier boven lijkt op wat ik heb alleen is de code die ik al had is iets uitgebreider

thans werk prima

aangepast code vergeten sorry tik in kolom a een tijd zonder puntjes en je ziet wat ik bedoel maar wat ik wil is dat dit voor enkele cellen is de formule werkt alleen voor een colom zodra ik er iets ander in tik dan tijd werkt de formule niet meer map5.01.xlsm

ik hoop dat je hier iets mee kunt map5.01.xlsm