Hur dubbelklickar jag på en cell och lägger till 1 till det cellvärdet i Excel?

Den här artikeln visar hur du lägger till 1 till ett cellvärde automatiskt genom att dubbelklicka på det i Excel.

Dubbelklicka på en cell och lägg till 1 med VBA-kod

Dubbelklicka på en cell och lägg till 1 med VBA-kod

Fantastisk! Använda effektiva flikar i Excel som Chrome, Firefox och Safari!

Spara 50% av din tid och minska tusentals musklick åt dig varje dag!

---

Följande VBA-kod kan hjälpa dig att lägga till 1 till ett cellvärde efter att du dubbelklickat. Gör så här.

1. Högerklicka på arkfliken där cellvärdena du behöver lägga till 1 genom att dubbelklicka. Klicka sedan Visa kod från högerklickmenyn.

2. I pop-up Microsoft Visual Basic för applikationer kopiera och klistra in nedanstående VBA-kod i kodfönstret.

VBA-kod: Lägg till 1 till ett cellvärde genom att dubbelklicka

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    On Error Resume Next
    If Not Intersect(Target, Range("A1")) Is Nothing Then
      Range("A1").Value = Range("A1").Value + 1
      Cancel = True
    End If
End Sub

Anmärkningar: I koden är A1 den cell du kommer att lägga till nummer 1 till genom att dubbelklicka.

3. tryck på andra + Q samtidigt för att stänga Microsoft Visual Basic for Applications-fönstret.

Dubbelklicka nu på cell A1 kommer att lägga till 1 till det befintliga värdet enligt nedanstående skärmdump.

Relaterade artiklar:

• Hur lägger jag till / anger automatiskt aktuellt datum / tid i en cell genom att dubbelklicka i Excel?
• Hur lägger jag till bock i en cell med dubbelklicka i Excel?

---

De bästa Office-produktivitetsverktygen

Kutools för Excel löser de flesta av dina problem och ökar din produktivitet med 80%

• återanvändning: Sätt snabbt i komplexa formler, diagram och allt som du har använt tidigare; Kryptera celler med lösenord; Skapa e-postlista och skicka e-post ...
• Super Formula Bar (enkelt redigera flera rader med text och formel); Läslayout (enkelt läsa och redigera ett stort antal celler); Klistra in i filtrerat intervall...
• Sammanfoga celler / rader / kolumner utan att förlora data; Delat cellinnehåll; Kombinera duplicerade rader / kolumner... Förhindra duplicerade celler; Jämför intervall...
• Välj Duplicera eller Unikt Rader; Välj tomma rader (alla celler är tomma); Super Find och Fuzzy Find i många arbetsböcker; Slumpmässigt val ...
• Exakt kopia Flera celler utan att ändra formelreferens; Skapa referenser automatiskt till flera ark; Sätt in kulor, Kryssrutor och mer ...
• Extrahera text, Lägg till text, ta bort efter position, Ta bort mellanslag; Skapa och skriva ut personsökningstalsatser; Konvertera mellan celler innehåll och kommentarer...
• Superfilter (spara och tillämpa filterscheman på andra ark); Avancerad sortering efter månad / vecka / dag, frekvens och mer; Specialfilter av fet, kursiv ...
• Kombinera arbetsböcker och arbetsblad; Sammanfoga tabeller baserat på nyckelkolumner; Dela data i flera ark; Batchkonvertera xls, xlsx och PDF...
• Mer än 300 kraftfulla funktioner. Stöder Office / Excel 2007-2021 och 365. Stöder alla språk. Enkel implementering i ditt företag eller organisation. Fullständiga funktioner 30 dagars gratis provperiod. 60 dagars pengarna tillbaka-garanti.

Läs mer... Gratis nedladdning... Köp... 

---

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!

Läs mer... Gratis nedladdning... Köp...