Avatar billede Klaus123 Mester
13. november 2018 - 11:50 Der er 1 kommentar og
2 løsninger

Funktion til at tælle summen i synlige cellser

Hej

Jeg kan ikke finde ud af, hvorfor følgende giver resultatet Navn?

=SumVisible(H89:LE89)

Koden ligger i denne projektmappe
---------------------------------------------VBA--------------------------
Function SumVisible(WorkRng As Range) As Double

Dim rng As Range
Dim total As Double
For Each rng In WorkRng
    If rng.Rows.Hidden = False And rng.Columns.Hidden = False Then
        total = total + rng.Value
    End If
Next
SumVisible = total
End Function
Avatar billede xl-Enthusiast Ekspert
13. november 2018 - 13:01 #1
Den virker fint for mig.
13. november 2018 - 13:08 #2
har du navngivet dit modul, fil eller andet "SumVisible"?
Det skal man undgå.
Avatar billede Klaus123 Mester
13. november 2018 - 14:52 #3
Jeg har lagt koden over i et modul i stedet og så virker det.
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

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