Søg
Avatar billede h_s Forsker
31. juli 2008 - 14:06 Der er 2 kommentarer og
1 løsning

lægge 1 til en værdi i en celle via vba

Jeg har i A1 stående et tal (f.eks. 1000)
Nu vil jeg via vba lægge 1 til så der kommer til at stå 1001.
Hvordan gør jeg det?
Avatar billede barentsen Novice
31. juli 2008 - 14:25 #1
Sub Plus1()

Dim i As Variant
i = Ark1.Range("a1") + 1
Ark1.Range("a1") = i
End Sub
Avatar billede h_s Forsker
31. juli 2008 - 14:25 #2
Fantastiks - Tak!
Avatar billede jkrons Professor
31. juli 2008 - 14:44 #3
Denne virker i alle ark.

Sub Plus1()
  ActiveSheet.Range("a1") = ActiveSheet.Range("a1") + 1
End Sub
Avatar billede Ny bruger Nybegynder

Din løsning...

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.

Loading billede Opret Preview
Kategori
Excel kurser
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig
Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
VB, Lægge 2 celler sammen og skrive den i cellen ved side af Af MC3390 i Excel 9 23/09/202618:11 24/09/202611:16
Ændre tal i en celle Af xvid i Excel 1 04/09/202616:05 04/09/202616:54
Kan Excel selv beregne alder? Af leahcim i Excel 7 31/08/202610:24 04/09/202602:08
problem med mailbesked Af Pestilensen i Excel 3 24/08/202611:16 28/08/202612:55
Sætte billeder ind i google sheets ark ud fra elev nummer Af lurup i Excel 18 17/08/202615:14 05/09/202622:04
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 18:04 Findes der et "Papir-kurv" symbol, man kan sætte på Firefox og Google Chrome ? (For oven) Af Ikke-ekspert i Browsere
03/1012:14 Ang udskrift Canon mb5050 Af made18 i Printere
02/1021:29 Vedr. Windows 11 version 26H2 Af ErikHg i Fri debat
02/1018:16 Tømme gammel PC for indhold, kan ikke tændes Af Mai i Andet software
01/1017:41 NVIDIA Geforce GTX 1060 6 GB som "snakker" Af dcedata1977 i Andet hardware
White papers
Flere white papers »