Přejít k hlavnímu obsahu

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


šipka modrá pravá bublina 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:

doc-comments-to-cells1

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:

doc-comments-to-cells2


šipka modrá pravá bublina 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  doc-multiplikovat-výpočet-3 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.


doc-comments-to-cells3 -2 doc-comments-to-cells4

Poznámka: Pokud komentáře nechcete, můžete je smazat.


šipka modrá pravá bublina 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:

doc-comments-to-cells-5

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:

doc-comments-to-cells-6

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:

Nejlepší nástroje pro produktivitu v kanceláři

Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více

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...

karta kte 201905


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!
Comments (24)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi, The first function in a module does the job only once: when I write or drag the formula down. If I go back to change any of the comment it does not update the destination cell with the new comment. For example let's say I have a comment in A1, then when I place the formula in cell B1, it will show me the A1's comment only the first time. If I go back and change the A1 comment, the cell B1 does not get updated. I tried "Calculate Now" or F9 and nothing happens. I saved the file and opened again and nothing, cell B1 stays with the old comment. It is like the function is dead. Now, if I enter or change anything in the cell A1 itself (not the comment), like adding an space in the end, it will immediately update the comment. I'm using Office 2019 Pro.
This comment was minimized by the moderator on the site
thanks very musch
This comment was minimized by the moderator on the site
great site
This comment was minimized by the moderator on the site
is there a way to do this without the title of a comment or the non bold writing?
This comment was minimized by the moderator on the site
Great tip, thanks for sharing!
This comment was minimized by the moderator on the site
Perfect! Thank You
This comment was minimized by the moderator on the site
You are a star!!! thanks
This comment was minimized by the moderator on the site
It does not automatically update when I change the comment. How do I change this? Thanks
This comment was minimized by the moderator on the site
Same problem here. Changing the comment does not trigger the calculations. Forcing the calculation (F9) does not work. Saving and load the file does not work. However, changing a cell content will trigger the calculations.
This comment was minimized by the moderator on the site
You are my HERO!!!!!!!!!!!!!!!!!!!!!! Thank You Thank You Thank You
This comment was minimized by the moderator on the site
Hi. I tried this code and it worked right. But I have a little problem: can I use this code combined with VLOOKUP? I tried but I didn't get anything. If you can help me, I'll be thankful. I'm brazilian. If I wrote something wrong, I apologise. Thanks!
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations