Notifikationer

Markér alle som læst Log ud

peaceofcake Nybegynder

21. april 2004 - 11:00 Der er 2 kommentarer og
1 løsning

Value gentagelse + If-procedure

Hejsa!

Kan man gøre denne remse mere simpel?

With Range("E13")
.Value = "=C13*D13"
.Offset(1, 0).Value = "=C14*D14"
.Offset(2, 0).Value = "=C15*D15"
.Offset(3, 0).Value = "=C16*D16"
.Offset(4, 0).Value = "=C17*D17"
.Offset(5, 0).Value = "=C18*D18"
.Offset(6, 0).Value = "=C19*D19"
.Offset(7, 0).Value = "=C20*D20"
.Offset(8, 0).Value = "=C21*D21"
.Offset(9, 0).Value = "=C22*D22"
.Offset(10, 0).Value = "=C23*D23"
.Offset(11, 0).Value = "=C24*D24"
.Offset(12, 0).Value = "=C25*D25"
.Offset(13, 0).Value = "=C26*D26"
.Offset(14, 0).Value = "=C27*D27"
End With

Og samtidig skal værdien KUN undsættes hvis C (eller D for den sags skyld) indeholder data...
Hvordan gøres det?

Synes godt om

bak Forsker

21. april 2004 - 11:58 #1

Sub test()
Dim rng As Range, x As Long
Set rng = Range("E13")
With rng
For x = 0 To 14
If IsEmpty(rng.Offset(x, -2)) = False And IsEmpty(rng.Offset(x, -1)) = False Then
.Offset(x, 0).Value = "=C" & rng.Row + x & "*D" & rng.Row + x
End If
Next
End With
End Sub

Synes godt om

peaceofcake Nybegynder

21. april 2004 - 12:10 #2

Fedt!
Takker! ;-)

Kom og få point...

Synes godt om

bak Forsker

21. april 2004 - 12:12 #3

velbekomme :-)

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

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
Æ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
Gemme største værdi Af Lemming@privat.dk i Excel	2	07/08/202622:13	08/08/202609:03

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.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS