Osaisiko joku viisas ja fiksu ihminen kertoa, että pystyykö kaavion lisäämään kommenttikenttään? Kiitos paljon vastanneelle :)
Kaavion näkyminen kommenttikentässä
avuton
1
230
Vastaukset
vaikeampi tapa ilman koodia ja helpompi koodilla
ilmankoodia
1.Tallenna työkirja web sivuna
2. Lisää kommentti soluun
3. Tuplaklikkaa kommentin reunan päällä, missä on niitä palloja
4.Lomakkeelta valitse Colors and Lines
5. Color alasvetovalikosta valitse Fill Effects
6. valitse Picture
7. Klikkaa Select Picture
8.Liitä kaaviokuva websivun liitekansiosta
9. ok
10.ok
koodilla
moduuliin...
Sub LisaaKaavio()
Dim alue As Range
Dim muoto As Object
Set alue = ActiveCell
If Not alue.Comment Is Nothing Then
alue.Comment.Delete
End If
ActiveSheet.ChartObjects(1).Activate
ActiveChart.Export Filename:="C:\KommenttiKaavio.gif", FilterName:="GIF"
Set muoto = alue.AddComment("")
muoto.Shape.Fill.UserPicture "C:\KommenttiKaavio.gif"
Range("A1").Select 'kaavion valinnan poisto
End Sub
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Kuhmossa rallit alkoi ennen aikojaan
Paettiin polliisia törkeästi? Se tuo rallikiima on näemmä saavuttanu paikalliset tommi mäkiset kiljupäissään auton rat331299Kaste tulisi tehdä apostolisella tavalla Ap. t. 2:38 mukaan
Apostolit eivät kastaneet kolminaisuuden nimellä vaan Jeesuksen alkuperäisen käskyn mukaisesti: Ap. t. 2:38 Niin Pietar691095- 104936
41000 kavallettu rahaa
uutisoi Kaleva ja iltasanomat vuosina 2020-2022 välisenä aikana hävinnyt toi summa tuomittu nainen 1971 syntynyt.42879Kerro minulle
Miksi teit niinkuin teit? Miksi kielsit tunteesi minua kohtaan. Miksi et halunnut että tiedän oikeasti mitä tunnet. Etkö56729- 42726
- 49702
Fantasioista
Suurimmalla osalla meistä on jonkinlaisia eroottisia fantasioita. Miten sinä suhtaudut fantasioihin? Ruokitko niitä vai94672Se riisuu suosimasi paatoksen, paljastaa egosi tyhjäksi
Idän fisosofian vihaaja kirjoitti: "Muuten tämä idän-uskontojen mekaniikka hävitää ja hautaa tästä kaiken hyvän paatoks302656- 29635