Live-Forum - Die aktuellen Beiträge
Datum
Titel
30.04.2024 21:27:28
Bei Autofilter immer leere Zeilen einschließen
30.04.2024 20:46:46
Dopplungen Markieren, nur wenn die Zelle nebenan ident. ist
30.04.2024 20:14:55
Datum filtern
30.04.2024 19:41:34
VBA: Zellinhalt wird nicht angezeigt
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1920to1924
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1920to1924
1920to1924
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Commandbutton - Schriftgrösse ändern

Commandbutton - Schriftgrösse ändern
13.02.2023 11:24:50
Pepi
Hallo zusammen
Kann mir jemand sagen, was hier falsch ist
ActiveSheet.Shapes(oShp.Name).FontSize = 10
ActiveSheet.Shapes("cmd_Suchen").font.name = "Arial"
ActiveSheet.Shapes(oShp.Name).Font.ForeColor = &H8000000E 'weiss
Fehler: Objekt unterstützt diese Methode oder Eigenschaft nicht
Vielen Dank für Eure Hilfe Pepi

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Commandbutton - Schriftgrösse ändern
13.02.2023 11:40:15
Rudi
Hallo,
die 'alten' Steuerelemente aus Formular sind nicht formatierbar.
Gruß
Rudi
AW: Commandbutton - Schriftgrösse ändern
13.02.2023 11:45:28
GerdL
Hallo Pepi,
es sind unterschiedliche Fehlerquellen möglich.
Schreibe mal "ControlFormat." vor Font
Gruß Gerd
Fehlinformation von mir ;-(
13.02.2023 11:54:06
mir
sorry
With ActiveSheet.Shapes(oShp.Name).DrawingObject.Font
  .Size = 10
  .Name = "Arial"
  .Color = RGB(255, 255, 255) 'weiss
End With
Gruß
Rudi
oShp.Name ...
13.02.2023 11:58:20
Rudi
...ist natürlich von hinten durch die Brust ins Auge
With oShp.DrawingObject.Font
  .Size = 10
  .Name = "Arial"
  .Color = RGB(255, 255, 255) 'weiss
End With

Anzeige
AW: Fehlinformation von mir ;-(
13.02.2023 18:03:21
mir
Hallo Rudi, vielen Dank für den Tipp. Doch leider funktionierte es nicht von Anfang an.
Der Fehler lag bei der Definition von oShp
Set oCmd = ActiveSheet.cmd_PDF '.Shapes(oShp.Name) oder .Shapes(oShp) geht nicht > Error
With oCmd
.Caption = "PDF"
.Top = Cells(1, 1).Top + 3
.Left = Cells(1, 2).Left + 95
.Height = 20.5
.Width = 30
.ForeColor = RGB(255, 255, 255) 'weiss
End With

With oCmd.Font
.Size = 10
.Name = "Arial"
End With
so ging es - vielen Dank
lg Pepi
Anzeige

Links zu Excel-Dialogen

CommandButton

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige