Datum

Titel

26.04.2024 21:51:33

Idee für Grafik

26.04.2024 21:29:07

PQ zufällige Reihenfolge

26.04.2024 17:18:47

Große Datenmenge in komplexes Diagramm verpacken

26.04.2024 16:22:47

Aktualisierung Verknüpfung bei geschlossener Quelldatei

Du findest keine passende Antwort auf Deine Frage?

Stelle Deine Frage in unserem Live-Forum

Archiv - Navigation

1212to1216

Aktuelles Verzeichnis

Verzeichnis Index

Übersicht Verzeichnisse

Vorheriger Thread

Rückwärts Blättern

Nächster Thread

Vorwärts blättern

HERBERS

Excel-Forum (Archiv)

20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Vorwärts blättern

Inhaltsverzeichnis

Per Makro andere Makro einer Autoform zuweisen

Forumthread: Per Makro andere Makro einer Autoform zuweisen
6 Beiträge zu diesem Forumthread
Anzeige
301 Threads zu ähnlichen Themen
VBA Beispiele zu verwandten Themen

Top 100 Forumthreads

Florian

Hallo liebe Excelianer!
Ist es möglich per Makro einer Autoform eine andere Makro zuzuweisen?
Hintergrund: ich generiere per Makro ein Sheet. Auf dieses Sheet soll nun ein Button eingefügt werden, der wiederum eine Makro auslöst.
Geht das?
Danke schon mal im Voraus!
Gruss Florian

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

AW: Per Makro andere Makro einer Autoform zuweisen

Rudi
AW: Per Makro andere Makro einer Autoform zuweisen

Florian
AW: Per Makro andere Makro einer Autoform zuweisen

Rudi
Danke! Aber noch was...

Florian
Gelöst!! (oT)

Florian
was ist shpConEasyDoc? weiterer Code? owT

Rudi

AW: Per Makro andere Makro einer Autoform zuweisen

02.05.2011 13:55:59

Rudi

Hallo,
was für ein Button? Aus Formular? Dann OnAction-Eigenschaft.
Gruß
Rudi

AW: Per Makro andere Makro einer Autoform zuweisen

02.05.2011 14:26:15

Florian

Hallo Rudi!
Danke für Deine Antwort!
Nein, wenn möglich ganz normal über Autoform. Geht das auch?
Gruss Florian

AW: Per Makro andere Makro einer Autoform zuweisen

02.05.2011 16:15:37

Rudi

Hallo,
also als Shape?
Geht auch.

Sub Makro1()
Dim myBtn As Shape
Set myBtn = ActiveSheet.Shapes.AddShape(msoShapeRectangle, 1, 1, 1, 1)
With myBtn
.Left = 20
.Top = 20
.Width = 70
.Height = 20
.OnAction = "Test"
.Name = "Button1"
With .DrawingObject
.Text = "TestButton"
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlCenter
End With
End With
End Sub

Sub test()
MsgBox "Hallo"
End Sub

Gruß
Rudi

Danke! Aber noch was...

02.05.2011 18:53:37

Florian

Hallo Rudi!
Super, funktioniert. Aber: wie kann ich denn möglichst elegant die Platzierung steuern. Ich hab das idR immer so (s.u., mit z.B. Bildern), das funktioniert aber hier nicht. Weisst Du warum?
Gruss Florian
Funktioniert, z.B. bei Bildern:
.Shapes(1).Top = .Cells(14, 2).Top
.Shapes(1).Left = .Cells(14, 2).Left
.Shapes(1).Width = .Cells(14, 2).Width * 8
Funktioniert nicht:
With shpConEasyDoc
.Left = .Cells(14, 2).Left
.Top = .Cells(14, 2).Top
.Width = .Cells(14, 2).Width
end with

Gelöst!! (oT)

02.05.2011 21:49:30

Florian

was ist shpConEasyDoc? weiterer Code? owT

02.05.2011 21:51:42

Rudi