ich programmier grad vba in excel und
ich moechte die schriftgroesse von buttons zur laufzeit veraendern

wenn ich mache

markieren

Code:

tabelle1.closebtn.font.size= 16

dann klappt das auch

nun hab ich aber ne doppelte for schleife und will machen

markieren

Code:

Worksheets(i).Shapes(j).Font.Size = 16

dann klappt das aber nicht...
ich vermute das haengt mit den shapes zusammen aber wie? und warum? hab ich was vergessen/uebersehn?

gruss grumble

Ich vermutete, dass was mit j und / oder i nicht stimmt. Setze die doch mal auf einen Wert, bei dem du weißt, dass es sie gibt (es die richtigen sind):

Worksheets(0).Shapes(0).Font.Size = 16 Btw. Ich weiß ja nicht, wie das bei VB is, aber bei Delphi wird mit [] auf ein Array zugegriffen, nicht mit ().

nee das ist es leider nicht, habe ich vergessen zu erwaehnen. die indizies hauen 100% hin, ich kann das gleiche objekt auch so selektieren...

die runden klammern sind auch ok...

ich vermute dass es mit den shapes so nicht klappt den font zu aendern und hoffe das hier noch jemand ne idee hat wie man das anders loesen kann...

ich hab die loesung nach langer suche gefunden, falls es einen interessiert es muss folgendermassen aussehen:

Worksheets(i).shapes(i).oleformat.object.object.fo nt.size=16