MS Excel

Téma: komentár = bunka

Zaslal/a Luboss8 18.5.2011 20:07

Chcel by som Vás poprosiť, či by ste mi neporadili, ako to urobiť, aby sa mi obsah bunky zobrazoval v komentári.

nio313(18.5.2011 20:27)#005008

Sub VlozTextDoKomentare()
Dim cell As Range
On Error Resume Next
Selection.ClearComments
On Error GoTo 0
For Each cell In Intersect(Selection, ActiveSheet.UsedRange)
If cell.Formula <> "" Then
cell.AddComment
cell.Comment.Visible = False
On Error Resume Next
cell.Comment.Text Text:=cell.FormulaLocal
On Error GoTo 0
End If
Next cell
End Sub

Toto som nasiel neskusal skus mozno pomozecitovat

nio313(18.5.2011 20:36)#005009

Otestovane funfuje

citovat

Luboss8(18.5.2011 20:46)#005010

Vďaka nio313.citovat

Luboss8(18.5.2011 21:01)#005011

Keby som ešte mohol poprosiť. Pre jeden stĺpec...

citovat

Luboss8(18.5.2011 22:02)#005012

OK. Funguje. Ešte raz ďakujem.citovat

Uživatelské menu

Nejste přihlášen(a)

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.