• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

Téma: Ribbon Galleries

Zaslal/a Palooo 25.3.2013 12:14

Ahojte,

potreboval by som poradit ako spravit galeriu farieb pomocou VBA (nieco podobne ako Mso: FontColorPicker). Resp. spravit label alebo jpg. galeriu nemam problem ... neviem ako do galerie priradit vlastni objekt 2x2 a zaroven mu priradit farbu .... Vedel by niekto poradit???

prikladam link pre lepsie pochopenie:
http://msdn.microsoft.com/en-us/library/office/dd756403(v=office.12).aspx

Zaslat odpověď >

---

Palooo(26.3.2013 11:36)#012498

uz som na nieco dosiel ale nieje to pekne riesenie


'Callback for rxgal2 getItemImage
Sub rxgal2_getItemImage(control As IRibbonControl, index As Integer, ByRef returnedVal)
With ActiveSheet.ChartObjects.Add(0, 0, 10, 10)
.Name = "ChartVolumeMetricsDevEXPORT"
End With
ActiveSheet.Shapes("ChartVolumeMetricsDevEXPORT").Fill.ForeColor.RGB = RGB(255, 255, 0)
ActiveSheet.ChartObjects("ChartVolumeMetricsDevEXPORT").Chart.Export (ThisWorkbook.Path & "\testmeExportChart.jpg")
ActiveSheet.ChartObjects("ChartVolumeMetricsDevEXPORT").Delete

Set returnedVal = LoadPicture(ThisWorkbook.Path & "\testmeExportChart.jpg")
Kill ThisWorkbook.Path & "\testmeExportChart.jpg"
End Sub


keby ste zistili nejake lepsie riesenie budem len radcitovat

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse