Erstellen ein Diagramm in Excel mit VBA/makro

Ich ein makro erstellt in Excel für die Erstellung von Balkendiagrammen automatisch.
Immer wenn ich es starten, es gibt "smr run time error" und ich bin nicht in der Lage, um herauszufinden, was ist Los mit meinem code.

Sub CreateGraph()
'
' CreateGraph Macro
''Initialize variables
Dim lastRow As Integer
Dim xlsPath As String
Dim xlsFile As String
xlsPath = "H:\"
xlsFile = "text.xls"
Workbooks.Open Filename:=xlsPath & xlsFile

    ActiveWindow.SmallScroll Down:=-81
    Range("A1:B" & lastRow).Select
    ActiveSheet.Shapes.AddChart.Select
    ActiveChart.SetSourceData Source:=Range("'TEST'!$A$1:$B" & lastRow)
    ActiveChart.ChartType = xlBarClustered
    ActiveChart.Axes(xlCategory).Select
    ActiveSheet.ChartObjects("Chart 2").Activate
    ActiveChart.Axes(xlCategory).ReversePlotOrder = True
    Range("Q111").Select
    ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub

Kann mir jemand helfen bei der Lösung dieses Rätsels bitte.
Auch für die Ausführung aller Makros automatisch von SAS, die ich immer ändern Sie die Excel-Optionen für "alle Makros aktivieren", welche ich nehme an das ist nicht gut. Ich habe Leute gesehen, die das erstellen und ausführen von Makros ohne dies zu tun. Können Sie mir bitte sagen, wie kann ich die Makros mit der Aktivierung der option " alle Makros in Excel.

  • Nun, ich kann sehen, die Sie jetzt angenommen ein paar mehr Antworten, so bin ich froh, dass ich dazu beitragen könnte, als eine Erinnerung. Was ist mit meinen anderen Fragen oben? Wenn Sie nicht ansprechen, dann ist es fast unmöglich, Ihnen zu helfen.
  • Es ist nicht klar aus der Frage, aber diese, über das schreiben in eine Excel-Arbeitsmappe in Access VBA. Ich denke, "Access-vba" sollte Hinzugefügt werden, als ein Tag, aber ich bin nur noch 79% von dem Weg, um mit dem "neues Tag zuzuordnen-post" - Privileg. Ich wäre dankbar, wenn einer seriösen Besucher Hinzugefügt tag für mich. Danke.
InformationsquelleAutor Nupur | 2011-12-01
Schreibe einen Kommentar