Herbers Excel-Forum - das Archiv

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 Zeilen bedingt durch SpinButton verschieben
Artikel aus Auswahltextbox in Sammeltextbox verschieben Datei verschieben
Daten in ListBoxes verschieben und sortieren Bei Blattnamenseintrag Zeile in jeweiliges Blatt verschieben
Tabellenblattgrafik ein/ausblenden und verschieben Excel-Arbeitsmappe aus dem Internet öffnen und verschieben
Mails eines Outlook-Ordners in einen anderen verschieben Blatt verschieben und neuer Code für Schaltfläche