Dynamisk overskrift i diagram

Jeg ville lave det med denne linie istedet

ActiveChart.ChartTitle.Text = Sheets("sheet1").Range("c2").Value

Stor hilsen
Christian Kjær

Det er nedenstående kode jeg ikke kan få til at virke. Nogle gode ideer?

Sub Tilret_diagramtekst()

    ActiveChart.ChartTitle.Select
    Selection.Characters.Text = ActiveSheet.Range("$a$113").Value
    Selection.AutoScaleFont = False
    With Selection.Characters(Start:=1, Length:=ActiveSheet.Range("$a$115").Value).Font
        .Name = "Arial"
        .FontStyle = "Fed"
        .Size = 10
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
        .OutlineFont = False
        .Shadow = False
        .Underline = xlUnderlineStyleNone
        .ColorIndex = xlAutomatic
    End With
End Sub

Prøv dette

Sub Tilret_diagramtekst()

    ActiveChart.ChartTitle.Select
    ActiveChart.ChartTitle.Text = ActiveSheet.Range("$a$113").Value
    Selection.AutoScaleFont = False
    With Selection.Characters(Start:=1, Length:=ActiveSheet.Range("$a$115").Value).Font
        .Name = "Arial"
        .FontStyle = "Fed"
        .Size = 10
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
        .OutlineFont = False
        .Shadow = False
        .Underline = xlUnderlineStyleNone
        .ColorIndex = xlAutomatic
    End With
End Sub

/Christian

Hej Christian,

Det er da for fedt det der! :D

1000 tak!

Jeg er så småt begyndt at prøve at rode med VBA. Nogle gode fifs/hjemmesider til hvor dan man hurtigt blever bedre?

Hej

Jo der er massere af sider derude, hvor man kan lære en masse om VBA programmering. Jeg skal naturligvis anbefale et kursus, da det er det jeg sidder med til dagligt :-) Men hvis du vil lave selvstudie så kan jeg da anbefale dig at købe en god begynder bog om VBA. Der kan jeg anbefale

http://www.saxo.com/dk/item/sharon-podlin-excel-2007-programmering-med-vba-haeftet.aspx

den er rigtigt god at starte ud med.

Ellers så prøv at søge på Google efter Excel VBA og forums, så vil de dukke op.

Stor hilsen
Christian Kjær