Avatar billede michaeljuul Nybegynder
23. marts 2005 - 15:39 Der er 13 kommentarer og
1 løsning

Tælle det samme med 3 forskellige tal?

Jeg har den her =TÆL.HVIS(E32:AI32;"1")  hvor mine tal skal tælles samme i et felt.
Nu vil jeg gerne have det sådan, at den også tæller hvis man skriver enten 2 eller 3 i et af felterne.

Michal
Avatar billede jkrons Professor
23. marts 2005 - 15:42 #1
Skalden tælle alle 1 + 2 +3, eller skal kun tælle enten 1 eller 2 eller 3?
Avatar billede michaeljuul Nybegynder
23. marts 2005 - 15:56 #2
Hej igen og tak for hjælpen igår. Det er en forsættelse af den vi var igang med igår.

Hvis der står 15 i AJ32 som er der hvor alle bliver lagt samme.
Så skal den hvis jeg skriver 2 i et felt stadig kun ligge en til, så det bliver 16.
Og hvis jeg skriver 3 i et felt stadig kun ligge en til, så det bliver 13.
Avatar billede michaeljuul Nybegynder
23. marts 2005 - 15:58 #3
Ups sidste linje mente jeg 17 og ikke 13
Avatar billede michaeljuul Nybegynder
23. marts 2005 - 16:09 #4
=TÆL.HVIS(E32:AI32;"1")
Den er jo sådan at hvis jeg ændre "1" til "2" så lægger den stadig kun 1 til som den skal. Jeg skal bare have sat tallene 2 og 3 ind i den =TÆL.HVIS(E32:AI32;"1")
Avatar billede kabbak Professor
23. marts 2005 - 16:14 #5
=TÆL.HVIS(E32:AI32;"1")+TÆL.HVIS(E32:AI32;"2")+TÆL.HVIS(E32:AI32;"3")
Avatar billede michaeljuul Nybegynder
23. marts 2005 - 16:17 #6
Hej igen kabbak.

Tak. Men den tæller stadig ikke når jeg skriver 2 eller 3 kun når jeg skriver 1
Avatar billede michaeljuul Nybegynder
23. marts 2005 - 16:21 #7
Min fejl. Den virker :-)
Avatar billede michaeljuul Nybegynder
23. marts 2005 - 16:24 #8
Skal lige hurtig høre dig om den igår.
Private Sub Worksheet_Change(ByVal Target As Range)
  If Not Intersect(Target, Range("E32:AI43")) Is Nothing Then
If Len(Target) > 1 Then Target = Left(Target, 1)
End If
End Sub

Var det ikke meningen at den selv skulle hopper videre til næste felt til højre?
Det var ihvertifald det jeg gerne vil have den til
Avatar billede michaeljuul Nybegynder
23. marts 2005 - 19:01 #9
Kabbak Jeg mangler et svar
Avatar billede kabbak Professor
23. marts 2005 - 19:04 #10
Skal lige hurtig høre dig om den igår.
Private Sub Worksheet_Change(ByVal Target As Range)
  If Not Intersect(Target, Range("E32:AI43")) Is Nothing Then
If Len(Target) > 1 Then Target = Left(Target, 1)
Target.offset(0,1).select
End If

End Sub
Avatar billede michaeljuul Nybegynder
23. marts 2005 - 19:18 #11
Den hopper ikke viderer :-(
Skal vi forsætte i et nyt spørgsmål?

Så får du også flere point
Avatar billede michaeljuul Nybegynder
23. marts 2005 - 19:24 #12
Kommer på igen mellem kl 21 - 22
Avatar billede kabbak Professor
23. marts 2005 - 19:29 #13
du skal trykke pil eller enter først
Avatar billede michaeljuul Nybegynder
23. marts 2005 - 21:40 #14
Ja det fandt jeg du af. Håbede bare at man kunne få den til det andet.

Du får lige dine point :-)

Tak igen.
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 for alle niveauer og behov – find det kursus, der passer til dig

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