Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1224to1228
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Object anlegen und Caption ändern

Object anlegen und Caption ändern
ing.grohn
Hallo Forum,
mit:
 ActiveSheet.OLEObjects.Add(ClassType:="Forms.CommandButton.1", _
Link:=False, _
DisplayAsIcon:=False, _
Caption:="Test", _   (funktioniert nicht
Left:=567, _
Top:=9.75, _
Width:=80.25, _
Height:=45).Select
'ActiveSheet.Shapes("CommandButton2").Caption = "Test" (geht auch nicht)

kann ich ein Button auf der Exceloberfläche anlegen. Allerdings schaffe ich es nicht , Caption zu verändern.
Beide Versuche (s.o.) scheitern!
Wer hilft mir weiter?
Für die Hilfe schon jetzt recht herzlichen Dank!
Mit freundlichen Grüßen
Albrecht

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Object anlegen und Caption ändern
28.08.2011 18:40:38
Josef

Hallo Albrecht,
das geht so.
Sub albrecht()
  Dim objOLE As Object
  
  Set objOLE = ActiveSheet.OLEObjects.Add(ClassType:="Forms.CommandButton.1", Link:=False, DisplayAsIcon:=False)
  
  With objOLE
    .Left = 567
    .Top = 9.75
    .Width = 80.25
    .Height = 45
    .Object.Caption = "Hallo"
  End With
  
  
  Set objOLE = Nothing
End Sub



« Gruß Sepp »

Anzeige
AW: Object anlegen und Caption ändern
28.08.2011 18:52:08
ing.grohn
Hallo Sepp,
des Pudels Kern lag im Object!
Vielen Dank
Mit freundlichen Grüßen und einen schönen Abend
Albrecht

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige