Herbers Excel-Forum - das Archiv

erstellte Buttons rutschen hoch ?!

Bild

Betrifft: erstellte Buttons rutschen hoch ?!
von: Jonny

Geschrieben am: 11.02.2005 15:15:28
Hi zusammen,
ich habe folgendes Dilemma:
Ich erstelle mittels Buttons (A) andere Buttons (B), die genau eine Spalte rechts und eine Zeile tiefer sein sollen.
Mein code:
With ActiveSheet.Buttons(Application.Caller).TopLeftCell.Offset(1, 1)
Set btn = ActiveSheet.Buttons.Add(.Left, .Top, .Width, .Height)
btn.Caption = "Zeile löschen"
btn.OnAction = "Best_Zeilen_Löschen"
btn.ShapeRange.ScaleHeight 0.5, msoFalse, msoScaleFromBottomRight
btn.ShapeRange.ScaleWidth 0.5, msoFalse, msoScaleFromBottomRight
btn.Name = "Löschbutton"
End With
Nun hab ich das Problem, dass die erstellten Buttons B um ein kleines bißchen hochrutschen, je tiefer der Button A liegt.
D.h. konkret. Bei Button A-1 (liegt ganz oben)...ist keine Abweichung vorhanden.
Bei Button A-30(ganz unten) ist Button B in die selbe Zeile geruscht.
Schema :
Button A-1
Button B
.
.
.
Button A-30 Button B

Was kann ich tun?!
Bild

Betrifft: AW: erstellte Buttons rutschen hoch ?!
von: Udo
Geschrieben am: 11.02.2005 15:17:20
Stell in den Eigenschaften ein: Von Zellgröße und Position unabhängig.
Udo
Bild

Betrifft: AW: erstellte Buttons rutschen hoch ?!
von: Jonny
Geschrieben am: 11.02.2005 15:18:24
Wie mach ich das?! konkret!?
Bild

Betrifft: AW: erstellte Buttons rutschen hoch ?!
von: Udo
Geschrieben am: 11.02.2005 15:19:54
Button mit rechter Maustaste klicken, Steuerelement formatieren|Eigenschaften.
Udo
Bild

Betrifft: AW: erstellte Buttons rutschen hoch ?!
von: Jonny
Geschrieben am: 11.02.2005 15:24:53
Ich hab die zu erstellenden Buttons mit den Eigenschaften versehen, dennoch rutschen diese hoch!?
Bild

Betrifft: Keine weitere Idee oT
von: Udo
Geschrieben am: 11.02.2005 15:30:08
oT
Bild

Betrifft: Prob gelöst
von: Jonny

Geschrieben am: 11.02.2005 16:25:45
Zur Info, ich habe das Problem mit dieser zeile behoben...
btn.Top = ActiveSheet.Rows(zeile).Top
danke für deine Mühen
 Bild
Excel-Beispiele zum Thema "erstellte Buttons rutschen hoch ?!"
Name der zuletzt erstellten CheckBox auslesen Maximalwert eines SpinButtons nach Zellwert festlegen
CommandButtons in verschiedenen Tabellen mit einem Makro Auflisten von OptionButtons in Kontextmenü
CommandButtons sollen auf Schaltflächen-Klick deaktiviert werden Werte von OptionButtons aus 2 Gruppen auslesen
Wert eines UserForm-ToggleButtons auslesen