Hogyan lehet konvertálni a megjegyzéseket cellatartalomra az Excelben?

Ha egy munkalapon megjegyzésekkel töltött tartományok vannak, akkor most meg akarom alakítani az összes megjegyzést cellatartalommá, hogy szépen és körösen kinyomtathassam őket. Vannak jó módszerek a feladat megoldására?

Konvertálja a megjegyzéseket cellatartalommá a Felhasználó által definiált funkcióval

Konvertálja a megjegyzéseket cellatartalommá VBA kóddal

Konvertálja a megjegyzéseket cellatartalommá a Kutools for Excel segítségével

Konvertálja a megjegyzéseket cellatartalommá a Felhasználó által definiált funkcióval

Ennek a módszernek a használatával először létre kell hoznia egy meghatározott függvényt, majd a megadott képletet kell alkalmaznia a megjegyzések cellatartalmúvá konvertálásához. A következő lépésekkel fejezheti be:

1.Kattints Fejlesztő > Visual Basic, egy új Microsoft Visual Basic alkalmazásokhoz ablak jelenik meg, kattintson a gombra betétlap > Modulok, és írja be a következő funkciót a modulba:

Funkció GetComments (pRng As Range) karakterláncként "Updateby20140509 Ha nem, akkor a pRng.Comment semmi, akkor a GetComments = pRng.Comment.Text vége, ha End funkció

2.nyomja meg Ctrl + S a funkció mentéséhez.

3. Ezután írja be a következő képletet:= GetComments (A1)Bármely üres cellában ebben az esetben az E1 cellát fogom használni. Lásd a képernyőképet:

4. megnyomni a belép kulcs. Válassza ki az E1 cellát, majd húzza a kitöltő fogantyút azon cellák tartományára, amelyekben ezt a képletet kívánja tartalmazni. És az összes megjegyzés cellatartalommá alakul. Lásd a képernyőképet:

 Konvertálja a megjegyzéseket cellatartalommá VBA kóddal

Ha ismeri a VBA kódot, a következő rövid kód is segíthet a megjegyzések cellatartalommá alakításában.

1. Válassza ki azt a tartományt, amelyet cellatartalommá kíván konvertálni;

2. Kattints Fejlesztő > Visual Basic, egy új Microsoft Visual Basic alkalmazásokhoz ablak jelenik meg, kattintson a gombra betétlap > Modulok, és írja be a következő kódot a modulba:

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. Ezután kattintson   gombot a kód futtatásához. Válassza ki az átalakítandó tartományt, majd kattintson OK, és az összes kijelölt megjegyzés a megfelelő cellák cellatartalmává lett konvertálva.

Megjegyzések: Ha nem akarod a megjegyzéseket, törölheted őket.

Konvertálja a megjegyzéseket cellatartalommá a Kutools for Excel segítségével

Kutools az Excel számára : több mint 300 praktikus Excel-bővítménnyel, ingyenesen, korlátozás nélkül, 30 nap alatt kipróbálható.Szerezd meg most .

A Megjegyzés és cella konvertálása of Kutools az Excel számára egy praktikus és hasznos eszköz segíthet a megjegyzésekkel kapcsolatos számos probléma megoldásában.

Telepítése után Kutools az Excel számára, kérjük, tegye a következőket:

1. Válassza ki azt a tartományt, amelybe a megjegyzéseket a cellákba kívánja importálni.

2. Kattints Kutools > Több > Konvertálja a megjegyzést és a cellát.

3. Az Megjegyzés és cella konvertálása párbeszédpanelen válassza ki Konvertálja a megjegyzéseket cellák tartalmává. Lásd a képernyőképet:

4. Ezután kattintson OK. Most az összes kiválasztott megjegyzést az eredeti tartomány cellatartalmává konvertálja.

Részletesebb információk a Megjegyzés és cella konvertálása, Kérjük, látogasson el a Konvertálja a Megjegyzés és a Cell szolgáltatásleírást.

Kapcsolódó cikkek:

• Az összes megjegyzésformátum módosítása a cellákban
• Az összes megjegyzés szerzőnevének módosítása
• Sorolja fel az összes megjegyzést egy új munkalapra vagy munkafüzetre
• Keresse meg és cserélje le a szöveget a megjegyzések között
• Az összes megjegyzés és megjegyzésmutató megjelenítése vagy elrejtése az Excelben
• A cellatartalmat konvertálhatja megjegyzésekké az Excelben