Push Button 1 in font rengini değiştiren makro ?
-
- Mesajlar: 18
- Kayıt: 20 Eyl 2014, 22:28
- İşletim Sisteminiz: Windows 8 , Windows 7
- LibreOffice Sürümü: 4.2.6.3
Push Button 1 in font rengini değiştiren makro ?
Push Button 1 in font rengini değiştiren makro aradım, bulamadım.
-
- Mesajlar: 18
- Kayıt: 20 Eyl 2014, 22:28
- İşletim Sisteminiz: Windows 8 , Windows 7
- LibreOffice Sürümü: 4.2.6.3
Re: Push Button 1 in font rengini değiştiren makro ?
Topluma faydalı biri olayım:
Dim oSheet , oDP ,oButon , oPage As Object
oSheet = ThisComponent.getSheets().getByIndex(3)
odp = oSheet.getDrawPage()
oPage = oDp.getbyIndex(1)
oButton = oPage.getControl(1)
oButton.TextColor=RGB(250,250,250)
oButton.backgroundcolor=rgb(255,0,0)
Dim oSheet , oDP ,oButon , oPage As Object
oSheet = ThisComponent.getSheets().getByIndex(3)
odp = oSheet.getDrawPage()
oPage = oDp.getbyIndex(1)
oButton = oPage.getControl(1)
oButton.TextColor=RGB(250,250,250)
oButton.backgroundcolor=rgb(255,0,0)