Hur tillåter jag bara negativa siffror i Excel?
Hur tillåter jag bara att ange negativa siffror i Excel? Denna artikel kommer att presentera några användbara och snabba knep för dig att lösa denna uppgift.
Tillåt endast negativa siffror i Excel med datavalidering
Tillåt endast negativa siffror i Excel med VBA-kod
Tillåt endast negativa siffror i Excel med datavalidering
Normalt är Datagransknings funktionen kan hjälpa dig, gör så här:
1. Markera cellerna eller kolumnerna som du vill att endast negativa siffror ska anges och klicka sedan på Data > Datagransknings > Datagransknings, se skärmdump:
2. I Datagransknings under dialogrutan Inställningar gör följande alternativ:
(1.) I Tillåt avsnitt väljer Decimal från listrutan;
(2.) I Data avsnitt, välj mindre än eller lika med alternativ;
(3.) Ange äntligen numret 0 i Maximal textruta.
3. Klicka sedan OK, och nu får endast negativa siffror och 0 anges, om positivt antal anges kommer det att visas ett varningsmeddelande, se skärmdump:
Tillåt endast negativa siffror i Excel med VBA-kod
Här är en VBA-kod som också kan hjälpa dig, med följande kod, när du anger ett positivt tal kommer det att konverteras till negativt automatiskt, gör så här:
1. Högerklicka på arkfliken där du bara vill tillåta negativa siffror och välj Visa kod från snabbmenyn, i poppade ut Microsoft Visual Basic för applikationer kopiera och klistra in följande kod i tomt Modulerna:
VBA-kod: Tillåt endast negativa siffror i kalkylbladet:
Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
Const sRg As String = "A1:A1000"
Dim xRg As Range
On Error GoTo err_exit:
Application.EnableEvents = False
If Not Intersect(Target, Range(sRg)) Is Nothing Then
For Each xRg In Target
If Left(xRg.Value, 1) <> "-" Then
xRg.Value = xRg.Value * -1
End If
Next xRg
End If
err_exit:
Application.EnableEvents = True
End Sub
Anmärkningar: I ovanstående kod, A1: A1000 är de celler som du vill bara mata in negativa siffror.
2. Spara och stäng sedan den här koden, gå tillbaka till kalkylbladet, och nu, när du anger några positiva siffror i cellerna du angav i koden, kommer de positiva siffrorna att konverteras till negativa automatiskt.
Bästa kontorsproduktivitetsverktyg
Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid. Klicka här för att få den funktion du behöver mest...
Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare
- Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
- Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
- Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
