geht mit Strg + T ...

gelegentlich markiere ich mit der Maus größere zerpflückte
Bereiche, um sie z.B. gleich zu formatieren. Wenn mir nun beim
Markieren ein Fehler unterläuft und eine Zelle mit markiert
wird, die eigentlich nicht vorgesehen war, kriegen ich sie
nicht wieder deaktiviert! Gibt´s dafür eine Lösung? Und
wenn´s sowas wie Strg+Alt+Shift+AltGr+F12+Maus ist,
egal

wenn du das folgende Makro auf Strg+T legst

)

Hi Kristian,
probier mal das folgende Makro aus, gelegentlich funktioniert es einwandfrei aber es gibt auch Fehlermeldungen. Meiner Meinung nach weil Excel beim Markieren mehrfach markiert.
Man denkt man hat zwei Bereiche markiert, aber es können mehr Areas sein.
z.B. Sichtbar markiert ist A1:A3 und B1:B4, aber Areas können dann sein A1:A3 und B1:B4 UND A1 und B2 oder so, dann bricht das addcomment zusammen weil da schon ein comment steht in A1.
Dies müßtest du noch abfangen.
Wenn du in deinen Tabellen Kommentare benutzt klappt das Makro so nicht, du könntest dann aber bei SpecialCells nachschauen ob es da was gibt anstelle von Kommentaren entsprechend der Makrologik.
Gruß
Reinhard


Sub AktiveZelleAusMarkierungEntfernen()
'msgbox selection.areas.count
For Each ar In Selection.Areas
'msgbox ar.address
   For Each ce In ar
   'msgbox ce.address
   If ActiveCell.Address  ce.Address Then ce.AddComment ("geht nicht, gibts nicht")
   Next ce
Next ar
ActiveSheet.Cells.SpecialCells(xlCellTypeComments).Select
Selection.ClearComments
End Sub