Hej allihop! har gjort en liten enklare kalkyl som beräknar löner och arbetade tim, skatt osv i en "mall" i Excel.Nu undrar jag om någon kan tipsa mig hur jag med några enkla knep kan "tömma,rensa alla kalkylfält" och beräkna lön för nästa person utan att ladda om mallen.
Förmodar att en knapp med vb-kod behövs eller?
Tack för ett bra forum.
/owe

Håll ned Ctrl och markera alla celler du vill radera
Välj Infoga/Namn/Definera
Välj ett namn tex 'inmatning'

Lägg i detta i en modul

<code>
Sub Clear()
Range("inmatning").ClearContents
End Sub
</code>

Lägg in en knapp på bladet och koppla den till
denna sub

/Thommy

Tack för tipset Thommy! Nu fungerar det.
/owe

Om du också lägger till select så kan du mata in
nya värden och sen trycka enter så hoppar markeringen till
nästa cell bland dem du definerat som inmatning.

<code>
Sub Clear()
With Range("inmatning")
.Select
.ClearContents
End With
End Sub
</code>

/Thommy

Tack för ett bra tips. Bara en fråga om jag lägger ett skydd på bladet hur gör jag för att det ska fungera då?

Du måste ta bort låsning för de celler man ska kunna ändra.

Hej
Dom är olåsta men det ligger ett skydd på arbetsbladet