Cum să găsiți și să înlocuiți textul în comentarii (note) în Excel?
Funcția Găsiți și înlocuiți din Excel este un instrument puternic pentru actualizarea rapidă a conținutului din celule, dar nu se aplică în mod direct la Note - noul nume pentru comentariile tradiționale înainte de Excel 2019. Mulți utilizatori se întreabă dacă este posibil să se aplice aceeași funcționalitate la text din Excel Notes. Acest ghid vă va arăta cum să găsiți și să înlocuiți în mod eficient textul în Note, extinzându-vă capacitatea de a gestiona și rafina toate aspectele foilor de calcul.
Utilizarea codului VBA pentru a găsi și înlocui textul în comentarii (note)
Un instrument la îndemână pentru a găsi și înlocui textul în comentarii (note) rapid și ușor
Utilizarea codului VBA pentru a găsi și înlocui textul în comentarii (note)
În Excel, puteți utiliza următorul cod VBA pentru a găsi și înlocui textul în toate notele. De exemplu, voi înlocui textul „2011” cu textul „2012” în toate notele din Excel.
1. Clic Dezvoltator >Visual Basic și un nou Microsoft Visual Basic pentru aplicații fereastra va fi afișată, faceți clic pe Insera > Module și apoi introduceți următorul cod VBA în modul:
Cod VBA: Găsiți și înlocuiți textul în toate notele din Excel
Sub ReplaceNotes()
'Updated by Extendoffice 2024/07/25
Dim cell As Range
Dim wks As Worksheet
Dim sFind As String
Dim sReplace As String
Dim sNote As String
' Define the text to find and replace
sFind = "2011"
sReplace = "2012"
' Loop through each worksheet in the active workbook
For Each wks In ActiveWorkbook.Worksheets
For Each cell In wks.Cells
If cell.NoteText <> "" Then
sNote = cell.NoteText
If InStr(sNote, sFind) > 0 Then
sNote = Replace(sNote, sFind, sReplace)
cell.NoteText Text:=sNote, Start:=1, Length:=Len(cell.NoteText)
End If
End If
Next cell
Next wks
End Sub
2. Apoi faceți clic pe butonul pentru a rula codul și toate „2011” din toate notele vor fi înlocuite cu „2012” în întreg registrul de lucru.
Un instrument la îndemână pentru a găsi și înlocui textul în comentarii (note) rapid și ușor
Putem găsi și înlocui rapid text în toate notele cu Kutools pentru Excel'S Găsiți/Înlocuiți textul notei.
Dacă ați instalat Kutools pentru Excel, puteți găsi și înlocui cu ușurință textul în toate notele din Excel.
1. Clic Kutools > Mai Mult > Găsiți/Înlocuiți textul notei. Vedeți captura de ecran:
2. În Găsiți/Înlocuiți textul notei căsuță de dialog:
- (1.) Selectați domeniul de aplicare pe care doriți să îl aplicați pe acest utilitar, pe care îl puteți selecta Foaie activă or Toate foile;
- (2.) Introduceți textul (2011) pe care doriți să îl înlocuiți în Găsiți text în note și introduceți textul specific (2012) pe care doriți să îl utilizați în Înlocui cu cutie.
3. Apoi faceți clic pe Înlocui buton. Tot anul 2011 va fi înlocuit cu 2012 în comentariile din foaia de lucru activă. Vezi capturi de ecran:
Legate de articole:
- Schimbați toate formatele de comentarii din celule
- Schimbați numele autorului tuturor comentariilor
- Enumerați toate comentariile la o nouă foaie de lucru sau registru de lucru
- Afișați sau ascundeți toate comentariile și indicatorii de comentarii în Excel
- Convertiți conținutul celulei în comentarii în Excel
- Convertiți comentariile în conținutul celulei în Excel
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!