• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Opmerkingen bij cel alleen streep van kolom zichtbaar

Status
Niet open voor verdere reacties.

Huiken

Nieuwe gebruiker
Lid geworden
8 dec 2017
Berichten
1
Hallo! Wij zijn nieuw op dit forum vanwege de volgende vraag. Wij zijn een wijkontmoetingscentrum en hopen dat iemand ons kan helpen.

Wij beheren een agenda in Excel waarbij we vaak opmerkingen zetten bij de groepen die gebruik maken van onze zalen. Helaas zijn deze opmerkingen opeens niet meer zichtbaar.
We hebben de markeringen bij "weergeven opmerkingen" in het menu al uitgeprobeerd maar dit werkt niet. Ook een Excel hulplijn wist ons niet meer te vertellen dan we zelf al hebben ontdekt.
Wat we hebben ontdekt is dat de opmerkingen nog steeds aangegeven staan met een rood driehoekje. Als we met de muis op de cel komen, verschijnt de pop-up van de opmerking door een klein pijltje wat schuin omhoog gaat en daarna volgt een lijn in de breedte van de tekstkolom. De omschrijving binnen in de kolom is echter niet zichtbaar. "Opmerking bewerken" of "opmerkingen altijd laten zien" werkt ook niet.

Het bijzondere is dat wanneer we de cel kopiëren, plakken en vervolgens op "opmerking bewerken" klikken, dat dan hetzelfde korte pijltje met daaraan dezelfde lijn verschijnt, echter met vierkantjes eromheen zodat we de kolom open kunnen trekken en de opmerking erin zichtbaar wordt! Als we daarna opslaan, blijft de opmerking zichtbaar. Echter omdat we heel erg veel opmerkingen hebben, zou één handeling om alle opmerkingen zichtbaar te maken veel fijner zijn. We moeten iets gedaan hebben waardoor dit gebeurd is en hopen dat dit terug gedraaid kan worden! Helaas hebben we geen backup van voordat dit gebeurde maar het is een goede leerschool, dus nu steeds een backup!

Alvast vriendelijk dank voor jullie reacties!
 
En wat let jullie om het bestand te plaatsen? 1 bestand is overigens voldoende niet dat de hele club bestanden gaat plaatsen. Vertrouwelijke gegevens wel even vervangen door dummy gegevens.
 
Draai onderstaande code eens.
Het gaat elke opmerking bij langs en haalt de tekst op in c00 en het adres in C02.
Daarna wordt de opmerking verwijderd en plaatst een nieuwe terug op dezelfde plaats met de tekst van c00 in standaard grootte.

Code:
Sub hsv()
Dim cmt As Comment, c00 As String, c02 As String
For Each cmt In activesheet.Comments
  With cmt
     c00 = .Text
     c02 = .Parent.Address
    .Delete
   Range(c02).AddComment c00
  End With
 Next cmt
End Sub
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan