Citat:
Ursprungligen postat av
Beaver14
Anteckning?
Granska>Anteckningar
Tryck Alt + F11 för att öppna VBA-editorn.
Gå till "Infoga" > "Modul" för att skapa en ny VBA-modul.
Kopiera och klistra in följande VBA-kod i modulen:
Kod:
Sub InfogaAnteckningIMarkering()
Dim cell As Range
Dim anteckningText As String
anteckningText = InputBox("Ange texten för anteckningen:", "Infoga Anteckning")
If anteckningText <> "" Then
For Each cell In Selection
cell.ClearComments ' Tar bort befintliga kommentarer
cell.AddComment Text:=anteckningText
Next cell
End If
End Sub
Markera de celler du vill skapa anteckning för.
Gå tillbaka till VBA-modulen och Tryck F5 för att köra skriptet. En dialogruta kommer att dyka upp där du kan skriva in texten för din anteckning. Kör skriptet.