ein Problem stellt sich mir in den Weg:
ich möchte zwei Zellen allein als HTML-Dokument speichern und habe das mit dem Makrorekorder aufgenommen (siehe Makro unten).
Leider steht darin der Dateiname, es sollte aber ein allgemeingültiges Makro sein, unabhängig vom Dateinamen.
Ein Diagramm zu einer solchen Datei wurde beispielsweise so aufgerufen:
Dim oBlatt As Worksheet
Set oBlatt = ActiveSheet
Charts.Add
ActiveChart.ApplyCustomType ChartType:=xlBuiltIn, TypeName:= _
"Linien auf zwei Achsen"
ActiveChart.SetSourceData Source:=oBlatt.Range("A2:M145"), PlotBy:= _
xlColumns
Hierbei hat das Arbeitsblatt eine Variable erhalten, somit ist es egal wie die aufgerufene Datei lautet.
Lässt sich das auch auf das unten stehende Makro anwenden???
Das Wörtchen "Dateiname" darf dann nicht mehr auftauchen.
Vielen Dank für eure Hilfe.
Gruß,
Bernhard
With ActiveWorkbook.PublishObjects.Add(xlSourceRange, _
"C:\Eigene Dateien\Seite1.htm", "Dateiname ", "$K$148:$L$148", xlHtmlStatic, _
"1712_5180", "")
.Publish (True)
.AutoRepublish = False
End With