Ja koden har som sagt også virket helt upåklageligt hos mig, men pludselig idag ser jeg at den har byttet om ¨på dag og måned.
Mit første bud var umiddelbart også valg af sprog eller celle format. celle F3 er bare sat til "standard" og det har den hele tiden været.
Sprog er også sat til dansk.
Men man skulle jo umiddelbart tro at når koden har virket perfekt så ligger synderen nok i computeren et eller andet sted, måske registrerings databasen.....men jeg aner ikk hvor jeg skal lede.
For umiddelbart har computeren det rigtige datoformat....
Ja sjovt nok det prøvede jegh så også lige og det virker med Date,
Men i bund og grund er det jo det samme som i min kode blot at jeg har specificeret hvordan formatet skal forholde sig....eller har jeg misforstået det???
Men umiddelbart ja så virker det nu med = Date istedet, forstår bare ikke hvorfor det virker med den og ikk med den anden når det har virket før.
Øhh, du har da sat 2 stk anførelses tegn foran strengen, men prøvede lige og den virker da også, hvis man altså ændre celleformat til tekst ellers giver den det samme ombytning på dag og måned.
Mystisk....som sagt det har jo virket før uden problemer og jeg har ikke skiftet nogen version eller lign. eneste som måske er at sætte finger på at en eller anden åndsvag update har kunne lave ged i det, men det tror jeg nu egentlig heller ikk rigtig på.
Men jeg forstår det altså ikk, må være mig som har misforstået noget med det kode halløj her.
For jeg troede at man med koden:
ActiveSheet.Range("F3").Value= Format(Day(Date), "00") etc.
Gik ind og definerede hvad format celle f3 skulle være i og hvad strengen skal bestå af.....dvs at uanset om der var formateret "standard" eller "tekst" eller lign. så ville den altid skifte det til "Dato format" for den valgte celle.
Eller er det bare noget jeg har fået galt i halsen (ikke utænkeligt er ganske ny i det her VBA halløj)
Ja det er meget meget mystisk, for så er denne "excel ting" lige kommet til på en eller anden mystisk vis, for det har som sagt virket lige efter bogen.
Og nu sidder jeg og får det lidt dårligt.
For bruger faktisk præsis det samme format kode andre steder, som dog godt nok virker, har lige tjekket....men det kan jo lige så godt gå samme vej, hvis det er noget helt 3´ede som er synderen her.
For den kode burde altså alt andet lige være efter bogen, ikk
Prøv at tjekke hvad der står i Kontrolpanel, Regional and Language settings, Regional options (eller hvad det nu hedder i en dansk Windows - Noget med Lande og sprogopsætning).
Niels Bjarne, Har tjekket regions og lande opsætning nix at hente der.
Excelent, Jeg har også excel2003. Men det forklare jo ikk rigtig hvordan det så kan være at det har virket siden jeg lavede koden for snart 1½ år siden, og pludselig vender det om uden nogen form for ænddring.
Ud over det så virker det jo sært nok med:
ActiveSheet.Range("F3").Value = Date (uden at vende noget som helst....skulle jo også gerne benytte computerens sytem dato)
Men når jeg bruger den kode som er i start spm så vender den altså om, og det er den først begyndt på idag.
format returnerer en streng, så det er sansynlig, at du har ændret cellens format fra tekst til dato og at excel derfor automatisk prøver at lave strengen om til dato.
Man kan ikke via vba-formatfunktion ændre på cellens format.
Ok, det troede jeg at den gjorde, for tager du eks. en celle og sørger for at den har "standard" formateret og så kører koden på det felt, og derefter kigger under cellen´s formatering vil du da se at den er ændret til dato, eller hva???
Men jeg har faktisk forsøgt at formatere celle i tekst og dato, men lige meget hvad så vender den stadig om på dag og måned.
Og det er jo stadig mystisk hvordan det så kan lade sig gøre at det har virket lige ind til nu. og det er jo ikke kun et ark jeg har den celle på men nok snare 7-8 ark nu, så det skulle da være mærkeligt hvis lige den samme celle skulle være blevet formateret om og alle andre celler i alle ark står til "standard"
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
Ny bruger
Nybegynder
Opret
Preview
