Problem mit Speichern als Webseite
10.05.2007 14:34:00
Düppi
ein Problem habe ich mit der Speicherung einer Datei im html-Format: Unten stehender Code erstellt mir ein html-Dokument. So weit, so gut. Was nervt, ist die Anlage eines Ordners Red_GT_Montag-Dateien mit den Inhalten filelist.xml und Planung_Red_GT_16266_image001.emz.
In meiner xls-Datei "Planung_Red_GT" benutze ich Formeln, bedingte Formatierungen und aus VBA gesteuerte Formatierungen. Mag's daran liegen? Mich nervt dieser Ordner, er soll weg - aber wie, fragt Düppi und bittet um Hilfe.
Sub online()
Range("A1:AA35").Select
With ActiveWorkbook.PublishObjects.Add(xlSourceRange, _
"N:\Blattplanung\EDITIONS\Redaktionen\GT\Red_GT_Montag.htm", "Montag", _
"$A$1:$AA$35", xlHtmlStatic, "Planung_Red_GT_16266", "")
.Publish (True)
.AutoRepublish = False
End With
Range("B36").Select
End Sub
Anzeige