ich habe ein langes Makro, in dem ich auch Kommentarfelder schreiben lasse. Diese sollen nun auch in der Größe angepasst werden. Dazu habe ich im Archiv eine Lösung gefunden. Makro schreiben und formatieren in ein Modul mit "Option Explicit" aufnehmen. Sieht so aus:
Option Explicit
_____________________
Sub MyComment()
Dim myCom As Comment
Set myCom = Range("A1").AddComment
With myCom
.Text Text:="Testtext blablabla"
.Shape.LockAspectRatio = msoFalse
.Shape.Height = 80
.Shape.Width = 180
End With
Set myCom = Range("A2").AddComment
With myCom
.Text Text:="Testtext holdrio"
.Shape.LockAspectRatio = msoFalse
.Shape.Height = 80
.Shape.Width = 180
End With
End Sub
Mein Problem ist nun folgendes:Wie kann ich diese Prozedur in mein bestehendes Makro mit aufnehmen? Diese Formatierung soll durch das angestoßenen Makro mit bearbeitet werden.
- Wenn ich dies "Option Explicit" mit in mein Modul einkopiere klappt das nicht
Hat jemand einen Hinweis wie ich mein Makro zusammen mit diesem "Option Explicit" ablaufen lassen kann? Ich bin für jeden Hinweis dankbar.
Gruß Manasse