Textmarke oder Anker setzen

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox
Bild

Betrifft: Textmarke oder Anker setzen von: Sirhendrik
Geschrieben am: 07.04.2005 15:21:44

Hallo,

Ich möchte gerne mein Arbeitsblatt als .Html veröffentlichen und mitten auf dem Arbeitsblatt eine Textmarke(=Anker) setzten, die bei der Konvertierung zu html nicht verloren geht.

Ein Artikel im Forumsarchiv rät eine Zelle zu benennen und die dann mit dem Hyperlink anzuspringen. Der Zellname geht aber anscheinend kaputt wenn man das Arbeitsblatt als .html veröffentlicht und das anspringen funktioniert nicht.

Ich generiere die Html per VBA, also VBA-Vorschläge sind am besten.


Danke!

Sirhendrik

hier mein Makro:


Sub AlsWebsiteVeröffentlichen()
'
' Veröff2 Makro
' 
'
'Dateinamen des aktuellen Blatttes zurückgeben UNWICHTIG!
    
    Dim datei, datumxls, datum As String
    Dim pfad As String
    Dim offenedatei As Workbook
    
   pfad = ActiveWorkbook.Path
   MsgBox pfad
   fp = Right(pfad, 3)
    MsgBox fp
    
'HIER GEHT`S LOS:  
    
    With ActiveWorkbook.PublishObjects("FP5 Monatsübersicht_27628")
        .HtmlType = xlHtmlStatic
        .Filename = _
         pfad & "\HTML-Ausgabe\" & fp & " Monatsübersicht.html"
        .Publish (False)
        .AutoRepublish = False
        
    End With
    ChDir (pfad & "\HTML-Ausgabe")
End Sub

Bild


Betrifft: AW: Textmarke oder Anker setzen von: MichaV
Geschrieben am: 11.04.2005 08:29:26

Hi,

mit rechte Maustaste, Hyperlink, Textmarke... kannst Du Textmarken erstellen, die bei der Konvertierung zu html nicht verloren gehen. Jedenfalls bei XL2000

Hoffe, das hilft.

Gruß! Micha


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Textmarke oder Anker setzen"