04. oktober 2005 - 16:21Der er
7 kommentarer og 1 løsning
Postnummer opslag returnerer bynavn
Lad mig starte med at sige at jeg ikke rodet så frygteligt meget med Excel VBA før, men har masser af kendskab til Visual Basic / VB Script generelt.
Jeg skal bruge et excel-ark, hvor man bl.a. har mulighed for at indtaste et postnummer. Jeg forestiller mig at det må være muligt, når man går væk fra cellen med postnummeret, at der via en makro slåes op i en postnummer tabel (den funktion skulle jeg nok selv kunne stykke sammen), hvorefter bynavnet returneres, og automatisk sættes ind i cellen umiddelbart til højre for den man har indtastet postnummeret i.
Det må vel være muligt at lave sådan et regneark, hvor brugeren bliver sparet for lidt bøvl. Spørgsmålet er bare hvordan det nemmest løses.
Det er jeg på jagt efter, er egentligt blot hvordan jeg holder øje med hvornår en cell i en bestemt kolonne redigeres, og når det er sket, skal mit postnummer/by-opslag indsættes ved siden af.
Hvis du gerne vil lave detv via en makro, vil nwedenstående kode teste om der bliver indtastet et tilfældigt stede i A-kolonnen og så indsætte en værdi i samme række i B-kolonnen. Du må selv erstatte værdien med de6t rigtige bynavn :-)
Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("a:a")) Is Nothing Then Target.Offset(0, 1).Value = "Indsæt bynavn her" End If End Sub
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.
