Moi, osaisko joku antaa ohjetta/kaavaa/makroa millä saisi esim A5 soluun kirjoitetun kommentin tekstin siirrettyä tekstinä soluun A6? Tämänhän voisi tehdä käsin kopioimalla kommentin tekstin ja liittämällä sen soluun, mutta näitä kommentteja olisi siirrettävänä tällä kertaa suhteellisen paljon..
Excelin solukommentti tekstinä soluun
peruskäyttäjä
7
390
Vastaukset
- alkusiinä
Alla olevasta voi lähteä muokkaamaan mieleistänsä makroa. Tuo siis siirtää valituissa soluissa olevat tekstit niiden samojen solujen kommenteiksi. Jos vaikka haluaa sitten esimerkiksi vieressä oikealla olevaan soluun, niin muuttaa Selection.Cells(i, j).AddCom.... kohdan muotoon Selection.Cells(i,j 1).AddCom.....
Sub kommentiksi()
For i = 1 To Selection.Rows.Count
For j = 1 To Selection.Columns.Count
If Len(Selection.Cells(i, j).Text) > 0 Then
Selection.Cells(i, j).AddComment (Selection.Cells(i, j).Text)
End If
Next
Next
End Sub- alkusiinä
Heh, kysymys olikin toisin päin. Unohda tuo.
- alkusiinä
alkusiinä kirjoitti:
Heh, kysymys olikin toisin päin. Unohda tuo.
Tämä makro laittaa kommenttisolun sisällön sen oikealla puolella olevan solun arvoksi.
Sub kommentista()
For i = 1 To Selection.Rows.Count
For j = 1 To Selection.Columns.Count
If Not Selection.Cells(i, j).Comment Is Nothing Then
Selection.Cells(i, j 1).Value = Selection.Cells(i, j).Comment.Text
End If
Next
Next
End Sub
- dfdsfdfsfdsfsfss
no voi jumal... eikö se vaan olekin helpompi kirjoittaa se kommentti SIIHEN SOLUUN?????????
- Tämmöinen
Function Kommentti(r As Range) As String
Dim k As String
On Error Resume Next
k = ""
k = r.Comment.Text
Kommentti = k
End Function - ORCL
moduuliin:
Sub KommentitSolunArvoksi()
' aktiivisen välilehden kommentit viereisen solun arvoksi
Dim Kommentti As Comment
For Each Kommentti In ActiveSheet.Comments
Range(Kommentti.Parent.Address).Offset(, 1).Value = Kommentti.Text
Next
End Sub - kyselijä22332
Kiitos, tämä auttoi!
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Valtion alijäämä = yritystukien määrä = 10 mrd. euroa
Mutta persut eivät vaan suostu tasapainottamaan valtion budjettia, vaikka yritystuet on tiedetty haitallisiksi. Miksi p1138085Suomi käyttää sosiaalietuuksiin suhteessa eniten rahaa koko maailmassa
Suomi käyttää sosiaaliturvaetuuksiin enemmän rahaa suhteessa bruttokansantuotteeseen kuin mikään muu maa maailmassa. Su4097283Grahn-Laasonen: "Kansalainen joutuu pettymään, jos demareita äänestää"
Ministeri viittaa tuoreeseen Helsingin Sanomien juttuun, jossa demarijohtajan keinoja Suomen suunnan muuttamiseksi esite804554Vähän fiksumpi Nimi kisa ? :=)
Kirjoita teidän etunimet allekkain. Jos nimissä on joku kirjain sama, poista se. Tee sama tarkistus kaikille kirjaimill294299Mitä hyvää rikkaiden hyysääminen Suomelle tuonut?
Minäpä vastaan: ei yhtikäs mitään, vaan pelkkää vahinkoa. Demareiden ansiosta Suomen valtio oli käytännössä vielä 1980-22953Mikä on suurin luonne- eroavuus sinussa
Ja kaivatussasi? Vaikuttaako se huonoon vai hyvään suuntaan siinä, että teistä voisi tulla jotain?2032709- 1082486
Kenen haluaisit voittavan Amazing Racen: Tuomas ja Esko, Millu ja Karoliina vai Maria ja Vilma?
Amazing Race Suomi huipentuu lauantaina finaaliin. Jäljellä on kolme paria ja tiedossa on tehtäviä, jotka järkyttävät os332465Gallup: Katsotko Salkkareita tai oletko katsonut?
Salatut elämät on suomalaisten suosikkisarja vuosikymmenestä toiseen. Salkkareiden parissa viettää aikaa sukupolvet laps202125Amazing Race Tomas rehellisenä Esko-appiukon, 63, tilasta: "Sairastelut ja..."
Tomas Grekov ja Esko Rotola-Pukkila ovat mukana Amazing Race Suomi -kisassa. Ja nyt vuorossa on finaali. Hankaluuksia m11997