.ClearComments gibt es das ?

Computer: Software & Programmierung Office Software
1

Hallo Leute

Suche wieder mal eine Vereinfachung

Worksheets(Sheet1).Range(„rng“) = ClearComments

funktioniert leider nicht. Würde das gerne auf eine Zeile schreiben
und nicht mit .Selection.

Gruss

2

Worksheets(„Sheet1“).Range(„rng“).ClearComments

Beachte die Anführungszeichen. Range(„rng“) bedeutet, daß Dein Befehl sich auf einen Range mit dem Namen „rng“ bezieht.

3

Worksheets(„Sheet1“).Range(„rng“).ClearComments

Beachte die Anführungszeichen. Range(„rng“) bedeutet, daß Dein
Befehl sich auf einen Range mit dem Namen „rng“ bezieht.

Da bekomme ich die Meldung Object doesn’t Support this proberty or method.

Das wäre der vollstänige Code

Sub tt()
Worksheets(Sheet1).Range(„rng1“) = Clear
Worksheets(Sheet1).Range(„rng“).ClearContents
Worksheets(Sheet1).Range(„rng“).ClearComment

end sub()

4

Da bekomme ich die Meldung Object doesn’t Support this
proberty or method.

Sub tt()
Worksheets(Sheet1).Range(„rng1“) = Clear
Worksheets(Sheet1).Range(„rng“).ClearContents
Worksheets(Sheet1).Range(„rng“).ClearComment
end sub()

Hallo Flexo,

Worksheets(„Sheet1“).Range(„rng1“).Clear
Worksheets(„Sheet1“).Range(„rng“).ClearContents
Worksheets(„Sheet1“).Range(„rng“).ClearComment

Gruß
Reinhard