zui > edb.* > edb.regneark

Kurt Hansen (12.09.2018, 06:44)
Jeg har en kolonne, hvor en del felter har gul baggrundsfarve.

Kan jeg lave en sammentælling af disse?
Kenneth Andersen (13.09.2018, 10:06)
Hej. Jeg fandt dette gamle notat. Jeg har ikke tid til at se om det stadig virker, men du kan prøve :-)

Sum af antal celler med en bestemt farve
Jeg har fundet en løsning på et problem jeg har arbejdet med vedr.. summering af celler med en bestemt farve.
Følgende kode kopieres ind i Visual Basic:
Function ColorCount(rRange As Range, rColor As Range) As Double
Dim rCell As Range
Dim dCount As Double
dCount = 0
Application.Volatile
For Each rCell In rRange
If rCell.Interior.ColorIndex = rColor.Interior.ColorIndex Then
dCount = dCount + 1
End If
Next rCell
ColorCount = dCount
End Function

Derefter virker formlen ColorCount(celeområdet der skal tælles; En celle med farven der skal tælles)
Kurt Hansen (14.09.2018, 12:26)
Den 13/09/2018 kl. 10.06 skrev Kenneth Andersen:
[..]
> ColorCount = dCount
> End Function
> Derefter virker formlen ColorCount(celeområdet der skal tælles; En celle med farven der skal tælles)


Tak, Kenneth, men jeg er dum som et brædt til VBA. Den eneste metode jeg
kan finde ud af et starte makrooptageren og straks efter at afbryde den.

Det giver en vindue i VBA med dette indhold:

1. Sub Gule()
2. '
3. ' Gule Macro
4. '
5.
6. '
7. End Sub

Skal jeg slette det hele og indsætte din function, eller skal den fedtes
ind i linje 5 - eller kan du guide til den helt basale metode til at
oprette den?
Jan Kronsell (17.09.2018, 22:35)
Fra wwws.kronsell.net/ExcelEksempler.htm

kan du downloade "Jans udvidelser" og en vejledning til disse.
Udvidelserne installeres tom et tilføjelsesprogram. Her finder du blandt
andre funktionerne CountColor() og SumColor() som henholdsvis tæller og
adderer celler med en bestemt farve.

Jan
Kurt Hansen (18.09.2018, 07:17)
Den 17/09/2018 kl. 22.35 skrev Jan Kronsell:
> Fra wwws.kronsell.net/ExcelEksempler.htm
> kan du downloade "Jans udvidelser" og en vejledning til disse.
> Udvidelserne installeres tom et tilføjelsesprogram. Her finder du blandt
> andre funktionerne CountColor() og SumColor() som henholdsvis tæller og
> adderer celler med en bestemt farve.
> Jan
> ---
> Denne e-mail blev kontrolleret for virusser af Avast antivirussoftware.
>


Jeg kører Excel 2011 på Mac. Jeg kan ikke helt gennemskue hvordan jeg
installerer den, da vejledningen er til PC.
Kurt Hansen (18.09.2018, 08:20)
Den 18/09/2018 kl. 07.17 skrev Kurt Hansen:
> Den 17/09/2018 kl. 22.35 skrev Jan Kronsell:
> Jeg kører Excel 2011 på Mac. Jeg kan ikke helt gennemskue hvordan jeg
> installerer den, da vejledningen er til PC.


Jeg fandt ud af det. Mange tak, Jan :-)
Kurt Hansen (19.09.2018, 13:55)
Den 17/09/2018 kl. 22.35 skrev Jan Kronsell:
> Fra wwws.kronsell.net/ExcelEksempler.htm
> kan du downloade "Jans udvidelser" og en vejledning til disse.
> Udvidelserne installeres tom et tilføjelsesprogram. Her finder du blandt
> andre funktionerne CountColor() og SumColor() som henholdsvis tæller og
> adderer celler med en bestemt farve.


Jo tak og det virkede fint, men jeg slettede "Jans udvidelser6.xlam" i
min downloadmappe og nu virker det ikke mere i det regneark hvor jeg
brugte det det.

Jeg har efterfølgende downloadet "Jans udvidelser6.xlam" til samme
lokation, men det virker stadigvæk ikke. Formlen i mit
sammentællingsfelt lyder
"='500SSD:Users:kh:Downloads:JansUdvidelser6.xlam' !SumColor(G4;G1:G1042)

Hvorfor virker det ikke?

Dertil synes jeg måske nok det er lidt underligt, at den originale
downloadede fil skal kunne findes på den oprindelige lokation. Hvordan
ændrer jeg det? Jeg troede at funktionerne blev "installeret" i Excel.
Jan Kronsell (19.09.2018, 22:38)
On 19-09-2018 13:55, Kurt Hansen wrote:
[..]
> Dertil synes jeg måske nok det er lidt underligt, at den originale
> downloadede fil skal kunne findes på den oprindelige lokation. Hvordan
> ændrer jeg det? Jeg troede at funktionerne blev "installeret" i Excel.


Filen behøver ikke at ligge på den lokation, hvor du downloader den, men
når den først er installeret, må den ikke flyttes. Hver gang du åbner
Excel indlæses tilføjelsesprogrammerne, så det eneste, der er i Excel,
er en sti til placeringen. Hvis denne så ikke passer, så indlæses der
ikke noget. Det gælder såvel de tilføjelsesprogrammer som følger med
Excel, som dem man selv udvikler.

Jan
Kurt Hansen (20.09.2018, 12:55)
Den 18/09/2018 kl. 08.20 skrev Kurt Hansen:
> Den 18/09/2018 kl. 07.17 skrev Kurt Hansen:
> Jeg fandt ud af det. Mange tak, Jan :-)


.... og nu har jeg glemt det igen :-(
Lignende emner