Cum se convertesc comentariile în conținutul celulei în Excel?
Presupunând că am o gamă de celule umplute cu comentarii într-o foaie de lucru, iar acum vreau să convertesc toate comentariile în conținutul celulei, astfel încât să le pot imprima ordonat și rotund. Există modalități bune de a rezolva această sarcină?
Convertiți comentariile în conținutul celulei cu funcția Definită de utilizator
Convertiți comentariile în conținutul celulei cu cod VBA
Convertiți comentariile în conținutul celulei cu Kutools pentru Excel
Convertiți comentariile în conținutul celulei cu funcția Definită de utilizator
Utilizând această metodă, trebuie mai întâi să creați o funcție definită și apoi să aplicați formula definită pentru a converti comentariile în conținutul celulei. Puteți să-l finalizați după cum urmează pașii:
1.Clic Dezvoltator > Visual Basic, un nou Microsoft Visual Basic pentru aplicații fereastra va fi afișată, faceți clic pe Insera > Moduleși introduceți următoarea funcție în modul:
Function GetComments(pRng As Range) As String
'Updateby20140509
If Not pRng.Comment Is Nothing Then
GetComments = pRng.Comment.Text
End If
End Function
2.Anunturi Ctrl + S pentru a salva funcția.
3.Apoi introduceți următoarea formulă „= GetComments (A1)”În orice celulă goală, în acest caz, voi folosi celula E1. Vedeți captura de ecran:
4. apasă pe Intrați cheie. Și selectați celula E1, apoi trageți mânerul de umplere peste gama de celule pe care doriți să conțineți această formulă. Și toate comentariile sunt convertite în conținut de celulă. Vedeți captura de ecran:
Convertiți comentariile în conținutul celulei cu cod VBA
Dacă cunoașteți codul VBA, următorul cod scurt vă poate ajuta, de asemenea, să convertiți comentariile în conținutul celulei.
1. Selectați intervalul pe care doriți să îl convertiți în conținutul celulei;
2. Clic Dezvoltator > Visual Basic, un nou Microsoft Visual Basic pentru aplicații fereastra va fi afișată, faceți clic pe Insera > Moduleși introduceți următorul cod în modul:
Sub CommentToCell()
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
Rng.Value = Rng.NoteText
Next
End Sub
3. Apoi apasa pentru a rula codul. Și selectați un interval pe care doriți să îl convertiți, apoi faceți clic OKși toate comentariile selectate au fost convertite în conținutul celulei din celulele sale relevante.
notițe: Dacă nu doriți comentariile, le puteți șterge.
Convertiți comentariile în conținutul celulei cu Kutools pentru Excel
Kutools pentru Excel : cu mai mult de 300 de programe de completare Excel la îndemână, încercați fără limitări în 30 de zile.Ia-l acum .
Convertiți comentariul și celula of Kutools pentru Excel este un instrument la îndemână și util vă poate ajuta să rezolvați multe probleme legate de comentarii.
După instalare Kutools pentru Excel, vă rugăm să faceți următoarele:
1. Selectați intervalul pe care doriți să importați comentariile în celule.
2. Clic Kutools > Mai Mult > Convertiți comentariul și celulă.
3. În Convertiți comentariul și celula fereastră de dialog, selectați Convertiți comentariile în conținutul celulelor. Vedeți captura de ecran:
4. Apoi apasa OK. Acum, toate comentariile selectate sunt convertite în conținutul celulei în intervalul său original.
Pentru informații mai detaliate despre Convertiți comentariul și celula, Vă rugăm să vizitați Conversia comentariului și descrierea funcției celulei.
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
- Găsiți și înlocuiți textul din comentarii
- Afișați sau ascundeți toate comentariile și indicatorii de comentarii în Excel
- Convertiți conținutul celulei în comentarii î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!