Jak převést komentáře na obsah buněk v aplikaci Excel?
Předpokládám, že mám buňky rozsahu naplněné komentáři v listu, a teď chci převést všechny komentáře na obsah buněk, abych je mohl úhledně a kulatě vytisknout. Existují nějaké dobré způsoby, jak tento úkol vyřešit?
Převeďte komentáře na obsah buňky pomocí funkce definované uživatelem
Převeďte komentáře na obsah buněk pomocí kódu VBA
Převeďte komentáře na obsah buněk pomocí Kutools pro Excel
Převeďte komentáře na obsah buňky pomocí funkce definované uživatelem
Pomocí této metody musíte nejprve vytvořit definovanou funkci a poté použít definovaný vzorec k převodu komentářů na obsah buňky. Můžete to dokončit jako následující kroky:
1.Klikněte Vývojka > Visual Basic, nový Microsoft Visual Basic pro aplikace Zobrazí se okno, klikněte na Vložit > Modula do modulu zadejte následující funkci:
Funkce GetComments (pRng jako rozsah) jako řetězec 'Updateby20140509 Pokud není pRng.Comment nic není, pak GetComments = pRng.Comment.Text End If End Function
2.Stisknout Ctrl + S pro uložení funkce.
3. Potom zadejte následující vzorec „= GetComments (A1)„V jakékoli prázdné buňce, v tomto případě použiji buňku E1. Viz snímek obrazovky:
4. zmáčkni vstoupit klíč. A vyberte buňku E1, pak přetáhněte úchyt výplně přes rozsah buněk, které chcete tento vzorec obsahovat. A všechny komentáře jsou převedeny na obsah buňky. Viz snímek obrazovky:
Převeďte komentáře na obsah buněk pomocí kódu VBA
Pokud znáte kód VBA, následující stručný kód vám také pomůže převést komentáře na obsah buňky.
1. Vyberte rozsah, který chcete převést na obsah buňky;
2, klikněte Vývojka > Visual Basic, nový Microsoft Visual Basic pro aplikace Zobrazí se okno, klikněte na Vložit > Modula do modulu zadejte následující kód:
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. Pak klikněte na tlačítko 
tlačítko pro spuštění kódu. Vyberte rozsah, který chcete převést, a klikněte OKa všechny vybrané komentáře byly převedeny na obsah buněk v příslušných buňkách.
 |
 |
 |
Poznámka: Pokud komentáře nechcete, můžete je smazat.
Převeďte komentáře na obsah buněk pomocí Kutools pro Excel
Kutools pro Excel : s více než 300 praktickými doplňky aplikace Excel, můžete vyzkoušet bez omezení do 30 dnů.Získat nyní .
Projekt Převést komentář a buňku of Kutools pro Excel je užitečný a užitečný nástroj, který vám pomůže vyřešit mnoho problémů s komentáři.
Po instalaci Kutools pro Excel, postupujte následovně:
1. Vyberte rozsah, do kterého chcete importovat komentáře do buněk.
2, klikněte Kutools > Moře > Převést komentář a buňku, viz screenshot:
3. V Převést komentář a buňku dialogové okno vyberte Převeďte komentáře na obsah buněk. Viz snímek obrazovky:
4. Pak klikněte na tlačítko OK. Nyní jsou všechny vybrané komentáře převedeny na obsah buňky v původním rozsahu.
Podrobnější informace o Převést komentář a buňku, prosím navštivte Převést popis funkce komentářů a buněk.
Související články:
- Změňte všechny formáty komentářů v buňkách
- Změnit jméno autora všech komentářů
- Seznam všech komentářů k novému listu nebo sešitu
- Najít a nahradit text v komentářích
- Zobrazit nebo skrýt všechny komentáře a indikátory komentářů v aplikaci Excel
- Převést obsah buňky na komentáře v aplikaci Excel
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
