Skrive tekst/værdi til en celle - hvis den er tom!
Jeg ønsker at brugen eksempelvis skal angive en værdi i en celle (eller flere celler), f.eks. B1.
B1 er som udgangspunkt tom og jeg ville gerne have at en "kode"/funktion fra "fjern"/anden celle eksepelvis skriver: "INPUT MANGLER" i B1 indtil brugeren indtager en værdi.
Jeg havde forestillet mig, at det skete løbende/automatisk.
Altså hvis værdien mangler kan resultatet ikke regnes ud. Jeg tænkte så man kunne angive "=hvis B1 er tom så skriv som beskrevet ovenfor" i "resultat"-cellen.
Du kan godt skrive "ikke udfyldt" i B1 og så overskrive det med det, der faktisk skal stå. Hvis du vil have, at det så skal skrives igen automatisk, må du bruge en makro, da du ikke kan få en formel til at skrive i andre celler end den, formlen selv står i.
Du kan evt. lægge denne i arkets kodemodul:
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$B$1" Then If IsEmpty(Target.Value) Then Target.Value = "INPUT MANGLER" End If End If End Sub
Skal du have flere celler med samme tekst, må koden udvides til at dække disse også.
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.