Problem mit PDF per VBA erstellen

Bild

Betrifft: Problem mit PDF per VBA erstellen
von: Michael
Geschrieben am: 05.08.2015 18:04:48

Hallo,
warum meldet mir vba bei dem Code:
Set Kommentar = Worksheets("Tabelle1").Cells(4, Spalte).AddComment
eine "Anwendungs- oder objektdefinierter Fehler" - Meldung?
Der komplette Code:

Sub Markiere_KW(iKW As Integer, iJahr As Integer, Bezeichnung As String)
  Dim Kommentar As Variant
  Dim Spalte, SpalteMax As Long
  Dim KWgegeben, KWgesucht As Integer
  If iKW > 0 And iJahr > 0 And iJahr = 2014 Then
   'markiere im Bereich "2014"
      
    SpalteMax = Worksheets("Tabelle1").Cells(3, 56).Column
    KWgegeben = iKW
    For Spalte = 5 To SpalteMax
         KWgesucht = Worksheets("Tabelle1").Cells(3, Spalte)
            If KWgegeben = KWgesucht Then
                Worksheets("Tabelle1").Cells(4, Spalte).Interior.ColorIndex = 5
                Set Kommentar = Worksheets("Tabelle1").Cells(4, Spalte).AddComment
                  Kommentar.Visible = True
                  Kommentar.Text Text:=Bezeichnung
                  Kommentar.Shape.LockAspectRatio = msoTrue
                  Kommentar.Shape.Height = 15
                  Kommentar.Shape.Width = 25
                  Kommentar.Shape.IncrementTop 6.75
                  Kommentar.Shape.Fill.ForeColor.SchemeColor = 5
                  Exit For
            End If
    Next Spalte
    
    End If
End Sub

Bild

Betrifft: AW: Problem mit PDF per VBA erstellen
von: Daniel
Geschrieben am: 05.08.2015 18:11:02
Hi
wahrscheinlich, weil die Zelle schon einen Kommentar hat.
kannst du nicht noch einen zweiten Kommentar hinzufügen, sondern du musst entweder den bestehenden Kommentar löschen oder diesen bearbeiten.
Gruß Daniel

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Problem mit PDF per VBA erstellen"