Avatar billede pawll Nybegynder
01. februar 2008 - 12:35 Der er 1 kommentar og
1 løsning

VBA - Excel

Hej eksperter,

Et simpelt spørgmål, jeg vil meget gerne kunne formattere en hvilken som helst graf, uafhængig af diagrammets navn (eks.
"diagram 40").

Hvordan gør jeg det? Jeg får fejl i nedenstående kode, så snart makroen når til "diagram 40".. Kan jeg declear en variabel i starten, der gammer navnet på selected diagram?

Sheets("Ark3").DrawingObjects("Diagram 40").RoundedCorners = False
Sheets("Ark3").DrawingObjects("Diagram 40").Shadow = False


På forhånd tak for hjælpen :)
Avatar billede pawll Nybegynder
01. februar 2008 - 12:45 #1
flyttet igen igen
Avatar billede bak Forsker
01. februar 2008 - 13:17 #2
hvorfor..dette er det rigtige forum.

her er en løsningsmulighed, der virker på markeret graf.


Sub DoOnActiveChart()
 
  Dim ch As Chart
  Dim cb As ChartObject
 
  Set ch = ActiveChart
  Set cb = Worksheets(ch.Parent.Parent.Name).ChartObjects(ch.Parent.Name)
  With cb
      cb.RoundedCorners = True
      cb.Shadow = True
      cb.Border.Weight = 2
      cb.Border.LineStyle = -1
  End With

End Sub
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