---
title: "Formatera graf i Excel"
type: "forum-thread"
url: "https://www.webforum.nu/amne/kontorsprogram/119939-formatera-graf-i-excel"
topic: "Kontorsprogram"
topic_url: "https://www.webforum.nu/amne/kontorsprogram"
author: "juventus1"
published: "2005-01-12T08:47:09.000Z"
updated: "2005-01-22T10:00:09.000Z"
replies: 2
views: 289
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/kontorsprogram/119939-formatera-graf-i-excel"
---

# Formatera graf i Excel

## #1 — juventus1, 2005-01-12T08:47Z

Hej

Jag ett problem med att formatera kurvorna i en graf. Grafen måste vara tydlig även i svart-vitt. Därför tänkte jag markera de olika kurvorna med \*, + och några andra tecken. Problemet är att man inte kan välja hur ofta dessa tecknen skall plottas, utan de ritas för varje värde. Det gör att linjerna bara blir fula och otydliga och man ser inte skillnad på dem. Det skulle räcka om tecknen ritades var 50:e eller var 100:e värde. Hur kan man lösa det? Eller finns det någon annat bra sätt göra skillnad på kurvor som fungerar i svart-vitt?

/André

edit: Ändrade lite dåliga formuleringar

Permalänk: https://www.webforum.nu/p/119939

## #2 — Lindi, 2005-01-21T20:39Z

Kollade snabbt på det men hittade inget bra sätt. Men ett lite halvjobbigt sätt finns det att uppnå det du vill. Man kan nämligen formatera datapunkterna. Klicka på punkten en gång och sen en gång till så kan du välja formatera datapunkt och då sätta ingen färg på den så den inte syns. Fungerar men är bökigt. Kanske finns något bättre.

Permalänk: https://www.webforum.nu/p/1534272

## #3 — juventus1, 2005-01-22T10:00Z

Det stämmer att det inte finns något bra sätt att göra det på. Jag fick hjälp (<http://www.pellesoft.se/communicate/forum/view.aspx?msgid=166364&forumid=50&sum=0>) ett macro som formaterar grafen:

```
Public Sub EveryNth()
    Dim serie As Series
    Dim i As Long, n As Long
    
    
    n = 5
    ActiveSheet.ChartObjects("Chart 1").Activate
    With ActiveChart
        For Each serie In .SeriesCollection
            For i = 1 To UBound(serie.XValues) Step n
                serie.Points(i).MarkerStyle = xlMarkerStyleAutomatic
            Next
        Next
    End With
End Sub
```

Permalänk: https://www.webforum.nu/p/1534437

---

Tråden på webben: https://www.webforum.nu/amne/kontorsprogram/119939-formatera-graf-i-excel