20. februar 2006 - 20:16Der er
5 kommentarer og 1 løsning
Knytte tekst til drop down boks
Et delt ark med op til 100 ordrelinier - én ordre per linie. I kolonne "K" indtaster en række brugere en årsag (kort tekst) når den pågældende ordre ikke kan behandles. Forklaringen er standard "Varenummer ikke oprettet", "Kundenummer ugyldigt" etc.
Jeg har oprettet datavalidering med liste og drop-down boks og kunne nu godt tænke mig automatisk hver gang der blev valgt en årsag at smide dato, klokkeslet og initialer i enden af årsagsteksten, som f.eks.:
Både og... Det skal kodes, men jeg tror ikke det er en god ide at sætte det i enden af årsagsteksten (samme celle) af flere grunde. Din datavalidering vil jo protestere idet du nu ændrer årsagen til noget der ikke findes. Du registerer sansynligvis for at kunne finde hovedårsagerne. Det kan så ikke ske maskinelt, da alle dine årsagstekster er forskellige.
Når det er sagt så kan denne makro måske køre. (jeg tager altid forbehold for delte mapper og flettede celler) Den registerer når der sker en ændring i en celle i kolonne K og sættes Dato & Tid i kolonne M og brugernavn i kolonne N
Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("K:K")) Is Nothing Then Target.Offset(, 2) = Now Target.Offset(, 3) = Environ("username") End If End Sub
Tusind tak for svaret ..og tak for alle de andre brugbare svar du leverer!
Synes godt om
Ny brugerNybegynder
Din løsning...
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.