Avatar billede jangravgaard Nybegynder
07. januar 2003 - 13:10 Der er 14 kommentarer og
1 løsning

property

Hej

Jeg ville høre om der er en property/funktion i excel/vb som kan fortælle mig, hvor mange celler der er udfyldt i en bestemt kolonne.

Noget i stil med :

Worksheets("Ark2").Cells(I, 3).ActiveCell

mvh Jan
07. januar 2003 - 13:19 #1
=Tæl()
Avatar billede jangravgaard Nybegynder
07. januar 2003 - 13:21 #2
kan du give et eksempel ?
har nemlig prøvet funktionen uden det store held
07. januar 2003 - 13:23 #3
=Tæl() tæller kun hvor mange tal, der er indtastet.

Hvis der også skal tælles andet end tal skal du bruge =TÆL.HVIS()
F.eks. =TÆL.HVIS(A1:A100;"<>"""
07. januar 2003 - 13:24 #4
Hvis du vil tælle hvor mange tal der er indtastet i område A1 til A100 indtaster du =TÆL(A1:A100)

Men som tidligere skrevet tæller denne kun talværdier, skal andet indhold også tælles, skal du bruge =TÆL.HVIS()-funktionen, som vist ovenfor.
Avatar billede jangravgaard Nybegynder
07. januar 2003 - 13:28 #5
jeg skal vide hvor mange felter der er udfyldt i en kolonne, da den for-løkke skal afvikles så længe der er udfyldte felter i kolonnen
07. januar 2003 - 13:35 #6
..og dit spørgsmål lød:

Jeg ville høre om der er en property/funktion i excel/vb som kan fortælle mig, hvor mange celler der er udfyldt i en bestemt kolonne.
Avatar billede jangravgaard Nybegynder
07. januar 2003 - 13:37 #7
ja og ??
synes du du er blevet vildledt ?
Avatar billede jangravgaard Nybegynder
07. januar 2003 - 13:48 #8
jeg havde tænkt mig noget i denne stil:

Sub CycleThrough()
    Dim antal, I As Integer
   
    antal = countCellsNotEmpty()
   
    For I = 1 To antal
        "for hver celle - udfør handling"
    Next I
End Sub
Avatar billede janvogt Praktikant
07. januar 2003 - 13:59 #9
Funktionen hedder COUNTA(range)
På dansk hedder den vist TÆLV
Avatar billede janvogt Praktikant
07. januar 2003 - 14:00 #10
Den tæller alle celler som ikke er tomme.
Avatar billede bak Forsker
07. januar 2003 - 14:11 #11
Rigtigt som Jan skriver. Skal den bruges i VBA så skriv

Antal=Application.Worksheetfunction.CountA(Range("C1:C1000"))
Avatar billede jkrons Professor
07. januar 2003 - 14:11 #12
Her er lidt kode, der tæller antallet af celler, der ikke er tomme i a-kolonnen:

Sub IkkeTomme()
Worksheets("ark1").Range("a:a").Name = "Minyrange"
    antal = Application.CountA(Worksheets("ark1").Range("myrange"))
Debug.Print antal
End Sub
Avatar billede jangravgaard Nybegynder
07. januar 2003 - 14:42 #13
det duer jo bare......takker og bukker
Avatar billede bak Forsker
07. januar 2003 - 14:43 #14
Et par andre ideer:
Denne giver antallet indtil første tomme celle
Antal = Range("A1").End(xlDown).Row

Denne giver antallet (rækkenummeret) på nederste udfyldte celle i kolonnen, dvs at der tillades tomme celle ind imellem data
Antal= Range("A65536").End(xlUp).Row
Avatar billede jkrons Professor
07. januar 2003 - 15:25 #15
Velbekomme! Tak for point.
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