Das Archiv des Excel-Forums

Rechteck verschieben

Bild

Betrifft: Rechteck verschieben
von: Remo

Geschrieben am: 07.10.2003 15:53:09

Hallo zusammen

Ich habe ein Rechteck mit beliebiger Position in einer Arbeitsmatte:
ActiveSheet.Shapes("Rectangle 1").Select

Nun möchte ich das Rechteck mittels VBA-Code an den linken Rand (Spalte A)
verschieben.

Kennt sich jemand aus? Wäre dankbar um Hilfe

Gruss an alle Tüftler

Remo
Bild


Betrifft: AW: Rechteck verschieben
von: Matthias G
Geschrieben am: 07.10.2003 16:44:24

Hallo Remo,

ActiveSheet.Shapes("Rectangle 1").Left = 0

Viele Grüße,
Matthias


Bild


Betrifft: AW: P.S.: "Arbeitsmatte" ist gut! ;-) - o.T.
von: Matthias G
Geschrieben am: 07.10.2003 16:45:49

Besser wäre noch "Arbeitslatte".


Bild


Betrifft: AW: P.S.: "Arbeitsmatte" ist gut! ;-) - o.T.
von: Remo
Geschrieben am: 07.10.2003 17:00:23

Danke für den Tip.

P.S. Eine "Arbeitslatte" kommt mit den Ladies im Büro
leider kaum zustande...

Gruss Remo


Bild


Betrifft: AW: Danke für die Rückmeldung (kicher) - o.T.
von: Matthias G
Geschrieben am: 07.10.2003 17:03:00

-


 Bild

Excel-Beispiele zum Thema " Rechteck verschieben"

Anzahl von Zellen aus einem nicht rechteckigen Bereich ermitteln download Zeilen bedingt durch SpinButton verschieben download
Artikel aus Auswahltextbox in Sammeltextbox verschieben download Datei verschieben download
Daten in ListBoxes verschieben und sortieren download Bei Blattnamenseintrag Zeile in jeweiliges Blatt verschieben download
Tabellenblattgrafik ein/ausblenden und verschieben download Excel-Arbeitsmappe aus dem Internet öffnen und verschieben download
Mails eines Outlook-Ordners in einen anderen verschieben download Blatt verschieben und neuer Code für Schaltfläche download
Verschieben von ListBox-Eintragen nach oben und unten download Beim Verschieben von Text diesen in Label anzeigen download